Remove unnecessary IORef for meta context

2025-05-20 21:36:52 -07:00
parent cae4368cd9
commit 8dae8880f9
6 changed files with 66 additions and 70 deletions
--- a/src/Lib/TopContext.newt
+++ b/src/Lib/TopContext.newt
@@ -42,7 +42,7 @@ instance Show TopContext where
 -- TODO need to get class dependencies working
 emptyTop : ∀ io. {{Monad io}} {{HasIO io}} -> io TopContext
 emptyTop = do
-  mcctx <- newIORef (MC EmptyMap Nil 0 CheckAll)
+  let mcctx = MC EmptyMap Nil 0 CheckAll
  errs <- newIORef $ the (List Error) Nil
  pure $ MkTop EmptyMap Nil EmptyMap Nil EmptyMap mcctx 0 errs EmptyMap