clean up some vscode noise from backtracking

This commit is contained in:
2024-10-30 21:39:26 -07:00
parent 56e005d2dc
commit 91eec503d1
5 changed files with 34 additions and 46 deletions

View File

@@ -94,7 +94,7 @@ compileTerm tm@(App _ _ _) with (funArgs tm)
arity <- case meta of
-- maybe throw
(Unsolved x j ctx _ _ _) => pure 0 -- FIXME # of Bound in ctx.bds
(Solved j tm) => pure $ getArity !(quote 0 tm)
(Solved _ j tm) => pure $ getArity !(quote 0 tm)
apply (CRef "Meta\{show k}") args' [<] arity
_ | (t@(Ref fc nm _), args) = do
args' <- traverse compileTerm args