Skip to content

Commit

Permalink
[ fix ] Add cast localVars to List in RunElab
Browse files Browse the repository at this point in the history
  • Loading branch information
spcfox authored and GulinSS committed Mar 5, 2025
1 parent bc7f96b commit 5b8442a
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/TTImp/Elab/RunElab.idr
Original file line number Diff line number Diff line change
Expand Up @@ -274,7 +274,7 @@ elabScript rig fc nest env script@(NDCon nfc nm t ar args) exp
ty <- getTerm gty
scriptRet (Just $ map rawName $ !(unelabUniqueBinders env ty))
elabCon defs "LocalVars" [<]
= scriptRet vars
= scriptRet (the (List Name) (cast vars))
elabCon defs "GenSym" [<str]
= do str' <- evalClosure defs str
n <- genVarName !(reify defs str')
Expand Down

0 comments on commit 5b8442a

Please sign in to comment.