From 9563b2cb9e58403877445a9c9964b5ee9e946075 Mon Sep 17 00:00:00 2001
From: Marvin Borner
Date: Mon, 8 Aug 2022 00:25:48 +0200
Subject: Obviously trivial

---
 src/Eval.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Eval.hs')

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
-- 
cgit v1.2.3