show newt failure in vscode

This commit is contained in:
2024-09-14 21:55:27 -07:00
parent ac7a61e1fd
commit b65a76ccd3
4 changed files with 12 additions and 3 deletions

View File

@@ -650,7 +650,7 @@ infer ctx (RPi fc nm icit ty ty2) = do
let nm := fromMaybe "_" nm
ty2' <- check (extend ctx nm vty') ty2 (VU fc)
pure (Pi fc nm icit ty' ty2', (VU fc))
infer ctx (RLet fc str tm tm1 tm2) = error fc "implement RLet"
infer ctx (RLet fc nm ty v sc) = error fc "implement RLet"
infer ctx (RAnn fc tm rty) = do
ty <- check ctx rty (VU fc)
vty <- eval ctx.env CBN ty