chore: update stage0
This commit is contained in:
parent
a58a7d6536
commit
998dd05c65
2 changed files with 1594 additions and 1470 deletions
4
stage0/src/Lean/Elab/App.lean
generated
4
stage0/src/Lean/Elab/App.lean
generated
|
|
@ -735,6 +735,9 @@ private partial def elabAppFn (f : Syntax) (lvals : List LVal) (namedArgs : Arra
|
|||
| `($e $.$field) => do
|
||||
let f ← `($(e).$field)
|
||||
elabAppFn f lvals namedArgs args expectedType? explicit ellipsis overloaded acc
|
||||
| `($e |>. $field) => do
|
||||
let f ← `($(e).$field)
|
||||
elabAppFn f lvals namedArgs args expectedType? explicit ellipsis overloaded acc
|
||||
| `($(e).$field:ident) =>
|
||||
let newLVals := field.getId.eraseMacroScopes.components.map (fun n => LVal.fieldName (toString n))
|
||||
elabAppFn e (newLVals ++ lvals) namedArgs args expectedType? explicit ellipsis overloaded acc
|
||||
|
|
@ -855,6 +858,7 @@ private def elabAtom : TermElab := fun stx expectedType? =>
|
|||
@[builtinTermElab namedPattern] def elabNamedPattern : TermElab := elabAtom
|
||||
@[builtinTermElab explicitUniv] def elabExplicitUniv : TermElab := elabAtom
|
||||
@[builtinTermElab dollarProj] def expandDollarProj : TermElab := elabAtom
|
||||
@[builtinTermElab pipeProj] def expandPipeProj : TermElab := elabAtom
|
||||
|
||||
@[builtinTermElab explicit] def elabExplicit : TermElab := fun stx expectedType? =>
|
||||
match_syntax stx with
|
||||
|
|
|
|||
3060
stage0/stdlib/Lean/Elab/App.c
generated
3060
stage0/stdlib/Lean/Elab/App.c
generated
File diff suppressed because it is too large
Load diff
Loading…
Add table
Reference in a new issue