fix: error semantic

Author: FLOWleplusbeau

app/Main.hs

@@ -48,7 +48,7 @@ main = do
 
 exitWithError :: String -> IO a
 exitWithError msg =
-  hPutStrLn stderr ("*** ERROR : " ++ msg)
+  hPutStrLn stderr ("[ERROR] : " ++ msg)
     >> exitWith (ExitFailure 84)
 
 formatCompileError :: CompileError -> String
@@ -358,7 +358,7 @@ replLoop = do
         else do
           result <- runProgram input
           case result of
-            Left err -> putStrLn ("*** ERROR : " ++ err)
+            Left err -> putStrLn ("[ERROR] : " ++ err)
             Right VUnit -> return ()
             Right val -> putStrLn (renderValue val)
           replLoop