diff options
| author | Jan Tuomi <jans.tuomi@gmail.com> | 2022-10-04 14:46:45 +0300 |
|---|---|---|
| committer | Jan Tuomi <jans.tuomi@gmail.com> | 2022-12-05 14:21:53 +0200 |
| commit | 7a498e3a581f26b81fc9c2c9c7af8448a7f84f0f (patch) | |
| tree | 10c05309191807d0bcc31a9fcca4a422c1cda414 /src/Lib.hs | |
| parent | fe5d1ec1b76b8cb42359324030e701a719847a50 (diff) | |
Rename and refactor
Diffstat (limited to 'src/Lib.hs')
| -rw-r--r-- | src/Lib.hs | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -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) |
