Improve auto solving - 30% faster and hopefully proper errors if a type mismatch is blocking it.

2025-01-07 20:59:59 -08:00
parent 7110c94ac6
commit 2cdeb2721c
9 changed files with 61 additions and 31 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)
+  mcctx <- newIORef (MC Nil 0 CheckAll)
  errs <- newIORef $ the (List Error) Nil
  pure $ MkTop EmptyMap mcctx False errs Nil EmptyMap