max/lean4-htt
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 2

fix: applyAttributes at 'let rec'

Browse source
This commit is contained in:
Leonardo de Moura 2020-09-02 16:10:10 -07:00
parent 9ffd1b1672
commit 1afecc3fbf
1 changed files with 1 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
src/Lean/Elab/LetRec.lean
View file

@ -41,6 +41,7 @@ decls ← (letRec.getArg 1).getArgs.getSepElems.mapM fun attrDeclStx => do {
currDeclName? ← getDeclName?;
let declName := currDeclName?.getD Name.anonymous ++ shortDeclName;
checkNotAlreadyDeclared declName;
applyAttributes declName attrs AttributeApplicationTime.beforeElaboration;
let binders := (decl.getArg 1).getArgs;
let typeStx := expandOptType decl (decl.getArg 2);
(type, numParams) ← elabBinders binders fun xs => do {