aboutsummaryrefslogtreecommitdiffstats
path: root/src/Lib.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Lib.hs')
-rw-r--r--src/Lib.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Lib.hs b/src/Lib.hs
index a8a536f..8b26a35 100644
--- a/src/Lib.hs
+++ b/src/Lib.hs
@@ -38,6 +38,6 @@ runInlineScript fileName env src = do
foldEvaluate :: Env -> [AST] -> LContext (Env, [AST])
foldEvaluate accEnv [] = return (accEnv, [])
foldEvaluate accEnv (ast:rest) = do
- (newAccEnv, newAst) <- evaluate accEnv ast
+ (newAccEnv, newAst) <- evaluate 0 accEnv ast
(retEnv, restEvaled) <- foldEvaluate newAccEnv rest
return $ (retEnv, newAst : restEvaled)