Allow multiline expressions

2025-01-20 19:20:29 -06:00
parent ca7f09e2ac
commit 35163a5d54
7 changed files with 336 additions and 262 deletions
--- a/src/Main.hs
+++ b/src/Main.hs
@ -81,4 +81,7 @@ main = do
      putStrLn $ decodeResult $ result $ evalTricu library $ parseTricu value

 runTricu :: String -> T
-runTricu = result . evalTricu Map.empty . parseTricu
+runTricu input =
+  let asts     = parseTricu input
+      finalEnv = evalTricu Map.empty asts
+   in result finalEnv