diff options
Diffstat (limited to 'src/Eval.hs')
| -rw-r--r-- | src/Eval.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Eval.hs b/src/Eval.hs index 0eb6c9e..0e4f1f3 100644 --- a/src/Eval.hs +++ b/src/Eval.hs @@ -125,7 +125,7 @@ evalInstruction instr s@(EnvState env) rec isRepl = case instr of | otherwise = namespace ++ "." env'' <- pure $ Environment $ map (\((n, e), o) -> ((prefix ++ n, e), o)) ((\(Environment e) -> e) env') -- TODO: Improve - rec (EnvState $ env <> env'') False -- import => isRepl = False + rec (EnvState $ env'' <> env) False -- import => isRepl = False Evaluate e -> let (res, _) = evalExp e (Environment []) `runState` env in putStrLn |