port aoc2023 day4

more stuff in Prelude, typechecking fixes, solving autos
2024-11-30 10:27:06 -08:00
parent baeaf4295d
commit d5a4d6253f
10 changed files with 234 additions and 41 deletions
--- a/src/Lib/Types.idr
+++ b/src/Lib/Types.idr
@@ -525,7 +525,7 @@ freshMeta : Context -> FC -> Val -> MetaKind -> M Tm
 freshMeta ctx fc ty kind = do
  top <- get
  mc <- readIORef top.metas
-  debug "fresh meta \{show mc.next} : \{show ty}"
+  debug "fresh meta \{show mc.next} : \{show ty} (\{show kind})"
  writeIORef top.metas $ { next $= S, metas $= (Unsolved fc mc.next ctx ty kind [] ::) } mc
  pure $ applyBDs 0 (Meta fc mc.next) ctx.bds
  where