qn for metas

2025-01-11 20:07:50 -08:00
parent 1a9a8d3312
commit 793c3a9999
9 changed files with 79 additions and 94 deletions
--- a/port/Lib/TopContext.newt
+++ b/port/Lib/TopContext.newt
@@ -30,7 +30,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 Nil 0 CheckAll)
+  mcctx <- newIORef (MC EmptyMap 0 CheckAll)
  errs <- newIORef $ the (List Error) Nil
  pure $ MkTop EmptyMap mcctx False errs Nil EmptyMap