From 694021a9bd1dd0420a8594ea24218c47fbbab51e Mon Sep 17 00:00:00 2001
From: Jan Tuomi <jans.tuomi@gmail.com>
Date: Wed, 5 Oct 2022 14:48:14 +0300
Subject: Refactor Depth into LContext

---
 app/Main.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'app')

diff --git a/app/Main.hs b/app/Main.hs
index 0aa66d7..a422a5b 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -54,7 +54,7 @@ main = do
     }
 
     let config = parseArgs initialConfig args
-        ls = LState { stateConfig = config, stateEnv = builtinEnv }
+        ls = LState { stateConfig = config, stateEnv = builtinEnv, stateDepth = 0 }
 
     if (configShowHelp config) then do
         putStrLn $ "Usage: " ++ progName ++ "                 # to open REPL"
-- 
cgit v1.3