LSP jump to definition

This commit is contained in:
2026-02-12 21:59:56 -08:00
parent ab33635642
commit e1d83556ae
6 changed files with 44 additions and 22 deletions

View File

@@ -440,10 +440,8 @@ solve env m sp t = do
-- let someone else solve this and then check again.
debug $ \ _ => "CONSTRAINT2 \{show ix} \{show sp} =?= \{show t}"
addConstraint env m sp t
E fc msg => throwError (E fc "\{msg} for \{show ix} \{show sp} =?= \{show t}")
-- debug $ \ _ => "CONSTRAINT3 \{show ix} \{show sp} =?= \{show t}"
-- debug $ \ _ => "because \{showError "" err}"
-- addConstraint env m sp t
-- replace with wrapper
err => throwError (E (getFC err) "\{errorMsg err} for \{show ix} \{show sp} =?= \{show t}")
)
unifySpine : Env -> UnifyMode -> Bool -> SnocList Val -> SnocList Val -> M UnifyResult