diff --git a/stage0/src/Lean/Elab/Quotation.lean b/stage0/src/Lean/Elab/Quotation.lean index 04c6190e9a..3673a1159a 100644 --- a/stage0/src/Lean/Elab/Quotation.lean +++ b/stage0/src/Lean/Elab/Quotation.lean @@ -340,7 +340,7 @@ private partial def getHeadInfo (alt : Alt) : TermElabM HeadInfo := if let some (k, _) := quoted.antiquotKind? then if let some name := getAntiquotKindSpec? quoted then tryAddSyntaxNodeKindInfo name k - if quoted.isAtom then + if quoted.isAtom || quoted.isOfKind `patternIgnore then -- We assume that atoms are uniquely determined by the node kind and never have to be checked unconditionally pure else if quoted.isTokenAntiquot then diff --git a/stage0/src/Lean/Elab/Syntax.lean b/stage0/src/Lean/Elab/Syntax.lean index d2b0500033..641f739e4a 100644 --- a/stage0/src/Lean/Elab/Syntax.lean +++ b/stage0/src/Lean/Elab/Syntax.lean @@ -162,16 +162,28 @@ where let aliasName := id.getId.eraseMacroScopes let info ← Parser.getParserAliasInfo aliasName addAliasInfo id info - let args ← args.mapM (withNestedParser ∘ process) - let (args, stackSz) := if let some stackSz := info.stackSz? then - if !info.autoGroupArgs then - (args.map (·.1), stackSz) - else - (args.map ensureUnaryOutput, stackSz) + let args' ← args.mapM (withNestedParser ∘ process) + -- wrap lone string literals in `<|>` in dedicated node (#1275) + let args' ← if aliasName == `orelse then -- TODO: generalize if necessary + args.zip args' |>.mapM fun (arg, arg') => do + let mut #[arg] := arg.getArgs | return arg' + let sym ← match arg with + | `(stx| &$sym) => pure sym + | `(stx| $sym:str) => pure sym + | _ => return arg' + let sym := sym.getString + return (← `(ParserDescr.nodeWithAntiquot $(quote sym) $(quote (`token ++ sym)) $(arg'.1)), 1) else - let (args, stackSzs) := args.unzip - (args, stackSzs.foldl (· + ·) 0) - let stx ← match args with + pure args' + let (args', stackSz) := if let some stackSz := info.stackSz? then + if !info.autoGroupArgs then + (args'.map (·.1), stackSz) + else + (args'.map ensureUnaryOutput, stackSz) + else + let (args', stackSzs) := args'.unzip + (args', stackSzs.foldl (· + ·) 0) + let stx ← match args' with | #[] => Parser.ensureConstantParserAlias aliasName; ``(ParserDescr.const $(quote aliasName)) | #[p1] => Parser.ensureUnaryParserAlias aliasName; ``(ParserDescr.unary $(quote aliasName) $p1) | #[p1, p2] => Parser.ensureBinaryParserAlias aliasName; ``(ParserDescr.binary $(quote aliasName) $p1 $p2) diff --git a/stage0/src/Lean/Meta/Tactic/Congr.lean b/stage0/src/Lean/Meta/Tactic/Congr.lean index 81545f2fec..c499d7a896 100644 --- a/stage0/src/Lean/Meta/Tactic/Congr.lean +++ b/stage0/src/Lean/Meta/Tactic/Congr.lean @@ -40,7 +40,7 @@ private def applyCongrThm? (mvarId : MVarId) (congrThm : CongrTheorem) : MetaM ( Try to apply a `simp` congruence theorem. -/ def MVarId.congr? (mvarId : MVarId) : MetaM (Option (List MVarId)) := - mvarId.withContext do + mvarId.withContext do commitWhenSomeNoEx? do mvarId.checkNotAssigned `congr let target ← mvarId.getType' let some (_, lhs, _) := target.eq? | return none @@ -53,15 +53,17 @@ def MVarId.congr? (mvarId : MVarId) : MetaM (Option (List MVarId)) := Try to apply a `hcongr` congruence theorem, and then tries to close resulting goals using `Eq.refl`, `HEq.refl`, and assumption. -/ -def MVarId.hcongr? (mvarId : MVarId) : MetaM (Option (List MVarId)) := - mvarId.withContext do +def MVarId.hcongr? (mvarId : MVarId) : MetaM (Option (List MVarId)) := do + commitWhenSomeNoEx? do mvarId.checkNotAssigned `congr - let target ← mvarId.getType' - let some (_, lhs, _, _) := target.heq? | return none - let lhs := lhs.cleanupAnnotations - unless lhs.isApp do return none - let congrThm ← mkHCongr lhs.getAppFn - applyCongrThm? mvarId congrThm + let mvarId ← mvarId.eqOfHEq + mvarId.withContext do + let target ← mvarId.getType' + let some (_, lhs, _, _) := target.heq? | return none + let lhs := lhs.cleanupAnnotations + unless lhs.isApp do return none + let congrThm ← mkHCongr lhs.getAppFn + applyCongrThm? mvarId congrThm /-- Try to apply `implies_congr`. diff --git a/stage0/src/Lean/Meta/Tactic/Refl.lean b/stage0/src/Lean/Meta/Tactic/Refl.lean index 6ac24c8dfd..f40d595d4d 100644 --- a/stage0/src/Lean/Meta/Tactic/Refl.lean +++ b/stage0/src/Lean/Meta/Tactic/Refl.lean @@ -52,6 +52,14 @@ def _root_.Lean.MVarId.heqOfEq (mvarId : MVarId) : MetaM MVarId := let some [mvarId] ← observing? do mvarId.apply (mkConst ``heq_of_eq [← mkFreshLevelMVar]) | return mvarId return mvarId +/-- +Try to apply `eq_of_heq`. If successful, then return new goal, otherwise return `mvarId`. +-/ +def _root_.Lean.MVarId.eqOfHEq (mvarId : MVarId) : MetaM MVarId := + mvarId.withContext do + let some [mvarId] ← observing? do mvarId.apply (mkConst ``eq_of_heq [← mkFreshLevelMVar]) | return mvarId + return mvarId + /-- Close given goal using `HEq.refl`. -/ diff --git a/stage0/src/Lean/Parser.lean b/stage0/src/Lean/Parser.lean index c831c224c1..8b3683a998 100644 --- a/stage0/src/Lean/Parser.lean +++ b/stage0/src/Lean/Parser.lean @@ -76,7 +76,8 @@ unsafe def interpretParserDescr : ParserDescr → CoreM Parenthesizer | ParserDescr.unary n d => return (← getUnaryAlias parenthesizerAliasesRef n) (← interpretParserDescr d) | ParserDescr.binary n d₁ d₂ => return (← getBinaryAlias parenthesizerAliasesRef n) (← interpretParserDescr d₁) (← interpretParserDescr d₂) | ParserDescr.node k prec d => return leadingNode.parenthesizer k prec (← interpretParserDescr d) - | ParserDescr.nodeWithAntiquot _ k d => return node.parenthesizer k (← interpretParserDescr d) + | ParserDescr.nodeWithAntiquot n k d => return withAntiquot.parenthesizer (mkAntiquot.parenthesizer' n k (anonymous := true)) <| + node.parenthesizer k (← interpretParserDescr d) | ParserDescr.sepBy p sep psep trail => return sepBy.parenthesizer (← interpretParserDescr p) sep (← interpretParserDescr psep) trail | ParserDescr.sepBy1 p sep psep trail => return sepBy1.parenthesizer (← interpretParserDescr p) sep (← interpretParserDescr psep) trail | ParserDescr.trailingNode k prec lhsPrec d => return trailingNode.parenthesizer k prec lhsPrec (← interpretParserDescr d) @@ -107,7 +108,8 @@ unsafe def interpretParserDescr : ParserDescr → CoreM Formatter | ParserDescr.unary n d => return (← getUnaryAlias formatterAliasesRef n) (← interpretParserDescr d) | ParserDescr.binary n d₁ d₂ => return (← getBinaryAlias formatterAliasesRef n) (← interpretParserDescr d₁) (← interpretParserDescr d₂) | ParserDescr.node k _ d => return node.formatter k (← interpretParserDescr d) - | ParserDescr.nodeWithAntiquot _ k d => return node.formatter k (← interpretParserDescr d) + | ParserDescr.nodeWithAntiquot n k d => return withAntiquot.formatter (mkAntiquot.formatter' n k (anonymous := true)) <| + node.formatter k (← interpretParserDescr d) | ParserDescr.sepBy p sep psep trail => return sepBy.formatter (← interpretParserDescr p) sep (← interpretParserDescr psep) trail | ParserDescr.sepBy1 p sep psep trail => return sepBy1.formatter (← interpretParserDescr p) sep (← interpretParserDescr psep) trail | ParserDescr.trailingNode k prec lhsPrec d => return trailingNode.formatter k prec lhsPrec (← interpretParserDescr d) diff --git a/stage0/src/Lean/Parser/Extra.lean b/stage0/src/Lean/Parser/Extra.lean index f2326a548a..80b62cbd16 100644 --- a/stage0/src/Lean/Parser/Extra.lean +++ b/stage0/src/Lean/Parser/Extra.lean @@ -89,6 +89,9 @@ attribute [run_builtin_parser_attribute_hooks] sepByIndent sepBy1Indent @[run_builtin_parser_attribute_hooks] abbrev notSymbol (s : String) : Parser := notFollowedBy (symbol s) s +/-- No-op parser combinator that annotates subtrees to be ignored in syntax patterns. -/ +@[inline, run_builtin_parser_attribute_hooks] def patternIgnore : Parser → Parser := node `patternIgnore + /-- No-op parser that advises the pretty printer to emit a non-breaking space. -/ @[inline] def ppHardSpace : Parser := skip /-- No-op parser that advises the pretty printer to emit a space/soft line break. -/ @@ -182,6 +185,8 @@ macro_rules PrettyPrinter.Parenthesizer.registerAlias $aliasName $(mkIdentFrom declName (declName.getId ++ `parenthesizer))) builtin_initialize + register_parser_alias patternIgnore { autoGroupArgs := false } + register_parser_alias group { autoGroupArgs := false } register_parser_alias ppHardSpace { stackSz? := some 0 } register_parser_alias ppSpace { stackSz? := some 0 } diff --git a/stage0/src/Lean/PrettyPrinter/Formatter.lean b/stage0/src/Lean/PrettyPrinter/Formatter.lean index 4774077246..87c613c1b0 100644 --- a/stage0/src/Lean/PrettyPrinter/Formatter.lean +++ b/stage0/src/Lean/PrettyPrinter/Formatter.lean @@ -173,10 +173,18 @@ def withMaybeTag (pos? : Option String.Pos) (x : FormatterM Unit) : Formatter := else x -@[combinator_formatter orelse] def orelse.formatter (p1 p2 : Formatter) : Formatter := - -- HACK: We have no (immediate) information on which side of the orelse could have produced the current node, so try - -- them in turn. Uses the syntax traverser non-linearly! - p1 <|> p2 +@[combinator_formatter orelse] partial def orelse.formatter (p1 p2 : Formatter) : Formatter := do + let stx ← getCur + -- `orelse` may produce `choice` nodes for antiquotations + if stx.getKind == `choice then + visitArgs do + -- format only last choice + -- TODO: We could use elaborator data here to format the chosen child when available + orelse.formatter p1 p2 + else + -- HACK: We have no (immediate) information on which side of the orelse could have produced the current node, so try + -- them in turn. Uses the syntax traverser non-linearly! + p1 <|> p2 -- `mkAntiquot` is quite complex, so we'd rather have its formatter synthesized below the actual parser definition. -- Note that there is a mutual recursion diff --git a/stage0/src/Lean/PrettyPrinter/Parenthesizer.lean b/stage0/src/Lean/PrettyPrinter/Parenthesizer.lean index fd7646c5d2..1ff7eae7bd 100644 --- a/stage0/src/Lean/PrettyPrinter/Parenthesizer.lean +++ b/stage0/src/Lean/PrettyPrinter/Parenthesizer.lean @@ -247,10 +247,16 @@ def visitToken : Parenthesizer := do modify fun st => { st with contPrec := none, contCat := Name.anonymous, visitedToken := true } goLeft -@[combinator_parenthesizer orelse] def orelse.parenthesizer (p1 p2 : Parenthesizer) : Parenthesizer := do - -- HACK: We have no (immediate) information on which side of the orelse could have produced the current node, so try - -- them in turn. Uses the syntax traverser non-linearly! - p1 <|> p2 +@[combinator_parenthesizer orelse] partial def orelse.parenthesizer (p1 p2 : Parenthesizer) : Parenthesizer := do + let stx ← getCur + -- `orelse` may produce `choice` nodes for antiquotations + if stx.getKind == `choice then + visitArgs $ stx.getArgs.size.forM fun _ => do + orelse.parenthesizer p1 p2 + else + -- HACK: We have no (immediate) information on which side of the orelse could have produced the current node, so try + -- them in turn. Uses the syntax traverser non-linearly! + p1 <|> p2 -- `mkAntiquot` is quite complex, so we'd rather have its parenthesizer synthesized below the actual parser definition. -- Note that there is a mutual recursion @@ -299,13 +305,12 @@ def tokenWithAntiquot.parenthesizer (p : Parenthesizer) : Parenthesizer := do else p -def parenthesizeCategoryCore (cat : Name) (_prec : Nat) : Parenthesizer := +partial def parenthesizeCategoryCore (cat : Name) (_prec : Nat) : Parenthesizer := withReader (fun ctx => { ctx with cat := cat }) do let stx ← getCur if stx.getKind == `choice then visitArgs $ stx.getArgs.size.forM fun _ => do - let stx ← getCur - parenthesizerForKind stx.getKind + parenthesizeCategoryCore cat _prec else withAntiquot.parenthesizer (mkAntiquot.parenthesizer' cat.toString cat (isPseudoKind := true)) (parenthesizerForKind stx.getKind) modify fun st => { st with contCat := cat } diff --git a/stage0/src/Lean/Util/MonadBacktrack.lean b/stage0/src/Lean/Util/MonadBacktrack.lean index 77b54c8d0f..e9b1262e0d 100644 --- a/stage0/src/Lean/Util/MonadBacktrack.lean +++ b/stage0/src/Lean/Util/MonadBacktrack.lean @@ -13,19 +13,33 @@ class MonadBacktrack (s : outParam Type) (m : Type → Type) where export MonadBacktrack (saveState restoreState) -@[specialize] def commitWhenSome? [Monad m] [MonadBacktrack s m] [MonadExcept ε m] (x? : m (Option α)) : m (Option α) := do +/-- +Execute `x?`, but backtrack state if result is `none` or an exception was thrown. +-/ +def commitWhenSome? [Monad m] [MonadBacktrack s m] [MonadExcept ε m] (x? : m (Option α)) : m (Option α) := do let s ← saveState try match (← x?) with - | some a => pure (some a) + | some a => return some a | none => restoreState s - pure none + return none catch ex => restoreState s throw ex -@[specialize] def commitWhen [Monad m] [MonadBacktrack s m] [MonadExcept ε m] (x : m Bool) : m Bool := do +/-- +Execute `x?`, but backtrack state if result is `none` or an exception was thrown. +If an exception is thrown, `none` is returned. +That is, this function is similar to `commitWhenSome?`, but swallows the exception and returns `none`. +-/ +def commitWhenSomeNoEx? [Monad m] [MonadBacktrack s m] [MonadExcept ε m] (x? : m (Option α)) : m (Option α) := + try + commitWhenSome? x? + catch _ => + return none + +def commitWhen [Monad m] [MonadBacktrack s m] [MonadExcept ε m] (x : m Bool) : m Bool := do let s ← saveState try match (← x) with @@ -37,7 +51,7 @@ export MonadBacktrack (saveState restoreState) restoreState s throw ex -@[specialize] def commitIfNoEx [Monad m] [MonadBacktrack s m] [MonadExcept ε m] (x : m α) : m α := do +def commitIfNoEx [Monad m] [MonadBacktrack s m] [MonadExcept ε m] (x : m α) : m α := do let s ← saveState try x @@ -45,14 +59,14 @@ export MonadBacktrack (saveState restoreState) restoreState s throw ex -@[specialize] def withoutModifyingState [Monad m] [MonadFinally m] [MonadBacktrack s m] (x : m α) : m α := do +def withoutModifyingState [Monad m] [MonadFinally m] [MonadBacktrack s m] (x : m α) : m α := do let s ← saveState try x finally restoreState s -@[specialize] def observing? [Monad m] [MonadBacktrack s m] [MonadExcept ε m] (x : m α) : m (Option α) := do +def observing? [Monad m] [MonadBacktrack s m] [MonadExcept ε m] (x : m α) : m (Option α) := do let s ← saveState try x diff --git a/stage0/stdlib/Lean/Elab/PreDefinition/Eqns.c b/stage0/stdlib/Lean/Elab/PreDefinition/Eqns.c index 17b8539aaa..050c13ec87 100644 --- a/stage0/stdlib/Lean/Elab/PreDefinition/Eqns.c +++ b/stage0/stdlib/Lean/Elab/PreDefinition/Eqns.c @@ -77,7 +77,6 @@ lean_object* l_Lean_Meta_saveState___rarg(lean_object*, lean_object*, lean_objec lean_object* l_Lean_EnvExtensionInterfaceUnsafe_imp___elambda__2___rarg(lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Elab_PreDefinition_Eqns_0__Lean_Elab_Eqns_findMatchToSplit_x3f___lambda__2___closed__3; size_t lean_usize_sub(size_t, size_t); -static lean_object* l_Lean_Elab_Eqns_funext_x3f___lambda__1___closed__2; static lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_Eqns_simpEqnType___spec__1___lambda__2___closed__1; LEAN_EXPORT lean_object* l_Array_foldrMUnsafe_fold___at___private_Lean_Elab_PreDefinition_Eqns_0__Lean_Elab_Eqns_saveEqn___spec__13___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Eqns_mkEqnTypes_go___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -103,6 +102,7 @@ static lean_object* l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_PreDefi static lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_Eqns_simpEqnType___spec__1___closed__3; LEAN_EXPORT lean_object* l_Lean_LocalContext_foldrM___at___private_Lean_Elab_PreDefinition_Eqns_0__Lean_Elab_Eqns_saveEqn___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Eqns_0__Lean_Elab_Eqns_findMatchToSplit_x3f___spec__3___closed__1; +static lean_object* l_Lean_Elab_Eqns_funext_x3f___lambda__2___closed__1; static lean_object* l_Lean_Elab_Eqns_splitMatch_x3f_go___closed__2; lean_object* lean_expr_instantiate1(lean_object*, lean_object*); lean_object* l_Array_toSubarray___rarg(lean_object*, lean_object*, lean_object*); @@ -175,7 +175,6 @@ static lean_object* l_Lean_Elab_Eqns_funext_x3f___lambda__1___closed__1; LEAN_EXPORT lean_object* l___private_Lean_Elab_PreDefinition_Eqns_0__Lean_Elab_Eqns_saveEqn_collectDeps(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Eqns_mkUnfoldEq___lambda__1___closed__2; static lean_object* l_Lean_Elab_Eqns_getUnfoldFor_x3f___closed__2; -lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Eqns_UnfoldEqnExtState_map___default___closed__1; lean_object* l_Lean_PersistentHashMap_getCollisionNodeSize___rarg(lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Eqns_mkUnfoldProof_go___lambda__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -225,7 +224,6 @@ LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_Eqns_simpEqnTyp lean_object* l_Lean_Expr_replaceFVar(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Eqns_initFn____x40_Lean_Elab_PreDefinition_Eqns___hyg_7665_(lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Eqns_initFn____x40_Lean_Elab_PreDefinition_Eqns___hyg_6410_(lean_object*); -static lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Elab_Eqns_funext_x3f___spec__1___at_Lean_Elab_Eqns_funext_x3f___spec__2___closed__1; LEAN_EXPORT lean_object* l___private_Lean_Elab_PreDefinition_Eqns_0__Lean_Elab_Eqns_saveEqn_pushDecl___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Eqns_mkEqnTypes_go___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_LocalContext_foldrM___at___private_Lean_Elab_PreDefinition_Eqns_0__Lean_Elab_Eqns_saveEqn___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -306,6 +304,7 @@ LEAN_EXPORT lean_object* l_Lean_PersistentArray_forInAux___at___private_Lean_Ela LEAN_EXPORT lean_object* l_Lean_ForEachExpr_visit___at_Lean_Elab_Eqns_simpEqnType_collect___spec__1(lean_object*); static lean_object* l_Lean_Elab_Eqns_instInhabitedEqnInfoCore___closed__2; static lean_object* l_Lean_Elab_Eqns_splitMatch_x3f_go___closed__6; +lean_object* l_Lean_Meta_splitTarget_x3f(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); size_t lean_usize_mul(size_t, size_t); lean_object* l_Lean_Expr_consumeMData(lean_object*); LEAN_EXPORT lean_object* l_Lean_PersistentArray_foldrM___at___private_Lean_Elab_PreDefinition_Eqns_0__Lean_Elab_Eqns_saveEqn___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -317,7 +316,6 @@ LEAN_EXPORT lean_object* l_Lean_Elab_Eqns_deltaRHS_x3f___lambda__1___boxed(lean_ lean_object* l_Lean_addDecl(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT uint8_t l___private_Lean_Elab_PreDefinition_Eqns_0__Lean_Elab_Eqns_shouldUseSimpMatch___lambda__1(lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Data_PersistentArray_0__Lean_PersistentArray_foldrMAux___at___private_Lean_Elab_PreDefinition_Eqns_0__Lean_Elab_Eqns_saveEqn___spec__15___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Elab_Eqns_funext_x3f___spec__1___at_Lean_Elab_Eqns_funext_x3f___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Eqns_splitMatch_x3f_go___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_SavedState_restore(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Eqns_0__Lean_Elab_Eqns_saveEqn___spec__30(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -471,6 +469,7 @@ static lean_object* l_Lean_Elab_Eqns_mkUnfoldProof_go___lambda__1___closed__3; LEAN_EXPORT lean_object* l_Lean_Elab_Eqns_removeUnusedEqnHypotheses___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_mk_array(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_MVarId_withContext___at___private_Lean_Elab_PreDefinition_Eqns_0__Lean_Elab_Eqns_saveEqn___spec__35(lean_object*); +static lean_object* l_Lean_Elab_Eqns_funext_x3f___lambda__2___closed__2; extern lean_object* l_Lean_Expr_instBEqExpr; LEAN_EXPORT lean_object* l_Array_anyMUnsafe_any___at___private_Lean_Elab_PreDefinition_Eqns_0__Lean_Elab_Eqns_findMatchToSplit_x3f___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_Eqns_removeUnusedEqnHypotheses_go___spec__11___at_Lean_Elab_Eqns_removeUnusedEqnHypotheses_go___spec__12(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*); @@ -534,6 +533,7 @@ LEAN_EXPORT lean_object* l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefi lean_object* l_Lean_PersistentHashMap_mkCollisionNode___rarg(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_foldrMUnsafe_fold___at___private_Lean_Elab_PreDefinition_Eqns_0__Lean_Elab_Eqns_saveEqn___spec__20(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_Eqns_removeUnusedEqnHypotheses_go___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_Elab_Eqns_funext_x3f___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Elab_PreDefinition_Eqns_0__Lean_Elab_Eqns_saveEqn___closed__1; static lean_object* l_Lean_Elab_Eqns_mkUnfoldProof___closed__2; LEAN_EXPORT lean_object* l_Array_foldrMUnsafe_fold___at___private_Lean_Elab_PreDefinition_Eqns_0__Lean_Elab_Eqns_saveEqn___spec__24___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -1058,7 +1058,7 @@ return x_36; } } } -static lean_object* _init_l_Lean_commitWhenSome_x3f___at_Lean_Elab_Eqns_funext_x3f___spec__1___at_Lean_Elab_Eqns_funext_x3f___spec__2___closed__1() { +static lean_object* _init_l_Lean_Elab_Eqns_funext_x3f___lambda__1___closed__1() { _start: { uint8_t x_1; uint8_t x_2; lean_object* x_3; @@ -1070,302 +1070,229 @@ lean_ctor_set_uint8(x_3, 1, x_2); return x_3; } } -LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Elab_Eqns_funext_x3f___spec__1___at_Lean_Elab_Eqns_funext_x3f___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +LEAN_EXPORT lean_object* l_Lean_Elab_Eqns_funext_x3f___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_27; -x_8 = l_Lean_Meta_saveState___rarg(x_4, x_5, x_6, x_7); +lean_object* x_8; +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +x_8 = l_Lean_Meta_mkConstWithFreshMVarLevels(x_1, x_3, x_4, x_5, x_6, x_7); +if (lean_obj_tag(x_8) == 0) +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; x_9 = lean_ctor_get(x_8, 0); lean_inc(x_9); x_10 = lean_ctor_get(x_8, 1); lean_inc(x_10); -if (lean_is_exclusive(x_8)) { - lean_ctor_release(x_8, 0); - lean_ctor_release(x_8, 1); - x_11 = x_8; -} else { - lean_dec_ref(x_8); - x_11 = lean_box(0); -} +lean_dec(x_8); +x_11 = l_Lean_Elab_Eqns_funext_x3f___lambda__1___closed__1; lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); -x_27 = l_Lean_Meta_mkConstWithFreshMVarLevels(x_2, x_3, x_4, x_5, x_6, x_10); -if (lean_obj_tag(x_27) == 0) -{ -lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; -x_28 = lean_ctor_get(x_27, 0); -lean_inc(x_28); -x_29 = lean_ctor_get(x_27, 1); -lean_inc(x_29); -lean_dec(x_27); -x_30 = l_Lean_commitWhenSome_x3f___at_Lean_Elab_Eqns_funext_x3f___spec__1___at_Lean_Elab_Eqns_funext_x3f___spec__2___closed__1; -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -x_31 = l_Lean_MVarId_apply(x_1, x_28, x_30, x_3, x_4, x_5, x_6, x_29); -if (lean_obj_tag(x_31) == 0) -{ -lean_object* x_32; -x_32 = lean_ctor_get(x_31, 0); -lean_inc(x_32); -if (lean_obj_tag(x_32) == 0) -{ -lean_object* x_33; lean_object* x_34; -x_33 = lean_ctor_get(x_31, 1); -lean_inc(x_33); -lean_dec(x_31); -x_34 = lean_box(0); -x_12 = x_34; -x_13 = x_33; -goto block_26; -} -else -{ -lean_object* x_35; -x_35 = lean_ctor_get(x_32, 1); -lean_inc(x_35); -if (lean_obj_tag(x_35) == 0) -{ -lean_object* x_36; lean_object* x_37; uint8_t x_38; lean_object* x_39; -x_36 = lean_ctor_get(x_31, 1); -lean_inc(x_36); -lean_dec(x_31); -x_37 = lean_ctor_get(x_32, 0); -lean_inc(x_37); -lean_dec(x_32); -x_38 = 0; -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -x_39 = l_Lean_Meta_intro1Core(x_37, x_38, x_3, x_4, x_5, x_6, x_36); -if (lean_obj_tag(x_39) == 0) -{ -lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; -x_40 = lean_ctor_get(x_39, 0); -lean_inc(x_40); -x_41 = lean_ctor_get(x_39, 1); -lean_inc(x_41); -lean_dec(x_39); -x_42 = lean_ctor_get(x_40, 1); -lean_inc(x_42); -lean_dec(x_40); -x_43 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_43, 0, x_42); -x_12 = x_43; -x_13 = x_41; -goto block_26; -} -else -{ -lean_object* x_44; lean_object* x_45; lean_object* x_46; uint8_t x_47; -lean_dec(x_11); -x_44 = lean_ctor_get(x_39, 0); -lean_inc(x_44); -x_45 = lean_ctor_get(x_39, 1); -lean_inc(x_45); -lean_dec(x_39); -x_46 = l_Lean_Meta_SavedState_restore(x_9, x_3, x_4, x_5, x_6, x_45); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_9); -x_47 = !lean_is_exclusive(x_46); -if (x_47 == 0) -{ -lean_object* x_48; -x_48 = lean_ctor_get(x_46, 0); -lean_dec(x_48); -lean_ctor_set_tag(x_46, 1); -lean_ctor_set(x_46, 0, x_44); -return x_46; -} -else -{ -lean_object* x_49; lean_object* x_50; -x_49 = lean_ctor_get(x_46, 1); -lean_inc(x_49); -lean_dec(x_46); -x_50 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_50, 0, x_44); -lean_ctor_set(x_50, 1, x_49); -return x_50; -} -} -} -else -{ -lean_object* x_51; lean_object* x_52; -lean_dec(x_35); -lean_dec(x_32); -x_51 = lean_ctor_get(x_31, 1); -lean_inc(x_51); -lean_dec(x_31); -x_52 = lean_box(0); -x_12 = x_52; -x_13 = x_51; -goto block_26; -} -} -} -else -{ -lean_object* x_53; lean_object* x_54; lean_object* x_55; uint8_t x_56; -lean_dec(x_11); -x_53 = lean_ctor_get(x_31, 0); -lean_inc(x_53); -x_54 = lean_ctor_get(x_31, 1); -lean_inc(x_54); -lean_dec(x_31); -x_55 = l_Lean_Meta_SavedState_restore(x_9, x_3, x_4, x_5, x_6, x_54); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_9); -x_56 = !lean_is_exclusive(x_55); -if (x_56 == 0) -{ -lean_object* x_57; -x_57 = lean_ctor_get(x_55, 0); -lean_dec(x_57); -lean_ctor_set_tag(x_55, 1); -lean_ctor_set(x_55, 0, x_53); -return x_55; -} -else -{ -lean_object* x_58; lean_object* x_59; -x_58 = lean_ctor_get(x_55, 1); -lean_inc(x_58); -lean_dec(x_55); -x_59 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_59, 0, x_53); -lean_ctor_set(x_59, 1, x_58); -return x_59; -} -} -} -else -{ -lean_object* x_60; lean_object* x_61; lean_object* x_62; uint8_t x_63; -lean_dec(x_11); -lean_dec(x_1); -x_60 = lean_ctor_get(x_27, 0); -lean_inc(x_60); -x_61 = lean_ctor_get(x_27, 1); -lean_inc(x_61); -lean_dec(x_27); -x_62 = l_Lean_Meta_SavedState_restore(x_9, x_3, x_4, x_5, x_6, x_61); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_9); -x_63 = !lean_is_exclusive(x_62); -if (x_63 == 0) -{ -lean_object* x_64; -x_64 = lean_ctor_get(x_62, 0); -lean_dec(x_64); -lean_ctor_set_tag(x_62, 1); -lean_ctor_set(x_62, 0, x_60); -return x_62; -} -else -{ -lean_object* x_65; lean_object* x_66; -x_65 = lean_ctor_get(x_62, 1); -lean_inc(x_65); -lean_dec(x_62); -x_66 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_66, 0, x_60); -lean_ctor_set(x_66, 1, x_65); -return x_66; -} -} -block_26: -{ +x_12 = l_Lean_MVarId_apply(x_2, x_9, x_11, x_3, x_4, x_5, x_6, x_10); if (lean_obj_tag(x_12) == 0) { -lean_object* x_14; uint8_t x_15; -lean_dec(x_11); -x_14 = l_Lean_Meta_SavedState_restore(x_9, x_3, x_4, x_5, x_6, x_13); +lean_object* x_13; +x_13 = lean_ctor_get(x_12, 0); +lean_inc(x_13); +if (lean_obj_tag(x_13) == 0) +{ +uint8_t x_14; lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); -lean_dec(x_9); -x_15 = !lean_is_exclusive(x_14); -if (x_15 == 0) +x_14 = !lean_is_exclusive(x_12); +if (x_14 == 0) { -lean_object* x_16; lean_object* x_17; -x_16 = lean_ctor_get(x_14, 0); -lean_dec(x_16); -x_17 = lean_box(0); -lean_ctor_set(x_14, 0, x_17); -return x_14; +lean_object* x_15; lean_object* x_16; +x_15 = lean_ctor_get(x_12, 0); +lean_dec(x_15); +x_16 = lean_box(0); +lean_ctor_set(x_12, 0, x_16); +return x_12; } else { -lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_18 = lean_ctor_get(x_14, 1); -lean_inc(x_18); -lean_dec(x_14); -x_19 = lean_box(0); -x_20 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_20, 0, x_19); -lean_ctor_set(x_20, 1, x_18); -return x_20; -} -} -else -{ -uint8_t x_21; -lean_dec(x_9); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -x_21 = !lean_is_exclusive(x_12); -if (x_21 == 0) -{ -lean_object* x_22; -if (lean_is_scalar(x_11)) { - x_22 = lean_alloc_ctor(0, 2, 0); -} else { - x_22 = x_11; -} -lean_ctor_set(x_22, 0, x_12); -lean_ctor_set(x_22, 1, x_13); -return x_22; -} -else -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_23 = lean_ctor_get(x_12, 0); -lean_inc(x_23); +lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_17 = lean_ctor_get(x_12, 1); +lean_inc(x_17); lean_dec(x_12); -x_24 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_24, 0, x_23); -if (lean_is_scalar(x_11)) { - x_25 = lean_alloc_ctor(0, 2, 0); -} else { - x_25 = x_11; +x_18 = lean_box(0); +x_19 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_19, 0, x_18); +lean_ctor_set(x_19, 1, x_17); +return x_19; } -lean_ctor_set(x_25, 0, x_24); -lean_ctor_set(x_25, 1, x_13); -return x_25; +} +else +{ +lean_object* x_20; +x_20 = lean_ctor_get(x_13, 1); +lean_inc(x_20); +if (lean_obj_tag(x_20) == 0) +{ +lean_object* x_21; lean_object* x_22; uint8_t x_23; lean_object* x_24; +x_21 = lean_ctor_get(x_12, 1); +lean_inc(x_21); +lean_dec(x_12); +x_22 = lean_ctor_get(x_13, 0); +lean_inc(x_22); +lean_dec(x_13); +x_23 = 0; +x_24 = l_Lean_Meta_intro1Core(x_22, x_23, x_3, x_4, x_5, x_6, x_21); +if (lean_obj_tag(x_24) == 0) +{ +uint8_t x_25; +x_25 = !lean_is_exclusive(x_24); +if (x_25 == 0) +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; +x_26 = lean_ctor_get(x_24, 0); +x_27 = lean_ctor_get(x_26, 1); +lean_inc(x_27); +lean_dec(x_26); +x_28 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_28, 0, x_27); +lean_ctor_set(x_24, 0, x_28); +return x_24; +} +else +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; +x_29 = lean_ctor_get(x_24, 0); +x_30 = lean_ctor_get(x_24, 1); +lean_inc(x_30); +lean_inc(x_29); +lean_dec(x_24); +x_31 = lean_ctor_get(x_29, 1); +lean_inc(x_31); +lean_dec(x_29); +x_32 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_32, 0, x_31); +x_33 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_33, 0, x_32); +lean_ctor_set(x_33, 1, x_30); +return x_33; +} +} +else +{ +uint8_t x_34; +x_34 = !lean_is_exclusive(x_24); +if (x_34 == 0) +{ +return x_24; +} +else +{ +lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_35 = lean_ctor_get(x_24, 0); +x_36 = lean_ctor_get(x_24, 1); +lean_inc(x_36); +lean_inc(x_35); +lean_dec(x_24); +x_37 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_37, 0, x_35); +lean_ctor_set(x_37, 1, x_36); +return x_37; +} +} +} +else +{ +uint8_t x_38; +lean_dec(x_20); +lean_dec(x_13); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_38 = !lean_is_exclusive(x_12); +if (x_38 == 0) +{ +lean_object* x_39; lean_object* x_40; +x_39 = lean_ctor_get(x_12, 0); +lean_dec(x_39); +x_40 = lean_box(0); +lean_ctor_set(x_12, 0, x_40); +return x_12; +} +else +{ +lean_object* x_41; lean_object* x_42; lean_object* x_43; +x_41 = lean_ctor_get(x_12, 1); +lean_inc(x_41); +lean_dec(x_12); +x_42 = lean_box(0); +x_43 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_43, 0, x_42); +lean_ctor_set(x_43, 1, x_41); +return x_43; } } } } +else +{ +uint8_t x_44; +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_44 = !lean_is_exclusive(x_12); +if (x_44 == 0) +{ +return x_12; } -static lean_object* _init_l_Lean_Elab_Eqns_funext_x3f___lambda__1___closed__1() { +else +{ +lean_object* x_45; lean_object* x_46; lean_object* x_47; +x_45 = lean_ctor_get(x_12, 0); +x_46 = lean_ctor_get(x_12, 1); +lean_inc(x_46); +lean_inc(x_45); +lean_dec(x_12); +x_47 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_47, 0, x_45); +lean_ctor_set(x_47, 1, x_46); +return x_47; +} +} +} +else +{ +uint8_t x_48; +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_48 = !lean_is_exclusive(x_8); +if (x_48 == 0) +{ +return x_8; +} +else +{ +lean_object* x_49; lean_object* x_50; lean_object* x_51; +x_49 = lean_ctor_get(x_8, 0); +x_50 = lean_ctor_get(x_8, 1); +lean_inc(x_50); +lean_inc(x_49); +lean_dec(x_8); +x_51 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_51, 0, x_49); +lean_ctor_set(x_51, 1, x_50); +return x_51; +} +} +} +} +static lean_object* _init_l_Lean_Elab_Eqns_funext_x3f___lambda__2___closed__1() { _start: { lean_object* x_1; @@ -1373,24 +1300,27 @@ x_1 = lean_mk_string_from_bytes("funext", 6); return x_1; } } -static lean_object* _init_l_Lean_Elab_Eqns_funext_x3f___lambda__1___closed__2() { +static lean_object* _init_l_Lean_Elab_Eqns_funext_x3f___lambda__2___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Elab_Eqns_funext_x3f___lambda__1___closed__1; +x_2 = l_Lean_Elab_Eqns_funext_x3f___lambda__2___closed__1; x_3 = l_Lean_Name_str___override(x_1, x_2); return x_3; } } -LEAN_EXPORT lean_object* l_Lean_Elab_Eqns_funext_x3f___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +LEAN_EXPORT lean_object* l_Lean_Elab_Eqns_funext_x3f___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { -lean_object* x_8; lean_object* x_9; +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_dec(x_2); -x_8 = l_Lean_Elab_Eqns_funext_x3f___lambda__1___closed__2; -x_9 = l_Lean_commitWhenSome_x3f___at_Lean_Elab_Eqns_funext_x3f___spec__1___at_Lean_Elab_Eqns_funext_x3f___spec__2(x_1, x_8, x_3, x_4, x_5, x_6, x_7); -return x_9; +x_8 = l_Lean_Elab_Eqns_funext_x3f___lambda__2___closed__2; +x_9 = lean_alloc_closure((void*)(l_Lean_Elab_Eqns_funext_x3f___lambda__1), 7, 2); +lean_closure_set(x_9, 0, x_8); +lean_closure_set(x_9, 1, x_1); +x_10 = l_Lean_commitWhenSome_x3f___at_Lean_Elab_Eqns_funext_x3f___spec__1(x_9, x_3, x_4, x_5, x_6, x_7); +return x_10; } } LEAN_EXPORT lean_object* l_Lean_Elab_Eqns_funext_x3f(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { @@ -1508,7 +1438,7 @@ else lean_object* x_20; lean_object* x_21; lean_dec(x_10); x_20 = lean_box(0); -x_21 = l_Lean_Elab_Eqns_funext_x3f___lambda__1(x_1, x_20, x_2, x_3, x_4, x_5, x_9); +x_21 = l_Lean_Elab_Eqns_funext_x3f___lambda__2(x_1, x_20, x_2, x_3, x_4, x_5, x_9); return x_21; } } @@ -21175,7 +21105,7 @@ lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_1); -x_11 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2(x_1, x_10, x_5, x_6, x_7, x_8, x_9); +x_11 = l_Lean_Meta_splitTarget_x3f(x_1, x_10, x_5, x_6, x_7, x_8, x_9); if (lean_obj_tag(x_11) == 0) { lean_object* x_12; @@ -21718,7 +21648,7 @@ lean_inc(x_9); x_10 = lean_ctor_get(x_8, 1); lean_inc(x_10); lean_dec(x_8); -x_11 = l_Lean_commitWhenSome_x3f___at_Lean_Elab_Eqns_funext_x3f___spec__1___at_Lean_Elab_Eqns_funext_x3f___spec__2___closed__1; +x_11 = l_Lean_Elab_Eqns_funext_x3f___lambda__1___closed__1; lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); @@ -24231,12 +24161,12 @@ l_Lean_Elab_Eqns_expandRHS_x3f___closed__1 = _init_l_Lean_Elab_Eqns_expandRHS_x3 lean_mark_persistent(l_Lean_Elab_Eqns_expandRHS_x3f___closed__1); l_Lean_Elab_Eqns_expandRHS_x3f___closed__2 = _init_l_Lean_Elab_Eqns_expandRHS_x3f___closed__2(); lean_mark_persistent(l_Lean_Elab_Eqns_expandRHS_x3f___closed__2); -l_Lean_commitWhenSome_x3f___at_Lean_Elab_Eqns_funext_x3f___spec__1___at_Lean_Elab_Eqns_funext_x3f___spec__2___closed__1 = _init_l_Lean_commitWhenSome_x3f___at_Lean_Elab_Eqns_funext_x3f___spec__1___at_Lean_Elab_Eqns_funext_x3f___spec__2___closed__1(); -lean_mark_persistent(l_Lean_commitWhenSome_x3f___at_Lean_Elab_Eqns_funext_x3f___spec__1___at_Lean_Elab_Eqns_funext_x3f___spec__2___closed__1); l_Lean_Elab_Eqns_funext_x3f___lambda__1___closed__1 = _init_l_Lean_Elab_Eqns_funext_x3f___lambda__1___closed__1(); lean_mark_persistent(l_Lean_Elab_Eqns_funext_x3f___lambda__1___closed__1); -l_Lean_Elab_Eqns_funext_x3f___lambda__1___closed__2 = _init_l_Lean_Elab_Eqns_funext_x3f___lambda__1___closed__2(); -lean_mark_persistent(l_Lean_Elab_Eqns_funext_x3f___lambda__1___closed__2); +l_Lean_Elab_Eqns_funext_x3f___lambda__2___closed__1 = _init_l_Lean_Elab_Eqns_funext_x3f___lambda__2___closed__1(); +lean_mark_persistent(l_Lean_Elab_Eqns_funext_x3f___lambda__2___closed__1); +l_Lean_Elab_Eqns_funext_x3f___lambda__2___closed__2 = _init_l_Lean_Elab_Eqns_funext_x3f___lambda__2___closed__2(); +lean_mark_persistent(l_Lean_Elab_Eqns_funext_x3f___lambda__2___closed__2); l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Eqns_0__Lean_Elab_Eqns_findMatchToSplit_x3f___spec__3___closed__1 = _init_l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Eqns_0__Lean_Elab_Eqns_findMatchToSplit_x3f___spec__3___closed__1(); lean_mark_persistent(l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Eqns_0__Lean_Elab_Eqns_findMatchToSplit_x3f___spec__3___closed__1); l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Eqns_0__Lean_Elab_Eqns_findMatchToSplit_x3f___spec__3___closed__2 = _init_l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Eqns_0__Lean_Elab_Eqns_findMatchToSplit_x3f___spec__3___closed__2(); diff --git a/stage0/stdlib/Lean/Elab/PreDefinition/Structural/Eqns.c b/stage0/stdlib/Lean/Elab/PreDefinition/Structural/Eqns.c index 1bc2fa366e..c016e5dc7a 100644 --- a/stage0/stdlib/Lean/Elab/PreDefinition/Structural/Eqns.c +++ b/stage0/stdlib/Lean/Elab/PreDefinition/Structural/Eqns.c @@ -55,7 +55,6 @@ static lean_object* l___private_Lean_Elab_PreDefinition_Structural_Eqns_0__Lean_ static lean_object* l___private_Lean_Elab_PreDefinition_Structural_Eqns_0__Lean_Elab_Structural_mkProof_go___lambda__1___closed__7; lean_object* l_Lean_mkAppN(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Std_Range_forIn_loop___at_Lean_Elab_Structural_mkEqns___spec__1___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Structural_getUnfoldFor_x3f___lambda__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MapDeclarationExtension_find_x3f___rarg(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Structural_getEqnsFor_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -87,6 +86,7 @@ static lean_object* l_Lean_Elab_Structural_instInhabitedEqnInfo___closed__3; extern lean_object* l_Lean_instInhabitedExpr; static lean_object* l___private_Lean_Elab_PreDefinition_Structural_Eqns_0__Lean_Elab_Structural_mkProof_go___closed__5; static lean_object* l___private_Lean_Elab_PreDefinition_Structural_Eqns_0__Lean_Elab_Structural_mkProof_go___lambda__1___closed__12; +lean_object* l_Lean_Meta_splitTarget_x3f(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Structural_initFn____x40_Lean_Elab_PreDefinition_Structural_Eqns___hyg_1426____closed__2; static lean_object* l_Lean_Elab_Structural_instInhabitedEqnInfo___closed__1; lean_object* l_Lean_Expr_bvar___override(lean_object*); @@ -676,7 +676,7 @@ lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_1); -x_46 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2(x_1, x_45, x_4, x_5, x_6, x_7, x_44); +x_46 = l_Lean_Meta_splitTarget_x3f(x_1, x_45, x_4, x_5, x_6, x_7, x_44); if (lean_obj_tag(x_46) == 0) { lean_object* x_47; diff --git a/stage0/stdlib/Lean/Elab/PreDefinition/WF/Eqns.c b/stage0/stdlib/Lean/Elab/PreDefinition/WF/Eqns.c index 180071f62b..68ad5d9f81 100644 --- a/stage0/stdlib/Lean/Elab/PreDefinition/WF/Eqns.c +++ b/stage0/stdlib/Lean/Elab/PreDefinition/WF/Eqns.c @@ -89,7 +89,6 @@ LEAN_EXPORT lean_object* l_Lean_Elab_WF_getUnfoldFor_x3f___lambda__1(lean_object lean_object* l_Lean_mkAppN(lean_object*, lean_object*); lean_object* l_Lean_Expr_FindImpl_findUnsafe_x3f(lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Elab_PreDefinition_WF_Eqns_0__Lean_Elab_WF_tryToFoldWellFoundedFix_pre___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Elab_PreDefinition_WF_Eqns_0__Lean_Elab_WF_deltaLHSUntilFix___lambda__1___closed__1; lean_object* l_Lean_MapDeclarationExtension_find_x3f___rarg(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT uint8_t l___private_Lean_Elab_PreDefinition_WF_Eqns_0__Lean_Elab_WF_hasWellFoundedFix___lambda__1(lean_object*); @@ -156,6 +155,7 @@ uint8_t l_Lean_Expr_isConstOf(lean_object*, lean_object*); static lean_object* l___private_Lean_Elab_PreDefinition_WF_Eqns_0__Lean_Elab_WF_decodePackedArg_x3f_decodePSum_x3f___closed__3; static lean_object* l___private_Lean_Elab_PreDefinition_WF_Eqns_0__Lean_Elab_WF_decodePackedArg_x3f_decodePSigma___closed__2; LEAN_EXPORT lean_object* l___private_Lean_Elab_PreDefinition_WF_Eqns_0__Lean_Elab_WF_mkProof(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_splitTarget_x3f(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_bvar___override(lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_WF_mkEqns(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_addDecl(lean_object*, lean_object*, lean_object*, lean_object*); @@ -5132,7 +5132,7 @@ lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); lean_inc(x_1); -x_46 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2(x_1, x_45, x_7, x_8, x_9, x_10, x_44); +x_46 = l_Lean_Meta_splitTarget_x3f(x_1, x_45, x_7, x_8, x_9, x_10, x_44); if (lean_obj_tag(x_46) == 0) { lean_object* x_47; diff --git a/stage0/stdlib/Lean/Elab/PreDefinition/WF/Rel.c b/stage0/stdlib/Lean/Elab/PreDefinition/WF/Rel.c index 07a01cc3d3..88b7d95d1a 100644 --- a/stage0/stdlib/Lean/Elab/PreDefinition/WF/Rel.c +++ b/stage0/stdlib/Lean/Elab/PreDefinition/WF/Rel.c @@ -21,6 +21,7 @@ size_t lean_usize_add(size_t, size_t); lean_object* l_Lean_Expr_mvarId_x21(lean_object*); lean_object* l_Lean_FVarId_getUserName(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_WF_getNumCandidateArgs___spec__1___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_WF_elabWFRel_guess___spec__4___rarg___boxed(lean_object**); lean_object* l_Lean_stringToMessageData(lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_WF_elabWFRel_go___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Elab_WF_elabWFRel_go___spec__3___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -63,6 +64,7 @@ static lean_object* l_Subarray_forInUnsafe_loop___at_Lean_Elab_WF_getForbiddenBy lean_object* l_Lean_Name_mkStr2(lean_object*, lean_object*); static lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_WF_elabWFRel_generateElements___spec__2___closed__2; lean_object* l_Lean_Elab_Term_getMVarDecl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_WF_elabWFRel_guess___spec__4___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_toSubarray___rarg(lean_object*, lean_object*, lean_object*); lean_object* lean_array_push(lean_object*, lean_object*); lean_object* lean_array_get_size(lean_object*); @@ -102,7 +104,6 @@ LEAN_EXPORT lean_object* l_Lean_Elab_WF_generateCombinations_x3f___boxed(lean_ob uint8_t lean_nat_dec_eq(lean_object*, lean_object*); lean_object* l_Lean_Expr_mvar___override(lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_WF_getNumCandidateArgs(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_WF_elabWFRel_guess___spec__5___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_st_ref_take(lean_object*, lean_object*); static lean_object* l_Lean_Elab_WF_elabWFRel_go___rarg___lambda__1___closed__4; static lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_WF_elabWFRel_generateElements___spec__2___closed__16; @@ -128,7 +129,6 @@ lean_object* l_Nat_repr(lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_WF_Rel_0__Lean_Elab_WF_unpackUnary___spec__7___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Elab_WF_elabWFRel_go___spec__3___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_WF_elabWFRel_go___rarg___lambda__1___closed__3; -LEAN_EXPORT lean_object* l_Lean_observing_x3f___at_Lean_Elab_WF_elabWFRel_guess___spec__3___at_Lean_Elab_WF_elabWFRel_guess___spec__4(lean_object*); lean_object* l_Lean_Syntax_getId(lean_object*); lean_object* l_Lean_Elab_addMacroStack___at_Lean_Elab_Term_instAddErrorMessageContextTermElabM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Elab_PreDefinition_WF_Rel_0__Lean_Elab_WF_unpackUnary_go___lambda__1___closed__1; @@ -144,7 +144,7 @@ LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_WF_elabWFRel_ge extern lean_object* l_Lean_instInhabitedExpr; LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_WF_Rel_0__Lean_Elab_WF_unpackUnary___spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Elab_PreDefinition_WF_Rel_0__Lean_Elab_WF_getRefFromElems___lambda__1(lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_WF_elabWFRel_guess___spec__5___rarg___boxed(lean_object**); +LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_WF_elabWFRel_guess___spec__4(lean_object*); LEAN_EXPORT lean_object* l_Lean_observing_x3f___at_Lean_Elab_WF_elabWFRel_guess___spec__3___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_WF_elabWFRel_generateElements___closed__6; lean_object* l___private_Init_Util_0__mkPanicMessageWithDecl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -206,7 +206,6 @@ lean_object* l_Lean_Meta_getLevel(lean_object*, lean_object*, lean_object*, lean LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Elab_WF_elabWFRel_go___spec__2___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_WF_Rel_0__Lean_Elab_WF_unpackUnary___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_WF_elabWFRel_generateElements___spec__2___closed__11; -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_WF_elabWFRel_guess___spec__5(lean_object*); lean_object* l_Lean_isTracingEnabledFor___at_Lean_Elab_Term_traceAtCmdPos___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_st_ref_set(lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Elab_PreDefinition_WF_Rel_0__Lean_Elab_WF_unpackUnary_go___closed__3; @@ -223,7 +222,6 @@ lean_object* lean_infer_type(lean_object*, lean_object*, lean_object*, lean_obje lean_object* l_Lean_Syntax_node1(lean_object*, lean_object*, lean_object*); lean_object* lean_panic_fn(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_logUnassignedUsingErrorInfos(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_observing_x3f___at_Lean_Elab_WF_elabWFRel_guess___spec__3___at_Lean_Elab_WF_elabWFRel_guess___spec__4___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_WF_elabWFRel_generateElements___spec__2___boxed(lean_object**); static lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_WF_elabWFRel_generateElements___spec__2___closed__8; static lean_object* l___private_Lean_Elab_PreDefinition_WF_Rel_0__Lean_Elab_WF_unpackUnary_go___lambda__1___closed__3; @@ -9449,101 +9447,7 @@ x_2 = lean_alloc_closure((void*)(l_Lean_observing_x3f___at_Lean_Elab_WF_elabWFRe return x_2; } } -LEAN_EXPORT lean_object* l_Lean_observing_x3f___at_Lean_Elab_WF_elabWFRel_guess___spec__3___at_Lean_Elab_WF_elabWFRel_guess___spec__4___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13) { -_start: -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; -x_14 = l_Lean_Elab_Term_saveState___rarg(x_8, x_9, x_10, x_11, x_12, x_13); -x_15 = lean_ctor_get(x_14, 0); -lean_inc(x_15); -x_16 = lean_ctor_get(x_14, 1); -lean_inc(x_16); -lean_dec(x_14); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_17 = l_Lean_Elab_WF_elabWFRel_go___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_16); -if (lean_obj_tag(x_17) == 0) -{ -uint8_t x_18; -lean_dec(x_15); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -x_18 = !lean_is_exclusive(x_17); -if (x_18 == 0) -{ -lean_object* x_19; lean_object* x_20; -x_19 = lean_ctor_get(x_17, 0); -x_20 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_20, 0, x_19); -lean_ctor_set(x_17, 0, x_20); -return x_17; -} -else -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; -x_21 = lean_ctor_get(x_17, 0); -x_22 = lean_ctor_get(x_17, 1); -lean_inc(x_22); -lean_inc(x_21); -lean_dec(x_17); -x_23 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_23, 0, x_21); -x_24 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_24, 0, x_23); -lean_ctor_set(x_24, 1, x_22); -return x_24; -} -} -else -{ -lean_object* x_25; uint8_t x_26; lean_object* x_27; uint8_t x_28; -x_25 = lean_ctor_get(x_17, 1); -lean_inc(x_25); -lean_dec(x_17); -x_26 = 0; -x_27 = l_Lean_Elab_Term_SavedState_restore(x_15, x_26, x_7, x_8, x_9, x_10, x_11, x_12, x_25); -x_28 = !lean_is_exclusive(x_27); -if (x_28 == 0) -{ -lean_object* x_29; lean_object* x_30; -x_29 = lean_ctor_get(x_27, 0); -lean_dec(x_29); -x_30 = lean_box(0); -lean_ctor_set(x_27, 0, x_30); -return x_27; -} -else -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; -x_31 = lean_ctor_get(x_27, 1); -lean_inc(x_31); -lean_dec(x_27); -x_32 = lean_box(0); -x_33 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_33, 0, x_32); -lean_ctor_set(x_33, 1, x_31); -return x_33; -} -} -} -} -LEAN_EXPORT lean_object* l_Lean_observing_x3f___at_Lean_Elab_WF_elabWFRel_guess___spec__3___at_Lean_Elab_WF_elabWFRel_guess___spec__4(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_observing_x3f___at_Lean_Elab_WF_elabWFRel_guess___spec__3___at_Lean_Elab_WF_elabWFRel_guess___spec__4___rarg), 13, 0); -return x_2; -} -} -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_WF_elabWFRel_guess___spec__5___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, size_t x_9, size_t x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15, lean_object* x_16, lean_object* x_17, lean_object* x_18) { +LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_WF_elabWFRel_guess___spec__4___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, size_t x_9, size_t x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15, lean_object* x_16, lean_object* x_17, lean_object* x_18) { _start: { uint8_t x_19; @@ -9571,7 +9475,7 @@ return x_20; } else { -lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_dec(x_11); x_21 = lean_array_uget(x_8, x_10); lean_inc(x_16); @@ -9582,33 +9486,40 @@ lean_inc(x_23); x_24 = lean_ctor_get(x_22, 1); lean_inc(x_24); lean_dec(x_22); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_25 = lean_alloc_closure((void*)(l_Lean_Elab_WF_elabWFRel_go___rarg), 13, 6); +lean_closure_set(x_25, 0, x_1); +lean_closure_set(x_25, 1, x_2); +lean_closure_set(x_25, 2, x_3); +lean_closure_set(x_25, 3, x_4); +lean_closure_set(x_25, 4, x_5); +lean_closure_set(x_25, 5, x_23); lean_inc(x_17); lean_inc(x_16); lean_inc(x_15); lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_2); -lean_inc(x_1); -x_25 = l_Lean_observing_x3f___at_Lean_Elab_WF_elabWFRel_guess___spec__3___at_Lean_Elab_WF_elabWFRel_guess___spec__4___rarg(x_1, x_2, x_3, x_4, x_5, x_23, x_12, x_13, x_14, x_15, x_16, x_17, x_24); -x_26 = lean_ctor_get(x_25, 0); -lean_inc(x_26); -if (lean_obj_tag(x_26) == 0) -{ -lean_object* x_27; size_t x_28; size_t x_29; -x_27 = lean_ctor_get(x_25, 1); +x_26 = l_Lean_observing_x3f___at_Lean_Elab_WF_elabWFRel_guess___spec__3___rarg(x_25, x_12, x_13, x_14, x_15, x_16, x_17, x_24); +x_27 = lean_ctor_get(x_26, 0); lean_inc(x_27); -lean_dec(x_25); -x_28 = 1; -x_29 = lean_usize_add(x_10, x_28); +if (lean_obj_tag(x_27) == 0) +{ +lean_object* x_28; size_t x_29; size_t x_30; +x_28 = lean_ctor_get(x_26, 1); +lean_inc(x_28); +lean_dec(x_26); +x_29 = 1; +x_30 = lean_usize_add(x_10, x_29); lean_inc(x_7); { -size_t _tmp_9 = x_29; +size_t _tmp_9 = x_30; lean_object* _tmp_10 = x_7; -lean_object* _tmp_17 = x_27; +lean_object* _tmp_17 = x_28; x_10 = _tmp_9; x_11 = _tmp_10; x_18 = _tmp_17; @@ -9617,7 +9528,7 @@ goto _start; } else { -uint8_t x_31; +uint8_t x_32; lean_dec(x_17); lean_dec(x_16); lean_dec(x_15); @@ -9631,78 +9542,78 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_31 = !lean_is_exclusive(x_25); -if (x_31 == 0) +x_32 = !lean_is_exclusive(x_26); +if (x_32 == 0) { -lean_object* x_32; uint8_t x_33; -x_32 = lean_ctor_get(x_25, 0); -lean_dec(x_32); -x_33 = !lean_is_exclusive(x_26); -if (x_33 == 0) +lean_object* x_33; uint8_t x_34; +x_33 = lean_ctor_get(x_26, 0); +lean_dec(x_33); +x_34 = !lean_is_exclusive(x_27); +if (x_34 == 0) { -lean_object* x_34; lean_object* x_35; -x_34 = lean_box(0); -x_35 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_35, 0, x_26); -lean_ctor_set(x_35, 1, x_34); -lean_ctor_set(x_25, 0, x_35); -return x_25; +lean_object* x_35; lean_object* x_36; +x_35 = lean_box(0); +x_36 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_36, 0, x_27); +lean_ctor_set(x_36, 1, x_35); +lean_ctor_set(x_26, 0, x_36); +return x_26; } else { -lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; -x_36 = lean_ctor_get(x_26, 0); -lean_inc(x_36); -lean_dec(x_26); -x_37 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_37, 0, x_36); -x_38 = lean_box(0); -x_39 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_39, 0, x_37); -lean_ctor_set(x_39, 1, x_38); -lean_ctor_set(x_25, 0, x_39); -return x_25; +lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; +x_37 = lean_ctor_get(x_27, 0); +lean_inc(x_37); +lean_dec(x_27); +x_38 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_38, 0, x_37); +x_39 = lean_box(0); +x_40 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_40, 0, x_38); +lean_ctor_set(x_40, 1, x_39); +lean_ctor_set(x_26, 0, x_40); +return x_26; } } else { -lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; -x_40 = lean_ctor_get(x_25, 1); -lean_inc(x_40); -lean_dec(x_25); -x_41 = lean_ctor_get(x_26, 0); +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; +x_41 = lean_ctor_get(x_26, 1); lean_inc(x_41); -if (lean_is_exclusive(x_26)) { - lean_ctor_release(x_26, 0); - x_42 = x_26; +lean_dec(x_26); +x_42 = lean_ctor_get(x_27, 0); +lean_inc(x_42); +if (lean_is_exclusive(x_27)) { + lean_ctor_release(x_27, 0); + x_43 = x_27; } else { - lean_dec_ref(x_26); - x_42 = lean_box(0); + lean_dec_ref(x_27); + x_43 = lean_box(0); } -if (lean_is_scalar(x_42)) { - x_43 = lean_alloc_ctor(1, 1, 0); +if (lean_is_scalar(x_43)) { + x_44 = lean_alloc_ctor(1, 1, 0); } else { - x_43 = x_42; + x_44 = x_43; } -lean_ctor_set(x_43, 0, x_41); -x_44 = lean_box(0); -x_45 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_45, 0, x_43); -lean_ctor_set(x_45, 1, x_44); +lean_ctor_set(x_44, 0, x_42); +x_45 = lean_box(0); x_46 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_46, 0, x_45); -lean_ctor_set(x_46, 1, x_40); -return x_46; +lean_ctor_set(x_46, 0, x_44); +lean_ctor_set(x_46, 1, x_45); +x_47 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_47, 0, x_46); +lean_ctor_set(x_47, 1, x_41); +return x_47; } } } } } -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_WF_elabWFRel_guess___spec__5(lean_object* x_1) { +LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_WF_elabWFRel_guess___spec__4(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Array_forInUnsafe_loop___at_Lean_Elab_WF_elabWFRel_guess___spec__5___rarg___boxed), 18, 0); +x_2 = lean_alloc_closure((void*)(l_Array_forInUnsafe_loop___at_Lean_Elab_WF_elabWFRel_guess___spec__4___rarg___boxed), 18, 0); return x_2; } } @@ -9796,7 +9707,7 @@ lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); lean_inc(x_6); -x_29 = l_Array_forInUnsafe_loop___at_Lean_Elab_WF_elabWFRel_guess___spec__5___rarg(x_1, x_2, x_3, x_4, x_5, x_14, x_28, x_25, x_27, x_18, x_28, x_6, x_7, x_8, x_9, x_10, x_11, x_21); +x_29 = l_Array_forInUnsafe_loop___at_Lean_Elab_WF_elabWFRel_guess___spec__4___rarg(x_1, x_2, x_3, x_4, x_5, x_14, x_28, x_25, x_27, x_18, x_28, x_6, x_7, x_8, x_9, x_10, x_11, x_21); lean_dec(x_25); x_30 = lean_ctor_get(x_29, 0); lean_inc(x_30); @@ -9955,7 +9866,7 @@ lean_dec(x_3); return x_9; } } -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_WF_elabWFRel_guess___spec__5___rarg___boxed(lean_object** _args) { +LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_WF_elabWFRel_guess___spec__4___rarg___boxed(lean_object** _args) { lean_object* x_1 = _args[0]; lean_object* x_2 = _args[1]; lean_object* x_3 = _args[2]; @@ -9981,7 +9892,7 @@ x_19 = lean_unbox_usize(x_9); lean_dec(x_9); x_20 = lean_unbox_usize(x_10); lean_dec(x_10); -x_21 = l_Array_forInUnsafe_loop___at_Lean_Elab_WF_elabWFRel_guess___spec__5___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_19, x_20, x_11, x_12, x_13, x_14, x_15, x_16, x_17, x_18); +x_21 = l_Array_forInUnsafe_loop___at_Lean_Elab_WF_elabWFRel_guess___spec__4___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_19, x_20, x_11, x_12, x_13, x_14, x_15, x_16, x_17, x_18); lean_dec(x_8); return x_21; } diff --git a/stage0/stdlib/Lean/Elab/Quotation.c b/stage0/stdlib/Lean/Elab/Quotation.c index 9bcb0f5f51..396dd8576f 100644 --- a/stage0/stdlib/Lean/Elab/Quotation.c +++ b/stage0/stdlib/Lean/Elab/Quotation.c @@ -687,7 +687,7 @@ LEAN_EXPORT lean_object* l_Lean_Elab_Term_Quotation_addNamedQuotInfo(lean_object static lean_object* l___private_Init_Meta_0__Lean_quoteList___at_Lean_Elab_Term_Quotation_ArrayStxBuilder_build___spec__2___closed__7; static lean_object* l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___lambda__1___closed__9; LEAN_EXPORT lean_object* l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__24(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_Elab_Term_Quotation_initFn____x40_Lean_Elab_Quotation___hyg_19832_(lean_object*); +LEAN_EXPORT lean_object* l_Lean_Elab_Term_Quotation_initFn____x40_Lean_Elab_Quotation___hyg_19839_(lean_object*); static lean_object* l___regBuiltin_Lean_Elab_Term_Quotation_elabQuot____x40_Lean_Elab_Quotation___hyg_8115__declRange___closed__4; LEAN_EXPORT lean_object* l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__23___closed__20; @@ -808,6 +808,7 @@ LEAN_EXPORT lean_object* l_List_beq___at___private_Lean_Elab_Quotation_0__Lean_E LEAN_EXPORT uint8_t l_Lean_HashSetImp_contains___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_checkUnusedAlts___spec__1(lean_object*, lean_object*); static lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___spec__23___closed__44; static lean_object* l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__10___closed__5; +static lean_object* l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__4; static lean_object* l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___lambda__2___closed__16; LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___spec__23___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getSepFromSplice(lean_object*); @@ -967,6 +968,7 @@ static lean_object* l___regBuiltin_Lean_Elab_Term_Quotation_elabQuot____x40_Lean static lean_object* l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___lambda__2___closed__12; static lean_object* l_Lean_Elab_Term_Quotation_instQuotePreresolvedMkStr1___closed__14; static lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___spec__23___lambda__3___closed__21; +static lean_object* l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__5; lean_object* l_Array_mkArray2___rarg(lean_object*, lean_object*); static lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___spec__23___closed__42; static lean_object* l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__16___closed__2; @@ -28129,6 +28131,24 @@ return x_1; static lean_object* _init_l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__2() { _start: { +lean_object* x_1; +x_1 = lean_mk_string_from_bytes("patternIgnore", 13); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__2; +x_3 = l_Lean_Name_str___override(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__4() { +_start: +{ lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); x_2 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___lambda__2___closed__3; @@ -28136,7 +28156,7 @@ x_3 = l_Lean_Name_str___override(x_1, x_2); return x_3; } } -static lean_object* _init_l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__3() { +static lean_object* _init_l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__5() { _start: { lean_object* x_1; @@ -28152,48 +28172,43 @@ lean_dec(x_5); x_82 = l_Lean_Syntax_isAtom(x_1); if (x_82 == 0) { -uint8_t x_83; +lean_object* x_83; uint8_t x_84; +x_83 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__3; lean_inc(x_1); -x_83 = l_Lean_Syntax_isTokenAntiquot(x_1); -if (x_83 == 0) -{ -uint8_t x_84; -lean_inc(x_1); -x_84 = l_Lean_Syntax_isAntiquots(x_1); +x_84 = l_Lean_Syntax_isOfKind(x_1, x_83); if (x_84 == 0) { uint8_t x_85; -x_85 = l_Lean_Syntax_isAntiquotSuffixSplice(x_1); +lean_inc(x_1); +x_85 = l_Lean_Syntax_isTokenAntiquot(x_1); if (x_85 == 0) { uint8_t x_86; -x_86 = l_Lean_Syntax_isAntiquotSplice(x_1); +lean_inc(x_1); +x_86 = l_Lean_Syntax_isAntiquots(x_1); if (x_86 == 0) { -lean_object* x_87; +uint8_t x_87; +x_87 = l_Lean_Syntax_isAntiquotSuffixSplice(x_1); +if (x_87 == 0) +{ +uint8_t x_88; +x_88 = l_Lean_Syntax_isAntiquotSplice(x_1); +if (x_88 == 0) +{ +lean_object* x_89; lean_dec(x_11); lean_dec(x_10); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -x_87 = lean_box(0); -x_13 = x_87; +x_89 = lean_box(0); +x_13 = x_89; goto block_81; } else { -lean_object* x_88; lean_object* x_89; -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_88 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___lambda__1___closed__6; -x_89 = l_Lean_throwErrorAt___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___spec__1(x_1, x_88, x_6, x_7, x_8, x_9, x_10, x_11, x_12); -return x_89; -} -} -else -{ lean_object* x_90; lean_object* x_91; lean_dec(x_4); lean_dec(x_3); @@ -28205,181 +28220,181 @@ return x_91; } else { -lean_object* x_92; uint8_t x_93; -lean_inc(x_1); -x_92 = l_Lean_Syntax_getCanonicalAntiquot(x_1); -x_93 = l_Lean_Syntax_isEscapedAntiquot(x_92); -if (x_93 == 0) -{ -lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; uint8_t x_100; lean_object* x_101; lean_object* x_102; uint8_t x_103; lean_object* x_104; -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -x_94 = l_Lean_Syntax_antiquotKinds(x_1); -x_95 = l_List_unzip___rarg(x_94); -x_96 = lean_ctor_get(x_95, 0); -lean_inc(x_96); -x_97 = lean_ctor_get(x_95, 1); -lean_inc(x_97); -lean_dec(x_95); -x_98 = l_Lean_Syntax_getAntiquotTerm(x_92); -x_99 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___spec__12___closed__2; -lean_inc(x_98); -x_100 = l_Lean_Syntax_isOfKind(x_98, x_99); -x_101 = lean_unsigned_to_nat(3u); -x_102 = l_Lean_Syntax_getArg(x_92, x_101); -lean_dec(x_92); -x_103 = l_Lean_Syntax_isNone(x_102); -lean_dec(x_102); -if (x_100 == 0) -{ -lean_object* x_124; uint8_t x_125; -x_124 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__2; -lean_inc(x_98); -x_125 = l_Lean_Syntax_isOfKind(x_98, x_124); -if (x_125 == 0) -{ -lean_object* x_126; -x_126 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__27___boxed), 9, 1); -lean_closure_set(x_126, 0, x_98); -x_104 = x_126; -goto block_123; -} -else -{ -lean_object* x_127; -lean_inc(x_96); -lean_inc(x_3); -x_127 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__28___boxed), 11, 3); -lean_closure_set(x_127, 0, x_98); -lean_closure_set(x_127, 1, x_3); -lean_closure_set(x_127, 2, x_96); -x_104 = x_127; -goto block_123; -} -} -else -{ -lean_object* x_128; -lean_dec(x_98); -x_128 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___spec__23___closed__1; -x_104 = x_128; -goto block_123; -} -block_123: -{ -if (x_103 == 0) -{ -uint8_t x_105; uint8_t x_106; -x_105 = 1; -x_106 = l_List_foldr___at_List_and___spec__1(x_105, x_97); -lean_dec(x_97); -if (x_106 == 0) -{ -lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; -x_107 = lean_box(0); -lean_inc(x_96); -x_108 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_108, 0, x_96); -lean_ctor_set(x_108, 1, x_107); -lean_inc(x_96); -x_109 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__25___boxed), 3, 2); -lean_closure_set(x_109, 0, x_96); -lean_closure_set(x_109, 1, x_104); -x_110 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__26___boxed), 12, 3); -lean_closure_set(x_110, 0, x_3); -lean_closure_set(x_110, 1, x_2); -lean_closure_set(x_110, 2, x_96); -x_111 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_111, 0, x_108); -lean_ctor_set(x_111, 1, x_109); -lean_ctor_set(x_111, 2, x_110); -x_112 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_112, 0, x_111); -lean_ctor_set(x_112, 1, x_12); -return x_112; -} -else -{ -lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; -lean_dec(x_96); -lean_dec(x_2); -x_113 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__4), 2, 1); -lean_closure_set(x_113, 0, x_104); -x_114 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__5___boxed), 10, 1); -lean_closure_set(x_114, 0, x_3); -x_115 = lean_box(0); -x_116 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_116, 0, x_115); -lean_ctor_set(x_116, 1, x_113); -lean_ctor_set(x_116, 2, x_114); -x_117 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_117, 0, x_116); -lean_ctor_set(x_117, 1, x_12); -return x_117; -} -} -else -{ -lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; -lean_dec(x_97); -lean_dec(x_96); -lean_dec(x_2); -x_118 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__4), 2, 1); -lean_closure_set(x_118, 0, x_104); -x_119 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__5___boxed), 10, 1); -lean_closure_set(x_119, 0, x_3); -x_120 = lean_box(0); -x_121 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_121, 0, x_120); -lean_ctor_set(x_121, 1, x_118); -lean_ctor_set(x_121, 2, x_119); -x_122 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_122, 0, x_121); -lean_ctor_set(x_122, 1, x_12); -return x_122; -} -} -} -else -{ -uint8_t x_129; -lean_dec(x_92); -x_129 = l_Lean_Syntax_isAntiquotSuffixSplice(x_1); -if (x_129 == 0) -{ -uint8_t x_130; -x_130 = l_Lean_Syntax_isAntiquotSplice(x_1); -if (x_130 == 0) -{ -lean_object* x_131; -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -x_131 = lean_box(0); -x_13 = x_131; -goto block_81; -} -else -{ -lean_object* x_132; lean_object* x_133; +lean_object* x_92; lean_object* x_93; lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_132 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___lambda__1___closed__6; -x_133 = l_Lean_throwErrorAt___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___spec__1(x_1, x_132, x_6, x_7, x_8, x_9, x_10, x_11, x_12); -return x_133; +x_92 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___lambda__1___closed__6; +x_93 = l_Lean_throwErrorAt___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___spec__1(x_1, x_92, x_6, x_7, x_8, x_9, x_10, x_11, x_12); +return x_93; } } else { +lean_object* x_94; uint8_t x_95; +lean_inc(x_1); +x_94 = l_Lean_Syntax_getCanonicalAntiquot(x_1); +x_95 = l_Lean_Syntax_isEscapedAntiquot(x_94); +if (x_95 == 0) +{ +lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; uint8_t x_102; lean_object* x_103; lean_object* x_104; uint8_t x_105; lean_object* x_106; +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +x_96 = l_Lean_Syntax_antiquotKinds(x_1); +x_97 = l_List_unzip___rarg(x_96); +x_98 = lean_ctor_get(x_97, 0); +lean_inc(x_98); +x_99 = lean_ctor_get(x_97, 1); +lean_inc(x_99); +lean_dec(x_97); +x_100 = l_Lean_Syntax_getAntiquotTerm(x_94); +x_101 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___spec__12___closed__2; +lean_inc(x_100); +x_102 = l_Lean_Syntax_isOfKind(x_100, x_101); +x_103 = lean_unsigned_to_nat(3u); +x_104 = l_Lean_Syntax_getArg(x_94, x_103); +lean_dec(x_94); +x_105 = l_Lean_Syntax_isNone(x_104); +lean_dec(x_104); +if (x_102 == 0) +{ +lean_object* x_126; uint8_t x_127; +x_126 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__4; +lean_inc(x_100); +x_127 = l_Lean_Syntax_isOfKind(x_100, x_126); +if (x_127 == 0) +{ +lean_object* x_128; +x_128 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__27___boxed), 9, 1); +lean_closure_set(x_128, 0, x_100); +x_106 = x_128; +goto block_125; +} +else +{ +lean_object* x_129; +lean_inc(x_98); +lean_inc(x_3); +x_129 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__28___boxed), 11, 3); +lean_closure_set(x_129, 0, x_100); +lean_closure_set(x_129, 1, x_3); +lean_closure_set(x_129, 2, x_98); +x_106 = x_129; +goto block_125; +} +} +else +{ +lean_object* x_130; +lean_dec(x_100); +x_130 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___spec__23___closed__1; +x_106 = x_130; +goto block_125; +} +block_125: +{ +if (x_105 == 0) +{ +uint8_t x_107; uint8_t x_108; +x_107 = 1; +x_108 = l_List_foldr___at_List_and___spec__1(x_107, x_99); +lean_dec(x_99); +if (x_108 == 0) +{ +lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; +x_109 = lean_box(0); +lean_inc(x_98); +x_110 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_110, 0, x_98); +lean_ctor_set(x_110, 1, x_109); +lean_inc(x_98); +x_111 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__25___boxed), 3, 2); +lean_closure_set(x_111, 0, x_98); +lean_closure_set(x_111, 1, x_106); +x_112 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__26___boxed), 12, 3); +lean_closure_set(x_112, 0, x_3); +lean_closure_set(x_112, 1, x_2); +lean_closure_set(x_112, 2, x_98); +x_113 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_113, 0, x_110); +lean_ctor_set(x_113, 1, x_111); +lean_ctor_set(x_113, 2, x_112); +x_114 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_114, 0, x_113); +lean_ctor_set(x_114, 1, x_12); +return x_114; +} +else +{ +lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; +lean_dec(x_98); +lean_dec(x_2); +x_115 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__4), 2, 1); +lean_closure_set(x_115, 0, x_106); +x_116 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__5___boxed), 10, 1); +lean_closure_set(x_116, 0, x_3); +x_117 = lean_box(0); +x_118 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_118, 0, x_117); +lean_ctor_set(x_118, 1, x_115); +lean_ctor_set(x_118, 2, x_116); +x_119 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_119, 0, x_118); +lean_ctor_set(x_119, 1, x_12); +return x_119; +} +} +else +{ +lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; +lean_dec(x_99); +lean_dec(x_98); +lean_dec(x_2); +x_120 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__4), 2, 1); +lean_closure_set(x_120, 0, x_106); +x_121 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__5___boxed), 10, 1); +lean_closure_set(x_121, 0, x_3); +x_122 = lean_box(0); +x_123 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_123, 0, x_122); +lean_ctor_set(x_123, 1, x_120); +lean_ctor_set(x_123, 2, x_121); +x_124 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_124, 0, x_123); +lean_ctor_set(x_124, 1, x_12); +return x_124; +} +} +} +else +{ +uint8_t x_131; +lean_dec(x_94); +x_131 = l_Lean_Syntax_isAntiquotSuffixSplice(x_1); +if (x_131 == 0) +{ +uint8_t x_132; +x_132 = l_Lean_Syntax_isAntiquotSplice(x_1); +if (x_132 == 0) +{ +lean_object* x_133; +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +x_133 = lean_box(0); +x_13 = x_133; +goto block_81; +} +else +{ lean_object* x_134; lean_object* x_135; lean_dec(x_4); lean_dec(x_3); @@ -28389,11 +28404,22 @@ x_135 = l_Lean_throwErrorAt___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term return x_135; } } +else +{ +lean_object* x_136; lean_object* x_137; +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_136 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___lambda__1___closed__6; +x_137 = l_Lean_throwErrorAt___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___spec__1(x_1, x_136, x_6, x_7, x_8, x_9, x_10, x_11, x_12); +return x_137; +} +} } } else { -lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; +lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_dec(x_11); lean_dec(x_10); lean_dec(x_9); @@ -28403,27 +28429,27 @@ lean_dec(x_6); lean_dec(x_4); lean_dec(x_2); lean_inc(x_3); -x_136 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__29___boxed), 10, 2); -lean_closure_set(x_136, 0, x_1); -lean_closure_set(x_136, 1, x_3); -x_137 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__4), 2, 1); -lean_closure_set(x_137, 0, x_136); -x_138 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__5___boxed), 10, 1); -lean_closure_set(x_138, 0, x_3); -x_139 = lean_box(0); -x_140 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_140, 0, x_139); -lean_ctor_set(x_140, 1, x_137); -lean_ctor_set(x_140, 2, x_138); -x_141 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_141, 0, x_140); -lean_ctor_set(x_141, 1, x_12); -return x_141; +x_138 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__29___boxed), 10, 2); +lean_closure_set(x_138, 0, x_1); +lean_closure_set(x_138, 1, x_3); +x_139 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__4), 2, 1); +lean_closure_set(x_139, 0, x_138); +x_140 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__5___boxed), 10, 1); +lean_closure_set(x_140, 0, x_3); +x_141 = lean_box(0); +x_142 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_142, 0, x_141); +lean_ctor_set(x_142, 1, x_139); +lean_ctor_set(x_142, 2, x_140); +x_143 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_143, 0, x_142); +lean_ctor_set(x_143, 1, x_12); +return x_143; } } else { -lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; +lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_dec(x_11); lean_dec(x_10); lean_dec(x_9); @@ -28433,18 +28459,44 @@ lean_dec(x_6); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_142 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__5___boxed), 10, 1); -lean_closure_set(x_142, 0, x_3); -x_143 = lean_box(0); -x_144 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__3; -x_145 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_145, 0, x_143); -lean_ctor_set(x_145, 1, x_144); -lean_ctor_set(x_145, 2, x_142); -x_146 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_146, 0, x_145); -lean_ctor_set(x_146, 1, x_12); -return x_146; +x_144 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__5___boxed), 10, 1); +lean_closure_set(x_144, 0, x_3); +x_145 = lean_box(0); +x_146 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__5; +x_147 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_147, 0, x_145); +lean_ctor_set(x_147, 1, x_146); +lean_ctor_set(x_147, 2, x_144); +x_148 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_148, 0, x_147); +lean_ctor_set(x_148, 1, x_12); +return x_148; +} +} +else +{ +lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_149 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__5___boxed), 10, 1); +lean_closure_set(x_149, 0, x_3); +x_150 = lean_box(0); +x_151 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__5; +x_152 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_152, 0, x_150); +lean_ctor_set(x_152, 1, x_151); +lean_ctor_set(x_152, 2, x_149); +x_153 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_153, 0, x_152); +lean_ctor_set(x_153, 1, x_12); +return x_153; } block_81: { @@ -28764,7 +28816,7 @@ x_17 = l_Lean_Syntax_isOfKind(x_14, x_16); if (x_17 == 0) { lean_object* x_18; uint8_t x_19; -x_18 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__2; +x_18 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__4; lean_inc(x_14); x_19 = l_Lean_Syntax_isOfKind(x_14, x_18); if (x_19 == 0) @@ -29015,7 +29067,7 @@ lean_dec(x_2); x_79 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__5___boxed), 10, 1); lean_closure_set(x_79, 0, x_9); x_80 = lean_box(0); -x_81 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__3; +x_81 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__5; x_82 = lean_alloc_ctor(0, 3, 0); lean_ctor_set(x_82, 0, x_80); lean_ctor_set(x_82, 1, x_81); @@ -29141,7 +29193,7 @@ x_111 = l_Lean_Syntax_isOfKind(x_108, x_110); if (x_111 == 0) { lean_object* x_112; uint8_t x_113; -x_112 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__2; +x_112 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__4; lean_inc(x_108); x_113 = l_Lean_Syntax_isOfKind(x_108, x_112); if (x_113 == 0) @@ -29359,7 +29411,7 @@ lean_dec(x_2); x_165 = lean_alloc_closure((void*)(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__5___boxed), 10, 1); lean_closure_set(x_165, 0, x_9); x_166 = lean_box(0); -x_167 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__3; +x_167 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__5; x_168 = lean_alloc_ctor(0, 3, 0); lean_ctor_set(x_168, 0, x_166); lean_ctor_set(x_168, 1, x_167); @@ -30612,7 +30664,7 @@ else lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; x_17 = lean_unsigned_to_nat(0u); x_18 = l_Lean_Syntax_getArg(x_12, x_17); -x_19 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__2; +x_19 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__4; x_20 = l_Lean_Syntax_isOfKind(x_18, x_19); if (x_20 == 0) { @@ -30685,7 +30737,7 @@ else lean_object* x_38; lean_object* x_39; lean_object* x_40; uint8_t x_41; x_38 = lean_unsigned_to_nat(0u); x_39 = l_Lean_Syntax_getArg(x_33, x_38); -x_40 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__2; +x_40 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__4; x_41 = l_Lean_Syntax_isOfKind(x_39, x_40); if (x_41 == 0) { @@ -36444,7 +36496,7 @@ else lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; x_15 = lean_unsigned_to_nat(0u); x_16 = l_Lean_Syntax_getArg(x_2, x_15); -x_17 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__2; +x_17 = l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__4; lean_inc(x_16); x_18 = l_Lean_Syntax_isOfKind(x_16, x_17); if (x_18 == 0) @@ -38763,7 +38815,7 @@ x_4 = l_Lean_addBuiltinDeclarationRanges(x_2, x_3, x_1); return x_4; } } -LEAN_EXPORT lean_object* l_Lean_Elab_Term_Quotation_initFn____x40_Lean_Elab_Quotation___hyg_19832_(lean_object* x_1) { +LEAN_EXPORT lean_object* l_Lean_Elab_Term_Quotation_initFn____x40_Lean_Elab_Quotation___hyg_19839_(lean_object* x_1) { _start: { lean_object* x_2; uint8_t x_3; lean_object* x_4; @@ -40333,6 +40385,10 @@ l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda lean_mark_persistent(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__2); l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__3 = _init_l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__3(); lean_mark_persistent(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__3); +l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__4 = _init_l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__4(); +lean_mark_persistent(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__4); +l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__5 = _init_l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__5(); +lean_mark_persistent(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__30___closed__5); l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___closed__1 = _init_l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___closed__1(); lean_mark_persistent(l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___closed__1); l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___closed__2 = _init_l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___closed__2(); @@ -40489,7 +40545,7 @@ lean_mark_persistent(l___regBuiltin_Lean_Elab_Term_Quotation_elabNoErrorIfUnused res = l___regBuiltin_Lean_Elab_Term_Quotation_elabNoErrorIfUnused_declRange(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); -res = l_Lean_Elab_Term_Quotation_initFn____x40_Lean_Elab_Quotation___hyg_19832_(lean_io_mk_world()); +res = l_Lean_Elab_Term_Quotation_initFn____x40_Lean_Elab_Quotation___hyg_19839_(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); return lean_io_result_mk_ok(lean_box(0)); diff --git a/stage0/stdlib/Lean/Elab/Syntax.c b/stage0/stdlib/Lean/Elab/Syntax.c index f4e00022b1..ea7869362c 100644 --- a/stage0/stdlib/Lean/Elab/Syntax.c +++ b/stage0/stdlib/Lean/Elab/Syntax.c @@ -18,18 +18,21 @@ static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyn lean_object* l_List_reverse___rarg(lean_object*); uint8_t l_Lean_Syntax_isQuot(lean_object*); static lean_object* l_Lean_Elab_Term_toParserDescr_process___closed__9; +static lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__5; lean_object* l_Lean_mkCIdentFrom(lean_object*, lean_object*, uint8_t); static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__25; LEAN_EXPORT lean_object* l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Term_toParserDescr_processNonReserved___spec__1___rarg(lean_object*); LEAN_EXPORT lean_object* l_Lean_throwErrorAt___at_Lean_Elab_Term_elabParserName_x3f___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Command_elabSyntax___lambda__4___closed__16; LEAN_EXPORT lean_object* l_Lean_throwMaxRecDepthAt___at_Lean_Elab_Term_toParserDescr_process___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__12; static lean_object* l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__9; static lean_object* l_Lean_Elab_Term_toParserDescr_processNonReserved___closed__2; static lean_object* l_Lean_Elab_Command_inferMacroRulesAltKind___closed__1; size_t lean_usize_add(size_t, size_t); static lean_object* l_Lean_Elab_Term_toParserDescr_process___closed__4; LEAN_EXPORT lean_object* l_Lean_throwErrorAt___at_Lean_Elab_Command_elabSyntax___spec__13(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__11; LEAN_EXPORT lean_object* l_Lean_throwMaxRecDepthAt___at_Lean_Elab_Term_toParserDescr_process___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Command_resolveSyntaxKind___closed__1; lean_object* l_Lean_registerTraceClass(lean_object*, uint8_t, lean_object*); @@ -91,7 +94,6 @@ lean_object* l_Lean_SourceInfo_fromRef(lean_object*, uint8_t); static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__23; static lean_object* l_Lean_Elab_Command_elabSyntax___lambda__4___closed__12; lean_object* l___private_Init_Util_0__outOfBounds___rarg(lean_object*); -static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__72; static lean_object* l_Lean_Elab_Term_toParserDescr_process___closed__2; extern lean_object* l_Lean_Elab_Command_commandElabAttribute; extern lean_object* l_Lean_maxRecDepthErrorMessage; @@ -109,7 +111,6 @@ static lean_object* l_Lean_Elab_Term_toParserDescr_processSepBy1___lambda__1___c lean_object* l_Lean_Parser_getParserAliasInfo(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Term_toParserDescr_ensureNoPrec(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_node2(lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___closed__12; static lean_object* l_Lean_Elab_Term_toParserDescr_processAtom___lambda__1___closed__6; static lean_object* l_Lean_Elab_Term_toParserDescr_processSepBy1___lambda__1___closed__4; static lean_object* l_Lean_Elab_Command_checkRuleKind___closed__2; @@ -132,10 +133,12 @@ uint8_t lean_name_eq(lean_object*, lean_object*); static lean_object* l_Lean_Elab_Term_toParserDescr_process___closed__5; static lean_object* l_Lean_Elab_Term_toParserDescr_processNonReserved___closed__11; LEAN_EXPORT lean_object* l_Lean_Elab_Term_toParserDescr_processNonReserved(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__3; static lean_object* l_Lean_Elab_Term_ensureUnaryOutput___closed__9; static lean_object* l_Lean_Elab_Command_expandNoKindMacroRulesAux___lambda__1___closed__6; static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__22; static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___closed__1; +LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__1(size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkIdentFrom(lean_object*, lean_object*, uint8_t); static lean_object* l_Lean_Elab_Term_ensureUnaryOutput___closed__4; @@ -155,8 +158,8 @@ static lean_object* l_Lean_Elab_Term_ensureUnaryOutput___closed__16; static lean_object* l_Lean_Elab_Term_toParserDescr_processSepBy1___lambda__1___closed__8; lean_object* l_Array_toSubarray___rarg(lean_object*, lean_object*, lean_object*); lean_object* lean_array_push(lean_object*, lean_object*); -static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___closed__5; lean_object* lean_array_get_size(lean_object*); +static lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___closed__2; static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__5; LEAN_EXPORT lean_object* l_Lean_Elab_Term_toParserDescr_processSepBy___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_string_append(lean_object*, lean_object*); @@ -173,10 +176,8 @@ LEAN_EXPORT lean_object* l_Lean_Elab_Term_toParserDescr_processSeq___lambda__1(l LEAN_EXPORT lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Term_toParserDescr_processSepBy1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Term_toParserDescr_processNonReserved___closed__19; -static lean_object* l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__7; LEAN_EXPORT lean_object* l_Lean_Elab_liftMacroM___at_Lean_Elab_Command_elabSyntax___spec__4(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Term_withNotFirst(lean_object*); -static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___closed__13; static lean_object* l_Lean_Elab_Command_elabDeclareSyntaxCat___closed__1; LEAN_EXPORT lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Command_expandNoKindMacroRulesAux___spec__2(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__5; @@ -226,8 +227,8 @@ static lean_object* l_Lean_Elab_Command_elabDeclareSyntaxCat___closed__4; static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__27; static lean_object* l_Lean_Elab_Term_ensureUnaryOutput___closed__11; LEAN_EXPORT lean_object* l_Lean_throwMaxRecDepthAt___at_Lean_Elab_Command_elabSyntax___spec__7(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_zip___rarg(lean_object*, lean_object*); static lean_object* l_Lean_Elab_Term_checkLeftRec___closed__1; -static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___closed__8; lean_object* lean_string_utf8_next(lean_object*, lean_object*); static lean_object* l_Lean_Elab_Term_toParserDescr_processNullaryOrCat___closed__6; LEAN_EXPORT lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Command_mkNameFromParserSyntax_visit___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -247,7 +248,6 @@ static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyn static lean_object* l_Lean_Elab_Term_ensureUnaryOutput___closed__19; static lean_object* l_Lean_Elab_Term_toParserDescr_processNonReserved___closed__4; extern lean_object* l_Lean_inheritedTraceOptions; -static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___closed__9; static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__11; LEAN_EXPORT lean_object* l_Lean_Elab_Term_toParserDescr_processAtom___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_List_forM___at_Lean_Elab_Term_checkLeftRec___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -255,7 +255,6 @@ lean_object* lean_array_fget(lean_object*, lean_object*); static lean_object* l_Lean_Elab_Command_elabSyntax___lambda__4___closed__10; static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__36; static lean_object* l_Lean_Elab_Term_addCategoryInfo___closed__1; -static lean_object* l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__11; LEAN_EXPORT lean_object* l_Lean_Elab_liftMacroM___at_Lean_Elab_Term_toParserDescr_process___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Elab_Command_expandNoKindMacroRulesAux___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Command_inferMacroRulesAltKind___spec__1(lean_object*, lean_object*); @@ -277,6 +276,7 @@ static lean_object* l_Lean_Elab_Term_toParserDescr_processNullaryOrCat___closed_ static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__51; static lean_object* l_Lean_Elab_Command_elabDeclareSyntaxCat___closed__9; lean_object* l_Lean_Elab_expandMacroImpl_x3f(lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__2; LEAN_EXPORT lean_object* l___regBuiltin_Lean_Elab_Command_elabSyntaxAbbrev(lean_object*); lean_object* lean_st_ref_take(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Term_checkLeftRec___spec__8___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -285,6 +285,7 @@ static lean_object* l___regBuiltin_Lean_Elab_Command_elabSyntax_declRange___clos lean_object* lean_nat_sub(lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_Elab_Command_elabSyntaxAbbrev___closed__2; static lean_object* l_Lean_Elab_Command_elabSyntax___lambda__4___closed__7; +LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6(size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_Elab_Command_elabDeclareSyntaxCat_declRange___closed__4; static lean_object* l_Lean_Elab_Term_toParserDescr_processNullaryOrCat___closed__8; LEAN_EXPORT lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Term_markAsTrailingParser___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -298,13 +299,13 @@ LEAN_EXPORT lean_object* l_Lean_throwErrorAt___at_Lean_Elab_Term_checkLeftRec___ LEAN_EXPORT lean_object* l_Array_mapIdxM_map___at_Lean_Elab_Term_toParserDescr_processSeq___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Elab_Term_toParserDescr_process___spec__7___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__5(size_t, size_t, lean_object*); -static lean_object* l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__9; static lean_object* l_Lean_Elab_Command_elabSyntax___lambda__3___closed__1; static lean_object* l_Lean_Elab_Term_elabParserName_x3f___closed__1; static lean_object* l_Lean_Elab_Term_toParserDescr_processParserCategory___lambda__1___closed__2; LEAN_EXPORT lean_object* l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Term_toParserDescr_process___spec__5___rarg(lean_object*); static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__38; static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__21; +static lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__7; static lean_object* l_Lean_Elab_Term_toParserDescr_processParserCategory___lambda__1___closed__5; static lean_object* l_Lean_Elab_Term_toParserDescr_processSepBy1___lambda__1___closed__12; lean_object* l_Lean_Name_toString(lean_object*, uint8_t); @@ -316,7 +317,7 @@ static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyn lean_object* l_Lean_Syntax_node7(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_String_capitalize(lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Term_ensureUnaryOutput(lean_object*); -LEAN_EXPORT lean_object* l_Lean_Elab_Command_initFn____x40_Lean_Elab_Syntax___hyg_12268_(lean_object*); +LEAN_EXPORT lean_object* l_Lean_Elab_Command_initFn____x40_Lean_Elab_Syntax___hyg_12717_(lean_object*); static lean_object* l_Lean_Elab_Term_toParserDescr_process___closed__13; static lean_object* l_Lean_Elab_Term_toParserDescr_processNonReserved___closed__7; static lean_object* l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__2; @@ -345,7 +346,6 @@ LEAN_EXPORT lean_object* l_Lean_throwMaxRecDepthAt___at_Lean_Elab_Command_elabSy lean_object* lean_st_mk_ref(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_panic___at_Lean_Elab_Term_toParserDescr_processAlias___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_panic___at_Lean_Elab_Term_toParserDescr_processAlias___spec__2___closed__1; -static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___closed__3; LEAN_EXPORT lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Term_withNestedParser(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_getId(lean_object*); static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__1; @@ -360,10 +360,9 @@ static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyn LEAN_EXPORT lean_object* l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Command_elabSyntax___spec__12(lean_object*, lean_object*); static lean_object* l_Lean_Elab_Term_checkLeftRec___lambda__2___closed__1; lean_object* l_Lean_Elab_Command_runTermElabM___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___closed__10; LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Elab_Term_checkLeftRec___spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_addBuiltinDeclarationRanges(lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__8; lean_object* l_Lean_addMessageContextPartial___at_Lean_Elab_Command_instAddMessageContextCommandElabM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Command_elabSyntax___spec__12___rarg(lean_object*); LEAN_EXPORT lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Command_mkNameFromParserSyntax_visit___spec__1(lean_object*, size_t, size_t, lean_object*); @@ -373,16 +372,18 @@ static lean_object* l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_ uint8_t l_Lean_Environment_contains(lean_object*, lean_object*); static lean_object* l_Lean_Elab_Term_toParserDescr_processSepBy___lambda__1___closed__5; static lean_object* l_Lean_Elab_Term_toParserDescr_process___closed__6; +static lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___closed__1; static lean_object* l_Lean_Elab_Term_toParserDescr_processSepBy___lambda__1___closed__3; LEAN_EXPORT lean_object* l_Lean_Elab_throwUnsupportedSyntax___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Term_toParserDescr_processParserCategory___lambda__1___closed__7; +static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__10; uint32_t lean_string_utf8_get(lean_object*, lean_object*); static lean_object* l_Lean_Elab_Term_toParserDescr_processNonReserved___closed__10; static lean_object* l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__7; lean_object* l_Lean_Syntax_mkStrLit(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Command_elabSyntax___lambda__4___closed__8; -static lean_object* l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__5; +static lean_object* l_Lean_Elab_Command_initFn____x40_Lean_Elab_Syntax___hyg_12717____closed__1; static lean_object* l_Lean_Elab_Term_toParserDescr_processNonReserved___closed__20; static lean_object* l_Lean_Elab_Command_elabSyntax___lambda__4___closed__4; static lean_object* l_Lean_Elab_Term_toParserDescr_processNullaryOrCat___closed__1; @@ -407,8 +408,6 @@ static lean_object* l_Lean_Elab_Term_addCategoryInfo___closed__2; static lean_object* l_Lean_Elab_Term_ensureUnaryOutput___closed__21; lean_object* l_Lean_Elab_Command_elabCommand(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Elab_Command_elabSyntax___spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___closed__6; -static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___closed__4; lean_object* l_Lean_evalOptPrio(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Term_toParserDescr_processNonReserved___closed__12; lean_object* l_Lean_ResolveName_resolveGlobalName(lean_object*, lean_object*, lean_object*, lean_object*); @@ -446,6 +445,7 @@ static lean_object* l_Lean_Elab_Command_elabSyntax___lambda__10___closed__2; LEAN_EXPORT lean_object* l_Lean_Elab_checkSyntaxNodeKindAtNamespaces___at_Lean_Elab_Command_resolveSyntaxKind___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Term_toParserDescr_processSepBy1___lambda__1___closed__7; static lean_object* l_Lean_Elab_Command_elabSyntax___lambda__8___closed__1; +static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__5; LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processSeq___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_node6(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_evalPrec(lean_object*, lean_object*, lean_object*); @@ -471,6 +471,8 @@ LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDesc static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__61; LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Elab_Term_elabParserName___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_getQuotContent(lean_object*); +LEAN_EXPORT lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2(lean_object*, lean_object*, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__3; LEAN_EXPORT lean_object* l_Lean_Elab_Command_mkNameFromParserSyntax_appendCatName(lean_object*, lean_object*); uint8_t lean_uint32_dec_eq(uint32_t, uint32_t); static lean_object* l_Lean_Elab_Command_elabDeclareSyntaxCat___closed__3; @@ -481,6 +483,7 @@ lean_object* l_Lean_Name_getString_x21(lean_object*); lean_object* l_String_intercalate(lean_object*, lean_object*); static lean_object* l_Lean_Elab_Term_ensureUnaryOutput___closed__6; uint8_t l_Lean_Name_isStr(lean_object*); +static lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__6; static lean_object* l_Lean_Elab_Command_elabDeclareSyntaxCat___closed__15; static lean_object* l_Lean_Elab_Command_elabSyntax___closed__4; LEAN_EXPORT lean_object* l_Lean_setEnv___at_Lean_Elab_Command_elabDeclareSyntaxCat___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); @@ -492,6 +495,7 @@ uint8_t l_String_isEmpty(lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Term_toParserDescr_processSepBy1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Term_toParserDescr_processAlias___spec__3(lean_object*, size_t, size_t, lean_object*); static lean_object* l_Lean_Elab_Term_toParserDescr_processNonReserved___closed__14; +static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__7; lean_object* l_Lean_Syntax_getNumArgs(lean_object*); extern lean_object* l_Lean_Elab_Term_instMonadTermElabM; static lean_object* l_Lean_Elab_Term_toParserDescr_processAtom___lambda__1___closed__1; @@ -547,7 +551,6 @@ lean_object* l_Lean_quoteNameMk(lean_object*); uint8_t l___private_Lean_Parser_Basic_0__Lean_Parser_beqLeadingIdentBehavior____x40_Lean_Parser_Basic___hyg_10586_(uint8_t, uint8_t); static lean_object* l_Lean_Elab_Command_elabSyntax___closed__1; LEAN_EXPORT lean_object* l_Lean_Elab_Term_checkLeftRec(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___closed__11; LEAN_EXPORT lean_object* l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Command_inferMacroRulesAltKind___spec__2___rarg(lean_object*); static lean_object* l_Lean_Elab_Term_toParserDescr_processNullaryOrCat___closed__9; static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__58; @@ -567,9 +570,11 @@ LEAN_EXPORT lean_object* l_Array_mapIdxM_map___at_Lean_Elab_Term_toParserDescr_p lean_object* l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__2___rarg___boxed(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Command_elabSyntax___lambda__4___closed__14; LEAN_EXPORT lean_object* l_Lean_Elab_Term_elabParserName_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Command_elabDeclareSyntaxCat___closed__14; static lean_object* l_Lean_Elab_Command_elabSyntax___closed__2; static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__26; +static lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__1; LEAN_EXPORT lean_object* l_Lean_Elab_Term_toParserDescr_processParserCategory(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_Elab_Command_elabDeclareSyntaxCat_declRange___closed__5; lean_object* l_Lean_Elab_Command_getMainModule___rarg(lean_object*, lean_object*); @@ -594,6 +599,7 @@ LEAN_EXPORT lean_object* l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Term_ static lean_object* l_Lean_Elab_Term_toParserDescr_processNonReserved___closed__22; lean_object* lean_st_ref_set(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Command_elabDeclareSyntaxCat___closed__16; +static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__9; LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Elab_Term_elabParserName_x3f___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_isTracingEnabledFor___at_Lean_Elab_Term_checkLeftRec___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Term_ensureUnaryOutput___closed__14; @@ -613,7 +619,6 @@ static lean_object* l___regBuiltin_Lean_Elab_Command_elabDeclareSyntaxCat___clos LEAN_EXPORT lean_object* l_Lean_throwErrorAt___at_Lean_Elab_Command_elabSyntax___spec__10(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Syntax_isNone(lean_object*); static lean_object* l_Lean_Elab_Term_ensureUnaryOutput___closed__5; -static lean_object* l_Lean_Elab_Command_initFn____x40_Lean_Elab_Syntax___hyg_12268____closed__1; static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__53; static lean_object* l_Lean_Elab_Term_toParserDescr_processNonReserved___closed__24; static lean_object* l_Lean_Elab_Term_ensureUnaryOutput___closed__18; @@ -624,10 +629,11 @@ static lean_object* l___regBuiltin_Lean_Elab_Command_elabSyntaxAbbrev_declRange_ LEAN_EXPORT lean_object* l_Lean_Elab_Command_elabSyntaxAbbrev(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_String_trim(lean_object*); static lean_object* l_Lean_Elab_Term_ensureUnaryOutput___closed__15; -static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___closed__7; +static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__8; static lean_object* l_Lean_Elab_Term_ensureUnaryOutput___closed__3; static lean_object* l___regBuiltin_Lean_Elab_Command_elabDeclareSyntaxCat_declRange___closed__3; static lean_object* l_Lean_Elab_Term_toParserDescr_processParserCategory___closed__1; +static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__4; LEAN_EXPORT lean_object* l_Lean_Elab_Term_expandOptPrecedence(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwErrorAt___at_Lean_Elab_Term_elabParserName___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Term_toParserDescr_isValidAtom___boxed(lean_object*); @@ -636,6 +642,7 @@ static lean_object* l_Lean_Elab_Command_elabSyntax___lambda__4___closed__2; uint8_t l_Lean_Syntax_isOfKind(lean_object*, lean_object*); static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__28; static lean_object* l_Lean_Elab_Term_toParserDescr_processNonReserved___closed__16; +lean_object* l_Lean_TSyntax_getString(lean_object*); static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__14; LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Elab_Term_toParserDescr_process___spec__7(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Term_toParserDescr_processSepBy___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -643,6 +650,7 @@ static lean_object* l_Lean_Elab_Command_elabSyntax___lambda__9___closed__1; LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Elab_Term_toParserDescr_process___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Elab_Term_elabParserName___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__55; +static lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__10; static lean_object* l_Lean_Elab_Term_toParserDescr_processNullaryOrCat___closed__5; static lean_object* l_Lean_Elab_Command_elabSyntax___lambda__4___closed__1; extern lean_object* l_Lean_Elab_unsupportedSyntaxExceptionId; @@ -669,6 +677,7 @@ LEAN_EXPORT lean_object* l_Lean_setEnv___at_Lean_Elab_Command_elabDeclareSyntaxC LEAN_EXPORT lean_object* l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Command_elabSyntax___spec__12___boxed(lean_object*, lean_object*); static lean_object* l_Lean_Elab_Command_expandNoKindMacroRulesAux___lambda__1___closed__1; static lean_object* l_Lean_Elab_Term_toParserDescr_processSepBy___lambda__1___closed__2; +static lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__9; static lean_object* l_Lean_Elab_Term_ensureUnaryOutput___closed__7; static lean_object* l_Lean_Elab_Command_elabDeclareSyntaxCat___closed__13; static lean_object* l_Lean_Elab_Command_elabSyntax___lambda__4___closed__19; @@ -682,6 +691,7 @@ LEAN_EXPORT lean_object* l_Lean_Elab_Command_expandNoKindMacroRulesAux___lambda_ lean_object* l_Lean_Name_mkStr4(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___closed__2; static lean_object* l_Lean_Elab_Command_inferMacroRulesAltKind___closed__2; +static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__6; LEAN_EXPORT lean_object* l_List_forM___at_Lean_Elab_Term_checkLeftRec___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__32; static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__10; @@ -693,9 +703,11 @@ LEAN_EXPORT lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Term_withNotF static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__56; static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__66; LEAN_EXPORT lean_object* l_Lean_Elab_Term_toParserDescr_processSepBy___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__13; LEAN_EXPORT lean_object* l_Lean_Elab_Command_inferMacroRulesAltKind___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Term_toParserDescr_processNonReserved___closed__21; +static lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__4; static lean_object* l___regBuiltin_Lean_Elab_Command_elabSyntaxAbbrev_declRange___closed__4; static lean_object* l_Lean_Elab_Term_toParserDescr_ensureNoPrec___closed__2; LEAN_EXPORT lean_object* l_Lean_Elab_liftMacroM___at_Lean_Elab_Term_checkLeftRec___spec__1___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -704,11 +716,13 @@ LEAN_EXPORT lean_object* l_Lean_Elab_Command_inferMacroRulesAltKind___lambda__1_ static lean_object* l_Lean_Elab_Command_elabDeclareSyntaxCat___closed__2; uint8_t lean_string_utf8_at_end(lean_object*, lean_object*); static lean_object* l_Lean_Elab_Term_toParserDescr_processNonReserved___closed__23; +static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__1; static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__24; static lean_object* l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__17; static lean_object* l___regBuiltin_Lean_Elab_Command_elabDeclareSyntaxCat_declRange___closed__2; static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__63; LEAN_EXPORT lean_object* l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Term_toParserDescr_processNonReserved___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__8; LEAN_EXPORT lean_object* l_Lean_Elab_liftMacroM___at_Lean_Elab_Term_checkLeftRec___spec__1___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Term_toParserDescr_processNonReserved___closed__13; static lean_object* l_Lean_Elab_Command_elabSyntax___lambda__8___closed__2; @@ -716,7 +730,7 @@ static lean_object* l___regBuiltin_Lean_Elab_Command_elabSyntax___closed__2; static lean_object* l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__8; static lean_object* l_Lean_Elab_Term_toParserDescr_processSepBy___lambda__1___closed__1; static lean_object* l_Lean_Elab_Term_toParserDescr_processNullaryOrCat___closed__12; -static lean_object* l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__6; +LEAN_EXPORT lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwErrorAt___at_Lean_Elab_Command_expandNoKindMacroRulesAux___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Command_elabDeclareSyntaxCat(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___regBuiltin_Lean_Elab_Command_elabDeclareSyntaxCat(lean_object*); @@ -726,13 +740,12 @@ static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyn static lean_object* l_panic___at_Lean_Elab_Term_toParserDescr_processAlias___spec__2___closed__3; static lean_object* l_Lean_Elab_Command_elabSyntax___lambda__4___closed__21; static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__7; -static lean_object* l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__71; static lean_object* l_Lean_Elab_Term_toParserDescr_processAtom___lambda__1___closed__2; static lean_object* l_Lean_Elab_Term_toParserDescr_processNonReserved___closed__1; +static lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__2; static lean_object* l___regBuiltin_Lean_Elab_Command_elabSyntax___closed__1; static lean_object* l_Lean_Elab_Command_expandNoKindMacroRulesAux___lambda__1___closed__2; LEAN_EXPORT lean_object* l_Lean_Elab_Command_elabSyntax___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__10; lean_object* l_Lean_Elab_mkUnusedBaseName(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_getBetterRef(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Command_elabSyntax___lambda__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -742,6 +755,7 @@ LEAN_EXPORT lean_object* l_Lean_Elab_Term_toParserDescr_processNonReserved___box uint8_t lean_nat_dec_lt(lean_object*, lean_object*); static lean_object* l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__21; LEAN_EXPORT lean_object* l_Lean_Elab_Term_addCategoryInfo(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__11; LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Elab_Command_expandNoKindMacroRulesAux___spec__4(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__4; LEAN_EXPORT lean_object* l_Lean_Elab_Term_expandOptPrecedence(lean_object* x_1, lean_object* x_2, lean_object* x_3) { @@ -8209,6 +8223,454 @@ goto _start; } } } +static lean_object* _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string_from_bytes("ParserDescr.nodeWithAntiquot", 28); +return x_1; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__1; +x_2 = l_String_toSubstring_x27(x_1); +return x_2; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string_from_bytes("nodeWithAntiquot", 16); +return x_1; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__8; +x_2 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__3; +x_3 = l_Lean_Name_mkStr2(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_1 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__1; +x_2 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__8; +x_3 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__3; +x_4 = l_Lean_Name_mkStr3(x_1, x_2, x_3); +return x_4; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__5; +x_3 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__7() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__5; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__7; +x_3 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__9() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__6; +x_2 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__8; +x_3 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_3, 0, x_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__10() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string_from_bytes("token", 5); +return x_1; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__11() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__10; +x_3 = l_Lean_Name_str___override(x_1, x_2); +return x_3; +} +} +LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +_start: +{ +lean_object* x_12; lean_object* x_13; uint8_t x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; +x_12 = l_Lean_TSyntax_getString(x_2); +x_13 = lean_ctor_get(x_9, 5); +lean_inc(x_13); +x_14 = 0; +x_15 = l_Lean_SourceInfo_fromRef(x_13, x_14); +x_16 = lean_ctor_get(x_9, 10); +lean_inc(x_16); +lean_dec(x_9); +x_17 = lean_st_ref_get(x_10, x_11); +x_18 = !lean_is_exclusive(x_17); +if (x_18 == 0) +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; +x_19 = lean_ctor_get(x_17, 0); +x_20 = lean_ctor_get(x_19, 0); +lean_inc(x_20); +lean_dec(x_19); +x_21 = lean_environment_main_module(x_20); +x_22 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__4; +x_23 = l_Lean_addMacroScope(x_21, x_22, x_16); +x_24 = lean_box(0); +x_25 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__2; +x_26 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__9; +lean_inc(x_15); +x_27 = lean_alloc_ctor(3, 4, 0); +lean_ctor_set(x_27, 0, x_15); +lean_ctor_set(x_27, 1, x_25); +lean_ctor_set(x_27, 2, x_23); +lean_ctor_set(x_27, 3, x_26); +x_28 = lean_box(2); +x_29 = l_Lean_Syntax_mkStrLit(x_12, x_28); +x_30 = lean_box(0); +x_31 = l_Lean_Name_str___override(x_30, x_12); +x_32 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__11; +x_33 = l_Lean_Name_append(x_32, x_31); +lean_inc(x_33); +x_34 = l___private_Init_Meta_0__Lean_getEscapedNameParts_x3f(x_24, x_33); +if (lean_obj_tag(x_34) == 0) +{ +lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; +x_35 = lean_ctor_get(x_1, 0); +lean_inc(x_35); +lean_dec(x_1); +x_36 = l_Lean_quoteNameMk(x_33); +x_37 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__17; +lean_inc(x_15); +x_38 = l_Lean_Syntax_node3(x_15, x_37, x_29, x_36, x_35); +x_39 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__5; +x_40 = l_Lean_Syntax_node2(x_15, x_39, x_27, x_38); +x_41 = lean_unsigned_to_nat(1u); +x_42 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_42, 0, x_40); +lean_ctor_set(x_42, 1, x_41); +lean_ctor_set(x_17, 0, x_42); +return x_17; +} +else +{ +lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; +lean_dec(x_33); +x_43 = lean_ctor_get(x_1, 0); +lean_inc(x_43); +lean_dec(x_1); +x_44 = lean_ctor_get(x_34, 0); +lean_inc(x_44); +lean_dec(x_34); +x_45 = l_Lean_Elab_Term_ensureUnaryOutput___closed__19; +x_46 = l_String_intercalate(x_45, x_44); +x_47 = l_Lean_Elab_Term_ensureUnaryOutput___closed__20; +x_48 = lean_string_append(x_47, x_46); +lean_dec(x_46); +x_49 = l_Lean_Syntax_mkNameLit(x_48, x_28); +x_50 = l_Lean_Elab_Term_ensureUnaryOutput___closed__21; +x_51 = lean_array_push(x_50, x_49); +x_52 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__19; +x_53 = lean_alloc_ctor(1, 3, 0); +lean_ctor_set(x_53, 0, x_28); +lean_ctor_set(x_53, 1, x_52); +lean_ctor_set(x_53, 2, x_51); +x_54 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__17; +lean_inc(x_15); +x_55 = l_Lean_Syntax_node3(x_15, x_54, x_29, x_53, x_43); +x_56 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__5; +x_57 = l_Lean_Syntax_node2(x_15, x_56, x_27, x_55); +x_58 = lean_unsigned_to_nat(1u); +x_59 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_59, 0, x_57); +lean_ctor_set(x_59, 1, x_58); +lean_ctor_set(x_17, 0, x_59); +return x_17; +} +} +else +{ +lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; +x_60 = lean_ctor_get(x_17, 0); +x_61 = lean_ctor_get(x_17, 1); +lean_inc(x_61); +lean_inc(x_60); +lean_dec(x_17); +x_62 = lean_ctor_get(x_60, 0); +lean_inc(x_62); +lean_dec(x_60); +x_63 = lean_environment_main_module(x_62); +x_64 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__4; +x_65 = l_Lean_addMacroScope(x_63, x_64, x_16); +x_66 = lean_box(0); +x_67 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__2; +x_68 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__9; +lean_inc(x_15); +x_69 = lean_alloc_ctor(3, 4, 0); +lean_ctor_set(x_69, 0, x_15); +lean_ctor_set(x_69, 1, x_67); +lean_ctor_set(x_69, 2, x_65); +lean_ctor_set(x_69, 3, x_68); +x_70 = lean_box(2); +x_71 = l_Lean_Syntax_mkStrLit(x_12, x_70); +x_72 = lean_box(0); +x_73 = l_Lean_Name_str___override(x_72, x_12); +x_74 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__11; +x_75 = l_Lean_Name_append(x_74, x_73); +lean_inc(x_75); +x_76 = l___private_Init_Meta_0__Lean_getEscapedNameParts_x3f(x_66, x_75); +if (lean_obj_tag(x_76) == 0) +{ +lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; +x_77 = lean_ctor_get(x_1, 0); +lean_inc(x_77); +lean_dec(x_1); +x_78 = l_Lean_quoteNameMk(x_75); +x_79 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__17; +lean_inc(x_15); +x_80 = l_Lean_Syntax_node3(x_15, x_79, x_71, x_78, x_77); +x_81 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__5; +x_82 = l_Lean_Syntax_node2(x_15, x_81, x_69, x_80); +x_83 = lean_unsigned_to_nat(1u); +x_84 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_84, 0, x_82); +lean_ctor_set(x_84, 1, x_83); +x_85 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_85, 0, x_84); +lean_ctor_set(x_85, 1, x_61); +return x_85; +} +else +{ +lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; +lean_dec(x_75); +x_86 = lean_ctor_get(x_1, 0); +lean_inc(x_86); +lean_dec(x_1); +x_87 = lean_ctor_get(x_76, 0); +lean_inc(x_87); +lean_dec(x_76); +x_88 = l_Lean_Elab_Term_ensureUnaryOutput___closed__19; +x_89 = l_String_intercalate(x_88, x_87); +x_90 = l_Lean_Elab_Term_ensureUnaryOutput___closed__20; +x_91 = lean_string_append(x_90, x_89); +lean_dec(x_89); +x_92 = l_Lean_Syntax_mkNameLit(x_91, x_70); +x_93 = l_Lean_Elab_Term_ensureUnaryOutput___closed__21; +x_94 = lean_array_push(x_93, x_92); +x_95 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__19; +x_96 = lean_alloc_ctor(1, 3, 0); +lean_ctor_set(x_96, 0, x_70); +lean_ctor_set(x_96, 1, x_95); +lean_ctor_set(x_96, 2, x_94); +x_97 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__17; +lean_inc(x_15); +x_98 = l_Lean_Syntax_node3(x_15, x_97, x_71, x_96, x_86); +x_99 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__5; +x_100 = l_Lean_Syntax_node2(x_15, x_99, x_69, x_98); +x_101 = lean_unsigned_to_nat(1u); +x_102 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_102, 0, x_100); +lean_ctor_set(x_102, 1, x_101); +x_103 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_103, 0, x_102); +lean_ctor_set(x_103, 1, x_61); +return x_103; +} +} +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string_from_bytes("str", 3); +return x_1; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___closed__1; +x_3 = l_Lean_Name_str___override(x_1, x_2); +return x_3; +} +} +LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6(size_t x_1, size_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { +_start: +{ +uint8_t x_13; +x_13 = lean_usize_dec_lt(x_2, x_1); +if (x_13 == 0) +{ +lean_object* x_14; +lean_dec(x_10); +x_14 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_14, 0, x_3); +lean_ctor_set(x_14, 1, x_12); +return x_14; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; uint8_t x_23; +x_15 = lean_array_uget(x_3, x_2); +x_16 = lean_unsigned_to_nat(0u); +x_17 = lean_array_uset(x_3, x_2, x_16); +x_18 = lean_ctor_get(x_15, 0); +lean_inc(x_18); +x_19 = lean_ctor_get(x_15, 1); +lean_inc(x_19); +lean_dec(x_15); +x_20 = l_Lean_Syntax_getArgs(x_18); +lean_dec(x_18); +x_21 = lean_array_get_size(x_20); +x_22 = lean_unsigned_to_nat(1u); +x_23 = lean_nat_dec_eq(x_21, x_22); +lean_dec(x_21); +if (x_23 == 0) +{ +size_t x_24; size_t x_25; lean_object* x_26; +lean_dec(x_20); +x_24 = 1; +x_25 = lean_usize_add(x_2, x_24); +x_26 = lean_array_uset(x_17, x_2, x_19); +x_2 = x_25; +x_3 = x_26; +goto _start; +} +else +{ +lean_object* x_28; lean_object* x_29; uint8_t x_30; +x_28 = lean_array_fget(x_20, x_16); +lean_dec(x_20); +x_29 = l_Lean_Elab_Term_toParserDescr_process___closed__13; +lean_inc(x_28); +x_30 = l_Lean_Syntax_isOfKind(x_28, x_29); +if (x_30 == 0) +{ +lean_object* x_31; uint8_t x_32; +x_31 = l_Lean_Elab_Term_toParserDescr_process___closed__11; +lean_inc(x_28); +x_32 = l_Lean_Syntax_isOfKind(x_28, x_31); +if (x_32 == 0) +{ +size_t x_33; size_t x_34; lean_object* x_35; +lean_dec(x_28); +x_33 = 1; +x_34 = lean_usize_add(x_2, x_33); +x_35 = lean_array_uset(x_17, x_2, x_19); +x_2 = x_34; +x_3 = x_35; +goto _start; +} +else +{ +lean_object* x_37; lean_object* x_38; uint8_t x_39; +x_37 = l_Lean_Syntax_getArg(x_28, x_16); +lean_dec(x_28); +x_38 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___closed__2; +lean_inc(x_37); +x_39 = l_Lean_Syntax_isOfKind(x_37, x_38); +if (x_39 == 0) +{ +size_t x_40; size_t x_41; lean_object* x_42; +lean_dec(x_37); +x_40 = 1; +x_41 = lean_usize_add(x_2, x_40); +x_42 = lean_array_uset(x_17, x_2, x_19); +x_2 = x_41; +x_3 = x_42; +goto _start; +} +else +{ +lean_object* x_44; lean_object* x_45; lean_object* x_46; size_t x_47; size_t x_48; lean_object* x_49; +lean_inc(x_10); +x_44 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1(x_19, x_37, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); +lean_dec(x_37); +x_45 = lean_ctor_get(x_44, 0); +lean_inc(x_45); +x_46 = lean_ctor_get(x_44, 1); +lean_inc(x_46); +lean_dec(x_44); +x_47 = 1; +x_48 = lean_usize_add(x_2, x_47); +x_49 = lean_array_uset(x_17, x_2, x_45); +x_2 = x_48; +x_3 = x_49; +x_12 = x_46; +goto _start; +} +} +} +else +{ +lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; size_t x_55; size_t x_56; lean_object* x_57; +x_51 = l_Lean_Syntax_getArg(x_28, x_22); +lean_dec(x_28); +lean_inc(x_10); +x_52 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1(x_19, x_51, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); +lean_dec(x_51); +x_53 = lean_ctor_get(x_52, 0); +lean_inc(x_53); +x_54 = lean_ctor_get(x_52, 1); +lean_inc(x_54); +lean_dec(x_52); +x_55 = 1; +x_56 = lean_usize_add(x_2, x_55); +x_57 = lean_array_uset(x_17, x_2, x_53); +x_2 = x_56; +x_3 = x_57; +x_12 = x_54; +goto _start; +} +} +} +} +} LEAN_EXPORT lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { _start: { @@ -8222,7 +8684,7 @@ lean_ctor_set(x_13, 1, x_11); return x_13; } } -static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__1() { +static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__1() { _start: { lean_object* x_1; @@ -8230,7 +8692,7 @@ x_1 = lean_mk_string_from_bytes("Lean.Elab.Syntax", 16); return x_1; } } -static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__2() { +static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__2() { _start: { lean_object* x_1; @@ -8238,7 +8700,7 @@ x_1 = lean_mk_string_from_bytes("Lean.Elab.Term.toParserDescr.processAlias", 41) return x_1; } } -static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__3() { +static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__3() { _start: { lean_object* x_1; @@ -8246,20 +8708,20 @@ x_1 = lean_mk_string_from_bytes("unreachable code has been reached", 33); return x_1; } } -static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__4() { +static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__4() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; -x_1 = l_Lean_Elab_Term_toParserDescr_processAlias___closed__1; -x_2 = l_Lean_Elab_Term_toParserDescr_processAlias___closed__2; -x_3 = lean_unsigned_to_nat(178u); +x_1 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__1; +x_2 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__2; +x_3 = lean_unsigned_to_nat(190u); x_4 = lean_unsigned_to_nat(21u); -x_5 = l_Lean_Elab_Term_toParserDescr_processAlias___closed__3; +x_5 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__3; x_6 = l___private_Init_Util_0__mkPanicMessageWithDecl(x_1, x_2, x_3, x_4, x_5); return x_6; } } -static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__5() { +static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__5() { _start: { lean_object* x_1; @@ -8267,16 +8729,16 @@ x_1 = lean_mk_string_from_bytes("ParserDescr.const", 17); return x_1; } } -static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__6() { +static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__6() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Elab_Term_toParserDescr_processAlias___closed__5; +x_1 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__5; x_2 = l_String_toSubstring_x27(x_1); return x_2; } } -static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__7() { +static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__7() { _start: { lean_object* x_1; @@ -8284,109 +8746,773 @@ x_1 = lean_mk_string_from_bytes("const", 5); return x_1; } } -static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__8() { +static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__8() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__8; -x_2 = l_Lean_Elab_Term_toParserDescr_processAlias___closed__7; +x_2 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__7; x_3 = l_Lean_Name_mkStr2(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__9() { +static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__9() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__1; x_2 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__8; -x_3 = l_Lean_Elab_Term_toParserDescr_processAlias___closed__7; +x_3 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__7; x_4 = l_Lean_Name_mkStr3(x_1, x_2, x_3); return x_4; } } -static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__10() { +static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__10() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Elab_Term_toParserDescr_processAlias___closed__9; +x_2 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__9; x_3 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_3, 0, x_2); lean_ctor_set(x_3, 1, x_1); return x_3; } } -static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__11() { +static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__11() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Elab_Term_toParserDescr_processAlias___closed__9; +x_1 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__9; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__12() { +static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__12() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Elab_Term_toParserDescr_processAlias___closed__11; +x_2 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__11; x_3 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_3, 0, x_2); lean_ctor_set(x_3, 1, x_1); return x_3; } } -static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__13() { +static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__13() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Elab_Term_toParserDescr_processAlias___closed__10; -x_2 = l_Lean_Elab_Term_toParserDescr_processAlias___closed__12; +x_1 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__10; +x_2 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__12; x_3 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_3, 0, x_1); lean_ctor_set(x_3, 1, x_2); return x_3; } } +LEAN_EXPORT lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2(lean_object* x_1, lean_object* x_2, size_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13) { +_start: +{ +lean_object* x_14; lean_object* x_15; lean_object* x_201; +x_201 = lean_ctor_get(x_2, 1); +lean_inc(x_201); +if (lean_obj_tag(x_201) == 0) +{ +lean_object* x_202; lean_object* x_203; lean_object* x_204; lean_object* x_205; lean_object* x_206; uint8_t x_207; +lean_dec(x_2); +x_202 = l_Array_unzip___rarg(x_4); +lean_dec(x_4); +x_203 = lean_ctor_get(x_202, 0); +lean_inc(x_203); +x_204 = lean_ctor_get(x_202, 1); +lean_inc(x_204); +lean_dec(x_202); +x_205 = lean_array_get_size(x_204); +x_206 = lean_unsigned_to_nat(0u); +x_207 = lean_nat_dec_lt(x_206, x_205); +if (x_207 == 0) +{ +lean_dec(x_205); +lean_dec(x_204); +x_14 = x_203; +x_15 = x_206; +goto block_200; +} +else +{ +uint8_t x_208; +x_208 = lean_nat_dec_le(x_205, x_205); +if (x_208 == 0) +{ +lean_dec(x_205); +lean_dec(x_204); +x_14 = x_203; +x_15 = x_206; +goto block_200; +} +else +{ +size_t x_209; lean_object* x_210; +x_209 = lean_usize_of_nat(x_205); +lean_dec(x_205); +x_210 = l_Array_foldlMUnsafe_fold___at_Lean_Elab_Term_toParserDescr_processAlias___spec__3(x_204, x_3, x_209, x_206); +lean_dec(x_204); +x_14 = x_203; +x_15 = x_210; +goto block_200; +} +} +} +else +{ +uint8_t x_211; +x_211 = lean_ctor_get_uint8(x_2, sizeof(void*)*2); +lean_dec(x_2); +if (x_211 == 0) +{ +lean_object* x_212; lean_object* x_213; size_t x_214; lean_object* x_215; +x_212 = lean_ctor_get(x_201, 0); +lean_inc(x_212); +lean_dec(x_201); +x_213 = lean_array_get_size(x_4); +x_214 = lean_usize_of_nat(x_213); +lean_dec(x_213); +x_215 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__4(x_214, x_3, x_4); +x_14 = x_215; +x_15 = x_212; +goto block_200; +} +else +{ +lean_object* x_216; lean_object* x_217; size_t x_218; lean_object* x_219; +x_216 = lean_ctor_get(x_201, 0); +lean_inc(x_216); +lean_dec(x_201); +x_217 = lean_array_get_size(x_4); +x_218 = lean_usize_of_nat(x_217); +lean_dec(x_217); +x_219 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__5(x_218, x_3, x_4); +x_14 = x_219; +x_15 = x_216; +goto block_200; +} +} +block_200: +{ +lean_object* x_16; lean_object* x_17; uint8_t x_18; +x_16 = lean_array_get_size(x_14); +x_17 = lean_unsigned_to_nat(0u); +x_18 = lean_nat_dec_eq(x_16, x_17); +if (x_18 == 0) +{ +lean_object* x_19; uint8_t x_20; +x_19 = lean_unsigned_to_nat(1u); +x_20 = lean_nat_dec_eq(x_16, x_19); +if (x_20 == 0) +{ +lean_object* x_21; uint8_t x_22; +x_21 = lean_unsigned_to_nat(2u); +x_22 = lean_nat_dec_eq(x_16, x_21); +lean_dec(x_16); +if (x_22 == 0) +{ +lean_object* x_23; lean_object* x_24; +lean_dec(x_14); +lean_dec(x_1); +x_23 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__4; +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +x_24 = l_panic___at_Lean_Elab_Term_toParserDescr_processAlias___spec__2(x_23, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13); +if (lean_obj_tag(x_24) == 0) +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_25 = lean_ctor_get(x_24, 0); +lean_inc(x_25); +x_26 = lean_ctor_get(x_24, 1); +lean_inc(x_26); +lean_dec(x_24); +x_27 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__1(x_15, x_25, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_26); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +return x_27; +} +else +{ +uint8_t x_28; +lean_dec(x_15); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +x_28 = !lean_is_exclusive(x_24); +if (x_28 == 0) +{ +return x_24; +} +else +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; +x_29 = lean_ctor_get(x_24, 0); +x_30 = lean_ctor_get(x_24, 1); +lean_inc(x_30); +lean_inc(x_29); +lean_dec(x_24); +x_31 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_31, 0, x_29); +lean_ctor_set(x_31, 1, x_30); +return x_31; +} +} +} +else +{ +lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_32 = lean_array_fget(x_14, x_17); +x_33 = lean_array_fget(x_14, x_19); +lean_dec(x_14); +x_34 = lean_st_ref_get(x_12, x_13); +x_35 = lean_ctor_get(x_34, 1); +lean_inc(x_35); +lean_dec(x_34); +x_36 = lean_ctor_get(x_11, 5); +lean_inc(x_36); +lean_inc(x_1); +x_37 = l_Lean_Parser_ensureBinaryParserAlias(x_1, x_35); +if (lean_obj_tag(x_37) == 0) +{ +lean_object* x_38; uint8_t x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; +x_38 = lean_ctor_get(x_37, 1); +lean_inc(x_38); +lean_dec(x_37); +x_39 = 0; +x_40 = l_Lean_SourceInfo_fromRef(x_36, x_39); +x_41 = lean_ctor_get(x_11, 10); +lean_inc(x_41); +x_42 = lean_st_ref_get(x_12, x_38); +x_43 = lean_ctor_get(x_42, 0); +lean_inc(x_43); +x_44 = lean_ctor_get(x_42, 1); +lean_inc(x_44); +lean_dec(x_42); +x_45 = lean_ctor_get(x_43, 0); +lean_inc(x_45); +lean_dec(x_43); +x_46 = lean_environment_main_module(x_45); +x_47 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__10; +x_48 = l_Lean_addMacroScope(x_46, x_47, x_41); +x_49 = lean_box(0); +x_50 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__7; +x_51 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__15; +lean_inc(x_40); +x_52 = lean_alloc_ctor(3, 4, 0); +lean_ctor_set(x_52, 0, x_40); +lean_ctor_set(x_52, 1, x_50); +lean_ctor_set(x_52, 2, x_48); +lean_ctor_set(x_52, 3, x_51); +lean_inc(x_1); +x_53 = l___private_Init_Meta_0__Lean_getEscapedNameParts_x3f(x_49, x_1); +if (lean_obj_tag(x_53) == 0) +{ +lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; +x_54 = l_Lean_quoteNameMk(x_1); +x_55 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__17; +lean_inc(x_40); +x_56 = l_Lean_Syntax_node3(x_40, x_55, x_54, x_32, x_33); +x_57 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__5; +x_58 = l_Lean_Syntax_node2(x_40, x_57, x_52, x_56); +x_59 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__1(x_15, x_58, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_44); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +return x_59; +} +else +{ +lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; +lean_dec(x_1); +x_60 = lean_ctor_get(x_53, 0); +lean_inc(x_60); +lean_dec(x_53); +x_61 = l_Lean_Elab_Term_ensureUnaryOutput___closed__19; +x_62 = l_String_intercalate(x_61, x_60); +x_63 = l_Lean_Elab_Term_ensureUnaryOutput___closed__20; +x_64 = lean_string_append(x_63, x_62); +lean_dec(x_62); +x_65 = lean_box(2); +x_66 = l_Lean_Syntax_mkNameLit(x_64, x_65); +x_67 = l_Lean_Elab_Term_ensureUnaryOutput___closed__21; +x_68 = lean_array_push(x_67, x_66); +x_69 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__19; +x_70 = lean_alloc_ctor(1, 3, 0); +lean_ctor_set(x_70, 0, x_65); +lean_ctor_set(x_70, 1, x_69); +lean_ctor_set(x_70, 2, x_68); +x_71 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__17; +lean_inc(x_40); +x_72 = l_Lean_Syntax_node3(x_40, x_71, x_70, x_32, x_33); +x_73 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__5; +x_74 = l_Lean_Syntax_node2(x_40, x_73, x_52, x_72); +x_75 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__1(x_15, x_74, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_44); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +return x_75; +} +} +else +{ +uint8_t x_76; +lean_dec(x_33); +lean_dec(x_32); +lean_dec(x_15); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_1); +x_76 = !lean_is_exclusive(x_37); +if (x_76 == 0) +{ +lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; +x_77 = lean_ctor_get(x_37, 0); +x_78 = lean_io_error_to_string(x_77); +x_79 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_79, 0, x_78); +x_80 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_80, 0, x_79); +x_81 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_81, 0, x_36); +lean_ctor_set(x_81, 1, x_80); +lean_ctor_set(x_37, 0, x_81); +return x_37; +} +else +{ +lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; +x_82 = lean_ctor_get(x_37, 0); +x_83 = lean_ctor_get(x_37, 1); +lean_inc(x_83); +lean_inc(x_82); +lean_dec(x_37); +x_84 = lean_io_error_to_string(x_82); +x_85 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_85, 0, x_84); +x_86 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_86, 0, x_85); +x_87 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_87, 0, x_36); +lean_ctor_set(x_87, 1, x_86); +x_88 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_88, 0, x_87); +lean_ctor_set(x_88, 1, x_83); +return x_88; +} +} +} +} +else +{ +lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; +lean_dec(x_16); +x_89 = lean_array_fget(x_14, x_17); +lean_dec(x_14); +x_90 = lean_st_ref_get(x_12, x_13); +x_91 = lean_ctor_get(x_90, 1); +lean_inc(x_91); +lean_dec(x_90); +x_92 = lean_ctor_get(x_11, 5); +lean_inc(x_92); +lean_inc(x_1); +x_93 = l_Lean_Parser_ensureUnaryParserAlias(x_1, x_91); +if (lean_obj_tag(x_93) == 0) +{ +lean_object* x_94; uint8_t x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; +x_94 = lean_ctor_get(x_93, 1); +lean_inc(x_94); +lean_dec(x_93); +x_95 = 0; +x_96 = l_Lean_SourceInfo_fromRef(x_92, x_95); +x_97 = lean_ctor_get(x_11, 10); +lean_inc(x_97); +x_98 = lean_st_ref_get(x_12, x_94); +x_99 = lean_ctor_get(x_98, 0); +lean_inc(x_99); +x_100 = lean_ctor_get(x_98, 1); +lean_inc(x_100); +lean_dec(x_98); +x_101 = lean_ctor_get(x_99, 0); +lean_inc(x_101); +lean_dec(x_99); +x_102 = lean_environment_main_module(x_101); +x_103 = l_Lean_Elab_Term_ensureUnaryOutput___closed__7; +x_104 = l_Lean_addMacroScope(x_102, x_103, x_97); +x_105 = lean_box(0); +x_106 = l_Lean_Elab_Term_ensureUnaryOutput___closed__5; +x_107 = l_Lean_Elab_Term_ensureUnaryOutput___closed__13; +lean_inc(x_96); +x_108 = lean_alloc_ctor(3, 4, 0); +lean_ctor_set(x_108, 0, x_96); +lean_ctor_set(x_108, 1, x_106); +lean_ctor_set(x_108, 2, x_104); +lean_ctor_set(x_108, 3, x_107); +lean_inc(x_1); +x_109 = l___private_Init_Meta_0__Lean_getEscapedNameParts_x3f(x_105, x_1); +if (lean_obj_tag(x_109) == 0) +{ +lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; +x_110 = l_Lean_quoteNameMk(x_1); +x_111 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__17; +lean_inc(x_96); +x_112 = l_Lean_Syntax_node2(x_96, x_111, x_110, x_89); +x_113 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__5; +x_114 = l_Lean_Syntax_node2(x_96, x_113, x_108, x_112); +x_115 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__1(x_15, x_114, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_100); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +return x_115; +} +else +{ +lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; +lean_dec(x_1); +x_116 = lean_ctor_get(x_109, 0); +lean_inc(x_116); +lean_dec(x_109); +x_117 = l_Lean_Elab_Term_ensureUnaryOutput___closed__19; +x_118 = l_String_intercalate(x_117, x_116); +x_119 = l_Lean_Elab_Term_ensureUnaryOutput___closed__20; +x_120 = lean_string_append(x_119, x_118); +lean_dec(x_118); +x_121 = lean_box(2); +x_122 = l_Lean_Syntax_mkNameLit(x_120, x_121); +x_123 = l_Lean_Elab_Term_ensureUnaryOutput___closed__21; +x_124 = lean_array_push(x_123, x_122); +x_125 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__19; +x_126 = lean_alloc_ctor(1, 3, 0); +lean_ctor_set(x_126, 0, x_121); +lean_ctor_set(x_126, 1, x_125); +lean_ctor_set(x_126, 2, x_124); +x_127 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__17; +lean_inc(x_96); +x_128 = l_Lean_Syntax_node2(x_96, x_127, x_126, x_89); +x_129 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__5; +x_130 = l_Lean_Syntax_node2(x_96, x_129, x_108, x_128); +x_131 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__1(x_15, x_130, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_100); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +return x_131; +} +} +else +{ +uint8_t x_132; +lean_dec(x_89); +lean_dec(x_15); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_1); +x_132 = !lean_is_exclusive(x_93); +if (x_132 == 0) +{ +lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; +x_133 = lean_ctor_get(x_93, 0); +x_134 = lean_io_error_to_string(x_133); +x_135 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_135, 0, x_134); +x_136 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_136, 0, x_135); +x_137 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_137, 0, x_92); +lean_ctor_set(x_137, 1, x_136); +lean_ctor_set(x_93, 0, x_137); +return x_93; +} +else +{ +lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; +x_138 = lean_ctor_get(x_93, 0); +x_139 = lean_ctor_get(x_93, 1); +lean_inc(x_139); +lean_inc(x_138); +lean_dec(x_93); +x_140 = lean_io_error_to_string(x_138); +x_141 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_141, 0, x_140); +x_142 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_142, 0, x_141); +x_143 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_143, 0, x_92); +lean_ctor_set(x_143, 1, x_142); +x_144 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_144, 0, x_143); +lean_ctor_set(x_144, 1, x_139); +return x_144; +} +} +} +} +else +{ +lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; +lean_dec(x_16); +lean_dec(x_14); +x_145 = lean_st_ref_get(x_12, x_13); +x_146 = lean_ctor_get(x_145, 1); +lean_inc(x_146); +lean_dec(x_145); +x_147 = lean_ctor_get(x_11, 5); +lean_inc(x_147); +lean_inc(x_1); +x_148 = l_Lean_Parser_ensureConstantParserAlias(x_1, x_146); +if (lean_obj_tag(x_148) == 0) +{ +lean_object* x_149; uint8_t x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; +x_149 = lean_ctor_get(x_148, 1); +lean_inc(x_149); +lean_dec(x_148); +x_150 = 0; +x_151 = l_Lean_SourceInfo_fromRef(x_147, x_150); +x_152 = lean_ctor_get(x_11, 10); +lean_inc(x_152); +x_153 = lean_st_ref_get(x_12, x_149); +x_154 = lean_ctor_get(x_153, 0); +lean_inc(x_154); +x_155 = lean_ctor_get(x_153, 1); +lean_inc(x_155); +lean_dec(x_153); +x_156 = lean_ctor_get(x_154, 0); +lean_inc(x_156); +lean_dec(x_154); +x_157 = lean_environment_main_module(x_156); +x_158 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__8; +x_159 = l_Lean_addMacroScope(x_157, x_158, x_152); +x_160 = lean_box(0); +x_161 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__6; +x_162 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__13; +lean_inc(x_151); +x_163 = lean_alloc_ctor(3, 4, 0); +lean_ctor_set(x_163, 0, x_151); +lean_ctor_set(x_163, 1, x_161); +lean_ctor_set(x_163, 2, x_159); +lean_ctor_set(x_163, 3, x_162); +lean_inc(x_1); +x_164 = l___private_Init_Meta_0__Lean_getEscapedNameParts_x3f(x_160, x_1); +if (lean_obj_tag(x_164) == 0) +{ +lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; +x_165 = l_Lean_quoteNameMk(x_1); +x_166 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__17; +lean_inc(x_151); +x_167 = l_Lean_Syntax_node1(x_151, x_166, x_165); +x_168 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__5; +x_169 = l_Lean_Syntax_node2(x_151, x_168, x_163, x_167); +x_170 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__1(x_15, x_169, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_155); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +return x_170; +} +else +{ +lean_object* x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; lean_object* x_181; lean_object* x_182; lean_object* x_183; lean_object* x_184; lean_object* x_185; lean_object* x_186; +lean_dec(x_1); +x_171 = lean_ctor_get(x_164, 0); +lean_inc(x_171); +lean_dec(x_164); +x_172 = l_Lean_Elab_Term_ensureUnaryOutput___closed__19; +x_173 = l_String_intercalate(x_172, x_171); +x_174 = l_Lean_Elab_Term_ensureUnaryOutput___closed__20; +x_175 = lean_string_append(x_174, x_173); +lean_dec(x_173); +x_176 = lean_box(2); +x_177 = l_Lean_Syntax_mkNameLit(x_175, x_176); +x_178 = l_Lean_Elab_Term_ensureUnaryOutput___closed__21; +x_179 = lean_array_push(x_178, x_177); +x_180 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__19; +x_181 = lean_alloc_ctor(1, 3, 0); +lean_ctor_set(x_181, 0, x_176); +lean_ctor_set(x_181, 1, x_180); +lean_ctor_set(x_181, 2, x_179); +x_182 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__17; +lean_inc(x_151); +x_183 = l_Lean_Syntax_node1(x_151, x_182, x_181); +x_184 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__5; +x_185 = l_Lean_Syntax_node2(x_151, x_184, x_163, x_183); +x_186 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__1(x_15, x_185, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_155); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +return x_186; +} +} +else +{ +uint8_t x_187; +lean_dec(x_15); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_1); +x_187 = !lean_is_exclusive(x_148); +if (x_187 == 0) +{ +lean_object* x_188; lean_object* x_189; lean_object* x_190; lean_object* x_191; lean_object* x_192; +x_188 = lean_ctor_get(x_148, 0); +x_189 = lean_io_error_to_string(x_188); +x_190 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_190, 0, x_189); +x_191 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_191, 0, x_190); +x_192 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_192, 0, x_147); +lean_ctor_set(x_192, 1, x_191); +lean_ctor_set(x_148, 0, x_192); +return x_148; +} +else +{ +lean_object* x_193; lean_object* x_194; lean_object* x_195; lean_object* x_196; lean_object* x_197; lean_object* x_198; lean_object* x_199; +x_193 = lean_ctor_get(x_148, 0); +x_194 = lean_ctor_get(x_148, 1); +lean_inc(x_194); +lean_inc(x_193); +lean_dec(x_148); +x_195 = lean_io_error_to_string(x_193); +x_196 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_196, 0, x_195); +x_197 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_197, 0, x_196); +x_198 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_198, 0, x_147); +lean_ctor_set(x_198, 1, x_197); +x_199 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_199, 0, x_198); +lean_ctor_set(x_199, 1, x_194); +return x_199; +} +} +} +} +} +} +static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string_from_bytes("orelse", 6); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_toParserDescr_processAlias___closed__1; +x_3 = l_Lean_Name_str___override(x_1, x_2); +return x_3; +} +} LEAN_EXPORT lean_object* l_Lean_Elab_Term_toParserDescr_processAlias(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { _start: { -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; x_12 = l_Lean_Syntax_getId(x_1); x_13 = lean_erase_macro_scopes(x_12); x_14 = lean_st_ref_get(x_10, x_11); x_15 = lean_ctor_get(x_14, 1); lean_inc(x_15); lean_dec(x_14); -x_16 = lean_ctor_get(x_9, 5); -lean_inc(x_16); -x_17 = l_Lean_Parser_getParserAliasInfo(x_13, x_15); -x_18 = lean_ctor_get(x_17, 0); +x_16 = l_Lean_Parser_getParserAliasInfo(x_13, x_15); +x_17 = lean_ctor_get(x_16, 0); +lean_inc(x_17); +x_18 = lean_ctor_get(x_16, 1); lean_inc(x_18); -x_19 = lean_ctor_get(x_17, 1); -lean_inc(x_19); -lean_dec(x_17); +lean_dec(x_16); lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); -lean_inc(x_18); -x_20 = l_Lean_Elab_Term_addAliasInfo(x_1, x_18, x_5, x_6, x_7, x_8, x_9, x_10, x_19); -if (lean_obj_tag(x_20) == 0) +lean_inc(x_17); +x_19 = l_Lean_Elab_Term_addAliasInfo(x_1, x_17, x_5, x_6, x_7, x_8, x_9, x_10, x_18); +if (lean_obj_tag(x_19) == 0) { -lean_object* x_21; lean_object* x_22; size_t x_23; size_t x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_20, 1); -lean_inc(x_21); -lean_dec(x_20); -x_22 = lean_array_get_size(x_2); -x_23 = lean_usize_of_nat(x_22); -lean_dec(x_22); -x_24 = 0; +lean_object* x_20; lean_object* x_21; size_t x_22; size_t x_23; lean_object* x_24; +x_20 = lean_ctor_get(x_19, 1); +lean_inc(x_20); +lean_dec(x_19); +x_21 = lean_array_get_size(x_2); +x_22 = lean_usize_of_nat(x_21); +lean_dec(x_21); +x_23 = 0; lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); @@ -8394,692 +9520,49 @@ lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); -x_25 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__1(x_23, x_24, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_21); -if (lean_obj_tag(x_25) == 0) +lean_inc(x_2); +x_24 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__1(x_22, x_23, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_20); +if (lean_obj_tag(x_24) == 0) { -lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_212; -x_26 = lean_ctor_get(x_25, 0); +lean_object* x_25; lean_object* x_26; lean_object* x_27; uint8_t x_28; +x_25 = lean_ctor_get(x_24, 0); +lean_inc(x_25); +x_26 = lean_ctor_get(x_24, 1); lean_inc(x_26); -x_27 = lean_ctor_get(x_25, 1); -lean_inc(x_27); +lean_dec(x_24); +x_27 = l_Lean_Elab_Term_toParserDescr_processAlias___closed__2; +x_28 = lean_name_eq(x_13, x_27); +if (x_28 == 0) +{ +lean_object* x_29; +lean_dec(x_2); +x_29 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2(x_13, x_17, x_23, x_25, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_26); +return x_29; +} +else +{ +lean_object* x_30; lean_object* x_31; size_t x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; +x_30 = l_Array_zip___rarg(x_2, x_25); lean_dec(x_25); -x_212 = lean_ctor_get(x_18, 1); -lean_inc(x_212); -if (lean_obj_tag(x_212) == 0) -{ -lean_object* x_213; lean_object* x_214; lean_object* x_215; lean_object* x_216; lean_object* x_217; uint8_t x_218; -lean_dec(x_18); -x_213 = l_Array_unzip___rarg(x_26); -lean_dec(x_26); -x_214 = lean_ctor_get(x_213, 0); -lean_inc(x_214); -x_215 = lean_ctor_get(x_213, 1); -lean_inc(x_215); -lean_dec(x_213); -x_216 = lean_array_get_size(x_215); -x_217 = lean_unsigned_to_nat(0u); -x_218 = lean_nat_dec_lt(x_217, x_216); -if (x_218 == 0) -{ -lean_dec(x_216); -lean_dec(x_215); -x_28 = x_214; -x_29 = x_217; -goto block_211; -} -else -{ -uint8_t x_219; -x_219 = lean_nat_dec_le(x_216, x_216); -if (x_219 == 0) -{ -lean_dec(x_216); -lean_dec(x_215); -x_28 = x_214; -x_29 = x_217; -goto block_211; -} -else -{ -size_t x_220; lean_object* x_221; -x_220 = lean_usize_of_nat(x_216); -lean_dec(x_216); -x_221 = l_Array_foldlMUnsafe_fold___at_Lean_Elab_Term_toParserDescr_processAlias___spec__3(x_215, x_24, x_220, x_217); -lean_dec(x_215); -x_28 = x_214; -x_29 = x_221; -goto block_211; -} -} -} -else -{ -uint8_t x_222; -x_222 = lean_ctor_get_uint8(x_18, sizeof(void*)*2); -lean_dec(x_18); -if (x_222 == 0) -{ -lean_object* x_223; lean_object* x_224; size_t x_225; lean_object* x_226; -x_223 = lean_ctor_get(x_212, 0); -lean_inc(x_223); -lean_dec(x_212); -x_224 = lean_array_get_size(x_26); -x_225 = lean_usize_of_nat(x_224); -lean_dec(x_224); -x_226 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__4(x_225, x_24, x_26); -x_28 = x_226; -x_29 = x_223; -goto block_211; -} -else -{ -lean_object* x_227; lean_object* x_228; size_t x_229; lean_object* x_230; -x_227 = lean_ctor_get(x_212, 0); -lean_inc(x_227); -lean_dec(x_212); -x_228 = lean_array_get_size(x_26); -x_229 = lean_usize_of_nat(x_228); -lean_dec(x_228); -x_230 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__5(x_229, x_24, x_26); -x_28 = x_230; -x_29 = x_227; -goto block_211; -} -} -block_211: -{ -lean_object* x_30; lean_object* x_31; uint8_t x_32; -x_30 = lean_array_get_size(x_28); -x_31 = lean_unsigned_to_nat(0u); -x_32 = lean_nat_dec_eq(x_30, x_31); -if (x_32 == 0) -{ -lean_object* x_33; uint8_t x_34; -x_33 = lean_unsigned_to_nat(1u); -x_34 = lean_nat_dec_eq(x_30, x_33); -if (x_34 == 0) -{ -lean_object* x_35; uint8_t x_36; -x_35 = lean_unsigned_to_nat(2u); -x_36 = lean_nat_dec_eq(x_30, x_35); -lean_dec(x_30); -if (x_36 == 0) -{ -lean_object* x_37; lean_object* x_38; -lean_dec(x_28); -lean_dec(x_16); -lean_dec(x_13); -x_37 = l_Lean_Elab_Term_toParserDescr_processAlias___closed__4; -lean_inc(x_10); +lean_dec(x_2); +x_31 = lean_array_get_size(x_30); +x_32 = lean_usize_of_nat(x_31); +lean_dec(x_31); lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -x_38 = l_panic___at_Lean_Elab_Term_toParserDescr_processAlias___spec__2(x_37, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_27); -if (lean_obj_tag(x_38) == 0) -{ -lean_object* x_39; lean_object* x_40; lean_object* x_41; -x_39 = lean_ctor_get(x_38, 0); -lean_inc(x_39); -x_40 = lean_ctor_get(x_38, 1); -lean_inc(x_40); -lean_dec(x_38); -x_41 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__1(x_29, x_39, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_40); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -return x_41; -} -else -{ -uint8_t x_42; -lean_dec(x_29); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -x_42 = !lean_is_exclusive(x_38); -if (x_42 == 0) -{ -return x_38; -} -else -{ -lean_object* x_43; lean_object* x_44; lean_object* x_45; -x_43 = lean_ctor_get(x_38, 0); -x_44 = lean_ctor_get(x_38, 1); -lean_inc(x_44); -lean_inc(x_43); -lean_dec(x_38); -x_45 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_45, 0, x_43); -lean_ctor_set(x_45, 1, x_44); -return x_45; -} -} -} -else -{ -lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; -x_46 = lean_array_fget(x_28, x_31); -x_47 = lean_array_fget(x_28, x_33); -lean_dec(x_28); -x_48 = lean_st_ref_get(x_10, x_27); -x_49 = lean_ctor_get(x_48, 1); -lean_inc(x_49); -lean_dec(x_48); -lean_inc(x_13); -x_50 = l_Lean_Parser_ensureBinaryParserAlias(x_13, x_49); -if (lean_obj_tag(x_50) == 0) -{ -lean_object* x_51; uint8_t x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; -x_51 = lean_ctor_get(x_50, 1); -lean_inc(x_51); -lean_dec(x_50); -x_52 = 0; -x_53 = l_Lean_SourceInfo_fromRef(x_16, x_52); -x_54 = lean_ctor_get(x_9, 10); -lean_inc(x_54); -x_55 = lean_st_ref_get(x_10, x_51); -x_56 = lean_ctor_get(x_55, 0); -lean_inc(x_56); -x_57 = lean_ctor_get(x_55, 1); -lean_inc(x_57); -lean_dec(x_55); -x_58 = lean_ctor_get(x_56, 0); -lean_inc(x_58); -lean_dec(x_56); -x_59 = lean_environment_main_module(x_58); -x_60 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__10; -x_61 = l_Lean_addMacroScope(x_59, x_60, x_54); -x_62 = lean_box(0); -x_63 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__7; -x_64 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__15; -lean_inc(x_53); -x_65 = lean_alloc_ctor(3, 4, 0); -lean_ctor_set(x_65, 0, x_53); -lean_ctor_set(x_65, 1, x_63); -lean_ctor_set(x_65, 2, x_61); -lean_ctor_set(x_65, 3, x_64); -lean_inc(x_13); -x_66 = l___private_Init_Meta_0__Lean_getEscapedNameParts_x3f(x_62, x_13); -if (lean_obj_tag(x_66) == 0) -{ -lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; -x_67 = l_Lean_quoteNameMk(x_13); -x_68 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__17; -lean_inc(x_53); -x_69 = l_Lean_Syntax_node3(x_53, x_68, x_67, x_46, x_47); -x_70 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__5; -x_71 = l_Lean_Syntax_node2(x_53, x_70, x_65, x_69); -x_72 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__1(x_29, x_71, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_57); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -return x_72; -} -else -{ -lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; -lean_dec(x_13); -x_73 = lean_ctor_get(x_66, 0); -lean_inc(x_73); -lean_dec(x_66); -x_74 = l_Lean_Elab_Term_ensureUnaryOutput___closed__19; -x_75 = l_String_intercalate(x_74, x_73); -x_76 = l_Lean_Elab_Term_ensureUnaryOutput___closed__20; -x_77 = lean_string_append(x_76, x_75); -lean_dec(x_75); -x_78 = lean_box(2); -x_79 = l_Lean_Syntax_mkNameLit(x_77, x_78); -x_80 = l_Lean_Elab_Term_ensureUnaryOutput___closed__21; -x_81 = lean_array_push(x_80, x_79); -x_82 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__19; -x_83 = lean_alloc_ctor(1, 3, 0); -lean_ctor_set(x_83, 0, x_78); -lean_ctor_set(x_83, 1, x_82); -lean_ctor_set(x_83, 2, x_81); -x_84 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__17; -lean_inc(x_53); -x_85 = l_Lean_Syntax_node3(x_53, x_84, x_83, x_46, x_47); -x_86 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__5; -x_87 = l_Lean_Syntax_node2(x_53, x_86, x_65, x_85); -x_88 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__1(x_29, x_87, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_57); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -return x_88; +x_33 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6(x_32, x_23, x_30, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_26); +x_34 = lean_ctor_get(x_33, 0); +lean_inc(x_34); +x_35 = lean_ctor_get(x_33, 1); +lean_inc(x_35); +lean_dec(x_33); +x_36 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2(x_13, x_17, x_23, x_34, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_35); +return x_36; } } else { -uint8_t x_89; -lean_dec(x_47); -lean_dec(x_46); -lean_dec(x_29); -lean_dec(x_13); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -x_89 = !lean_is_exclusive(x_50); -if (x_89 == 0) -{ -lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; -x_90 = lean_ctor_get(x_50, 0); -x_91 = lean_io_error_to_string(x_90); -x_92 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_92, 0, x_91); -x_93 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_93, 0, x_92); -x_94 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_94, 0, x_16); -lean_ctor_set(x_94, 1, x_93); -lean_ctor_set(x_50, 0, x_94); -return x_50; -} -else -{ -lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; -x_95 = lean_ctor_get(x_50, 0); -x_96 = lean_ctor_get(x_50, 1); -lean_inc(x_96); -lean_inc(x_95); -lean_dec(x_50); -x_97 = lean_io_error_to_string(x_95); -x_98 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_98, 0, x_97); -x_99 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_99, 0, x_98); -x_100 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_100, 0, x_16); -lean_ctor_set(x_100, 1, x_99); -x_101 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_101, 0, x_100); -lean_ctor_set(x_101, 1, x_96); -return x_101; -} -} -} -} -else -{ -lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; -lean_dec(x_30); -x_102 = lean_array_fget(x_28, x_31); -lean_dec(x_28); -x_103 = lean_st_ref_get(x_10, x_27); -x_104 = lean_ctor_get(x_103, 1); -lean_inc(x_104); -lean_dec(x_103); -lean_inc(x_13); -x_105 = l_Lean_Parser_ensureUnaryParserAlias(x_13, x_104); -if (lean_obj_tag(x_105) == 0) -{ -lean_object* x_106; uint8_t x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; -x_106 = lean_ctor_get(x_105, 1); -lean_inc(x_106); -lean_dec(x_105); -x_107 = 0; -x_108 = l_Lean_SourceInfo_fromRef(x_16, x_107); -x_109 = lean_ctor_get(x_9, 10); -lean_inc(x_109); -x_110 = lean_st_ref_get(x_10, x_106); -x_111 = lean_ctor_get(x_110, 0); -lean_inc(x_111); -x_112 = lean_ctor_get(x_110, 1); -lean_inc(x_112); -lean_dec(x_110); -x_113 = lean_ctor_get(x_111, 0); -lean_inc(x_113); -lean_dec(x_111); -x_114 = lean_environment_main_module(x_113); -x_115 = l_Lean_Elab_Term_ensureUnaryOutput___closed__7; -x_116 = l_Lean_addMacroScope(x_114, x_115, x_109); -x_117 = lean_box(0); -x_118 = l_Lean_Elab_Term_ensureUnaryOutput___closed__5; -x_119 = l_Lean_Elab_Term_ensureUnaryOutput___closed__13; -lean_inc(x_108); -x_120 = lean_alloc_ctor(3, 4, 0); -lean_ctor_set(x_120, 0, x_108); -lean_ctor_set(x_120, 1, x_118); -lean_ctor_set(x_120, 2, x_116); -lean_ctor_set(x_120, 3, x_119); -lean_inc(x_13); -x_121 = l___private_Init_Meta_0__Lean_getEscapedNameParts_x3f(x_117, x_13); -if (lean_obj_tag(x_121) == 0) -{ -lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; -x_122 = l_Lean_quoteNameMk(x_13); -x_123 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__17; -lean_inc(x_108); -x_124 = l_Lean_Syntax_node2(x_108, x_123, x_122, x_102); -x_125 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__5; -x_126 = l_Lean_Syntax_node2(x_108, x_125, x_120, x_124); -x_127 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__1(x_29, x_126, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_112); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -return x_127; -} -else -{ -lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; -lean_dec(x_13); -x_128 = lean_ctor_get(x_121, 0); -lean_inc(x_128); -lean_dec(x_121); -x_129 = l_Lean_Elab_Term_ensureUnaryOutput___closed__19; -x_130 = l_String_intercalate(x_129, x_128); -x_131 = l_Lean_Elab_Term_ensureUnaryOutput___closed__20; -x_132 = lean_string_append(x_131, x_130); -lean_dec(x_130); -x_133 = lean_box(2); -x_134 = l_Lean_Syntax_mkNameLit(x_132, x_133); -x_135 = l_Lean_Elab_Term_ensureUnaryOutput___closed__21; -x_136 = lean_array_push(x_135, x_134); -x_137 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__19; -x_138 = lean_alloc_ctor(1, 3, 0); -lean_ctor_set(x_138, 0, x_133); -lean_ctor_set(x_138, 1, x_137); -lean_ctor_set(x_138, 2, x_136); -x_139 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__17; -lean_inc(x_108); -x_140 = l_Lean_Syntax_node2(x_108, x_139, x_138, x_102); -x_141 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__5; -x_142 = l_Lean_Syntax_node2(x_108, x_141, x_120, x_140); -x_143 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__1(x_29, x_142, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_112); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -return x_143; -} -} -else -{ -uint8_t x_144; -lean_dec(x_102); -lean_dec(x_29); -lean_dec(x_13); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -x_144 = !lean_is_exclusive(x_105); -if (x_144 == 0) -{ -lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; -x_145 = lean_ctor_get(x_105, 0); -x_146 = lean_io_error_to_string(x_145); -x_147 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_147, 0, x_146); -x_148 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_148, 0, x_147); -x_149 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_149, 0, x_16); -lean_ctor_set(x_149, 1, x_148); -lean_ctor_set(x_105, 0, x_149); -return x_105; -} -else -{ -lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; -x_150 = lean_ctor_get(x_105, 0); -x_151 = lean_ctor_get(x_105, 1); -lean_inc(x_151); -lean_inc(x_150); -lean_dec(x_105); -x_152 = lean_io_error_to_string(x_150); -x_153 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_153, 0, x_152); -x_154 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_154, 0, x_153); -x_155 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_155, 0, x_16); -lean_ctor_set(x_155, 1, x_154); -x_156 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_156, 0, x_155); -lean_ctor_set(x_156, 1, x_151); -return x_156; -} -} -} -} -else -{ -lean_object* x_157; lean_object* x_158; lean_object* x_159; -lean_dec(x_30); -lean_dec(x_28); -x_157 = lean_st_ref_get(x_10, x_27); -x_158 = lean_ctor_get(x_157, 1); -lean_inc(x_158); -lean_dec(x_157); -lean_inc(x_13); -x_159 = l_Lean_Parser_ensureConstantParserAlias(x_13, x_158); -if (lean_obj_tag(x_159) == 0) -{ -lean_object* x_160; uint8_t x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; -x_160 = lean_ctor_get(x_159, 1); -lean_inc(x_160); -lean_dec(x_159); -x_161 = 0; -x_162 = l_Lean_SourceInfo_fromRef(x_16, x_161); -x_163 = lean_ctor_get(x_9, 10); -lean_inc(x_163); -x_164 = lean_st_ref_get(x_10, x_160); -x_165 = lean_ctor_get(x_164, 0); -lean_inc(x_165); -x_166 = lean_ctor_get(x_164, 1); -lean_inc(x_166); -lean_dec(x_164); -x_167 = lean_ctor_get(x_165, 0); -lean_inc(x_167); -lean_dec(x_165); -x_168 = lean_environment_main_module(x_167); -x_169 = l_Lean_Elab_Term_toParserDescr_processAlias___closed__8; -x_170 = l_Lean_addMacroScope(x_168, x_169, x_163); -x_171 = lean_box(0); -x_172 = l_Lean_Elab_Term_toParserDescr_processAlias___closed__6; -x_173 = l_Lean_Elab_Term_toParserDescr_processAlias___closed__13; -lean_inc(x_162); -x_174 = lean_alloc_ctor(3, 4, 0); -lean_ctor_set(x_174, 0, x_162); -lean_ctor_set(x_174, 1, x_172); -lean_ctor_set(x_174, 2, x_170); -lean_ctor_set(x_174, 3, x_173); -lean_inc(x_13); -x_175 = l___private_Init_Meta_0__Lean_getEscapedNameParts_x3f(x_171, x_13); -if (lean_obj_tag(x_175) == 0) -{ -lean_object* x_176; lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; lean_object* x_181; -x_176 = l_Lean_quoteNameMk(x_13); -x_177 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__17; -lean_inc(x_162); -x_178 = l_Lean_Syntax_node1(x_162, x_177, x_176); -x_179 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__5; -x_180 = l_Lean_Syntax_node2(x_162, x_179, x_174, x_178); -x_181 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__1(x_29, x_180, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_166); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -return x_181; -} -else -{ -lean_object* x_182; lean_object* x_183; lean_object* x_184; lean_object* x_185; lean_object* x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; lean_object* x_190; lean_object* x_191; lean_object* x_192; lean_object* x_193; lean_object* x_194; lean_object* x_195; lean_object* x_196; lean_object* x_197; -lean_dec(x_13); -x_182 = lean_ctor_get(x_175, 0); -lean_inc(x_182); -lean_dec(x_175); -x_183 = l_Lean_Elab_Term_ensureUnaryOutput___closed__19; -x_184 = l_String_intercalate(x_183, x_182); -x_185 = l_Lean_Elab_Term_ensureUnaryOutput___closed__20; -x_186 = lean_string_append(x_185, x_184); -lean_dec(x_184); -x_187 = lean_box(2); -x_188 = l_Lean_Syntax_mkNameLit(x_186, x_187); -x_189 = l_Lean_Elab_Term_ensureUnaryOutput___closed__21; -x_190 = lean_array_push(x_189, x_188); -x_191 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__19; -x_192 = lean_alloc_ctor(1, 3, 0); -lean_ctor_set(x_192, 0, x_187); -lean_ctor_set(x_192, 1, x_191); -lean_ctor_set(x_192, 2, x_190); -x_193 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__17; -lean_inc(x_162); -x_194 = l_Lean_Syntax_node1(x_162, x_193, x_192); -x_195 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__5; -x_196 = l_Lean_Syntax_node2(x_162, x_195, x_174, x_194); -x_197 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__1(x_29, x_196, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_166); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -return x_197; -} -} -else -{ -uint8_t x_198; -lean_dec(x_29); -lean_dec(x_13); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -x_198 = !lean_is_exclusive(x_159); -if (x_198 == 0) -{ -lean_object* x_199; lean_object* x_200; lean_object* x_201; lean_object* x_202; lean_object* x_203; -x_199 = lean_ctor_get(x_159, 0); -x_200 = lean_io_error_to_string(x_199); -x_201 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_201, 0, x_200); -x_202 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_202, 0, x_201); -x_203 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_203, 0, x_16); -lean_ctor_set(x_203, 1, x_202); -lean_ctor_set(x_159, 0, x_203); -return x_159; -} -else -{ -lean_object* x_204; lean_object* x_205; lean_object* x_206; lean_object* x_207; lean_object* x_208; lean_object* x_209; lean_object* x_210; -x_204 = lean_ctor_get(x_159, 0); -x_205 = lean_ctor_get(x_159, 1); -lean_inc(x_205); -lean_inc(x_204); -lean_dec(x_159); -x_206 = lean_io_error_to_string(x_204); -x_207 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_207, 0, x_206); -x_208 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_208, 0, x_207); -x_209 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_209, 0, x_16); -lean_ctor_set(x_209, 1, x_208); -x_210 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_210, 0, x_209); -lean_ctor_set(x_210, 1, x_205); -return x_210; -} -} -} -} -} -else -{ -uint8_t x_231; -lean_dec(x_18); -lean_dec(x_16); -lean_dec(x_13); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -x_231 = !lean_is_exclusive(x_25); -if (x_231 == 0) -{ -return x_25; -} -else -{ -lean_object* x_232; lean_object* x_233; lean_object* x_234; -x_232 = lean_ctor_get(x_25, 0); -x_233 = lean_ctor_get(x_25, 1); -lean_inc(x_233); -lean_inc(x_232); -lean_dec(x_25); -x_234 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_234, 0, x_232); -lean_ctor_set(x_234, 1, x_233); -return x_234; -} -} -} -else -{ -uint8_t x_235; -lean_dec(x_18); -lean_dec(x_16); +uint8_t x_37; +lean_dec(x_17); lean_dec(x_13); lean_dec(x_10); lean_dec(x_9); @@ -9090,23 +9573,57 @@ lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_235 = !lean_is_exclusive(x_20); -if (x_235 == 0) +x_37 = !lean_is_exclusive(x_24); +if (x_37 == 0) { -return x_20; +return x_24; } else { -lean_object* x_236; lean_object* x_237; lean_object* x_238; -x_236 = lean_ctor_get(x_20, 0); -x_237 = lean_ctor_get(x_20, 1); -lean_inc(x_237); -lean_inc(x_236); -lean_dec(x_20); -x_238 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_238, 0, x_236); -lean_ctor_set(x_238, 1, x_237); -return x_238; +lean_object* x_38; lean_object* x_39; lean_object* x_40; +x_38 = lean_ctor_get(x_24, 0); +x_39 = lean_ctor_get(x_24, 1); +lean_inc(x_39); +lean_inc(x_38); +lean_dec(x_24); +x_40 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_40, 0, x_38); +lean_ctor_set(x_40, 1, x_39); +return x_40; +} +} +} +else +{ +uint8_t x_41; +lean_dec(x_17); +lean_dec(x_13); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_41 = !lean_is_exclusive(x_19); +if (x_41 == 0) +{ +return x_19; +} +else +{ +lean_object* x_42; lean_object* x_43; lean_object* x_44; +x_42 = lean_ctor_get(x_19, 0); +x_43 = lean_ctor_get(x_19, 1); +lean_inc(x_43); +lean_inc(x_42); +lean_dec(x_19); +x_44 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_44, 0, x_42); +lean_ctor_set(x_44, 1, x_43); +return x_44; } } } @@ -10353,6 +10870,41 @@ x_6 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___sp return x_6; } } +LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +_start: +{ +lean_object* x_12; +x_12 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11); +lean_dec(x_10); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_12; +} +} +LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { +_start: +{ +size_t x_13; size_t x_14; lean_object* x_15; +x_13 = lean_unbox_usize(x_1); +lean_dec(x_1); +x_14 = lean_unbox_usize(x_2); +lean_dec(x_2); +x_15 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6(x_13, x_14, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); +lean_dec(x_11); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +return x_15; +} +} LEAN_EXPORT lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { _start: { @@ -10369,6 +10921,16 @@ lean_dec(x_3); return x_12; } } +LEAN_EXPORT lean_object* l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13) { +_start: +{ +size_t x_14; lean_object* x_15; +x_14 = lean_unbox_usize(x_3); +lean_dec(x_3); +x_15 = l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2(x_1, x_2, x_14, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13); +return x_15; +} +} LEAN_EXPORT lean_object* l_Array_mapIdxM_map___at_Lean_Elab_Term_toParserDescr_processSeq___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15) { _start: { @@ -11169,38 +11731,20 @@ static lean_object* _init_l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_decl _start: { lean_object* x_1; -x_1 = lean_mk_string_from_bytes("str", 3); +x_1 = lean_mk_string_from_bytes("Lean.ParserDescr.cat", 20); return x_1; } } static lean_object* _init_l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__66() { _start: { -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_box(0); -x_2 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__65; -x_3 = l_Lean_Name_str___override(x_1, x_2); -return x_3; -} -} -static lean_object* _init_l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__67() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string_from_bytes("Lean.ParserDescr.cat", 20); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__68() { -_start: -{ lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__67; +x_1 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__65; x_2 = l_String_toSubstring_x27(x_1); return x_2; } } -static lean_object* _init_l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__69() { +static lean_object* _init_l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__67() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; @@ -11212,11 +11756,11 @@ lean_ctor_set(x_3, 1, x_1); return x_3; } } -static lean_object* _init_l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__70() { +static lean_object* _init_l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__68() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__69; +x_1 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__67; x_2 = l_Lean_Elab_Term_toParserDescr_processParserCategory___lambda__1___closed__7; x_3 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -11224,7 +11768,7 @@ lean_ctor_set(x_3, 1, x_2); return x_3; } } -static lean_object* _init_l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__71() { +static lean_object* _init_l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__69() { _start: { lean_object* x_1; @@ -11232,7 +11776,7 @@ x_1 = lean_mk_string_from_bytes("0", 1); return x_1; } } -static lean_object* _init_l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__72() { +static lean_object* _init_l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__70() { _start: { lean_object* x_1; @@ -11460,8 +12004,8 @@ lean_inc(x_16); x_107 = l_Lean_Syntax_node3(x_16, x_106, x_83, x_103, x_105); x_108 = l_Lean_Elab_Term_toParserDescr_processParserCategory___lambda__1___closed__4; x_109 = l_Lean_addMacroScope(x_21, x_108, x_18); -x_110 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__68; -x_111 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__70; +x_110 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__66; +x_111 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__68; lean_inc(x_16); x_112 = lean_alloc_ctor(3, 4, 0); lean_ctor_set(x_112, 0, x_16); @@ -11470,7 +12014,7 @@ lean_ctor_set(x_112, 2, x_109); lean_ctor_set(x_112, 3, x_111); lean_inc(x_1); x_113 = l___private_Init_Meta_0__Lean_getEscapedNameParts_x3f(x_32, x_1); -x_114 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__71; +x_114 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__69; lean_inc(x_16); x_115 = lean_alloc_ctor(2, 2, 0); lean_ctor_set(x_115, 0, x_16); @@ -11478,12 +12022,12 @@ lean_ctor_set(x_115, 1, x_114); x_116 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__54; lean_inc(x_16); x_117 = l_Lean_Syntax_node1(x_16, x_116, x_115); -x_118 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__72; +x_118 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__70; lean_inc(x_16); x_119 = lean_alloc_ctor(2, 2, 0); lean_ctor_set(x_119, 0, x_16); lean_ctor_set(x_119, 1, x_118); -x_120 = l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__66; +x_120 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___closed__2; lean_inc(x_16); x_121 = l_Lean_Syntax_node1(x_16, x_120, x_119); lean_inc(x_16); @@ -12410,7 +12954,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Command_elabDeclareSyntaxCat_ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(263u); +x_1 = lean_unsigned_to_nat(275u); x_2 = lean_unsigned_to_nat(34u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -12422,7 +12966,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Command_elabDeclareSyntaxCat_ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(278u); +x_1 = lean_unsigned_to_nat(290u); x_2 = lean_unsigned_to_nat(17u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -12450,7 +12994,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Command_elabDeclareSyntaxCat_ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(263u); +x_1 = lean_unsigned_to_nat(275u); x_2 = lean_unsigned_to_nat(38u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -12462,7 +13006,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Command_elabDeclareSyntaxCat_ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(263u); +x_1 = lean_unsigned_to_nat(275u); x_2 = lean_unsigned_to_nat(58u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -15956,7 +16500,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Command_elabSyntax_declRange_ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(336u); +x_1 = lean_unsigned_to_nat(348u); x_2 = lean_unsigned_to_nat(33u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -15968,7 +16512,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Command_elabSyntax_declRange_ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(369u); +x_1 = lean_unsigned_to_nat(381u); x_2 = lean_unsigned_to_nat(43u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -15996,7 +16540,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Command_elabSyntax_declRange_ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(336u); +x_1 = lean_unsigned_to_nat(348u); x_2 = lean_unsigned_to_nat(37u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -16008,7 +16552,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Command_elabSyntax_declRange_ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(336u); +x_1 = lean_unsigned_to_nat(348u); x_2 = lean_unsigned_to_nat(47u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -16090,89 +16634,21 @@ return x_3; static lean_object* _init_l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__3() { _start: { -lean_object* x_1; -x_1 = lean_mk_string_from_bytes("ParserDescr.nodeWithAntiquot", 28); -return x_1; +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__5; +x_3 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; } } static lean_object* _init_l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__4() { _start: { -lean_object* x_1; lean_object* x_2; +lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__3; -x_2 = l_String_toSubstring_x27(x_1); -return x_2; -} -} -static lean_object* _init_l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__5() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string_from_bytes("nodeWithAntiquot", 16); -return x_1; -} -} -static lean_object* _init_l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__6() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__8; -x_2 = l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__5; -x_3 = l_Lean_Name_mkStr2(x_1, x_2); -return x_3; -} -} -static lean_object* _init_l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__7() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__1; -x_2 = l_Subarray_forInUnsafe_loop___at___private_Lean_Elab_Syntax_0__Lean_Elab_Term_mkParserSeq___spec__1___closed__8; -x_3 = l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__5; -x_4 = l_Lean_Name_mkStr3(x_1, x_2, x_3); -return x_4; -} -} -static lean_object* _init_l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__8() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_box(0); -x_2 = l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__7; -x_3 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_3, 0, x_2); -lean_ctor_set(x_3, 1, x_1); -return x_3; -} -} -static lean_object* _init_l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__9() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__7; -x_2 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; -} -} -static lean_object* _init_l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__10() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_box(0); -x_2 = l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__9; -x_3 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_3, 0, x_2); -lean_ctor_set(x_3, 1, x_1); -return x_3; -} -} -static lean_object* _init_l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__11() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__8; -x_2 = l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__10; +x_2 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__8; x_3 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_3, 0, x_1); lean_ctor_set(x_3, 1, x_2); @@ -16322,10 +16798,10 @@ lean_inc(x_34); x_62 = lean_alloc_ctor(2, 2, 0); lean_ctor_set(x_62, 0, x_34); lean_ctor_set(x_62, 1, x_61); -x_63 = l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__6; +x_63 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__4; x_64 = l_Lean_addMacroScope(x_39, x_63, x_36); -x_65 = l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__4; -x_66 = l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__11; +x_65 = l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__2; +x_66 = l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__4; lean_inc(x_34); x_67 = lean_alloc_ctor(3, 4, 0); lean_ctor_set(x_67, 0, x_34); @@ -16627,7 +17103,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Command_elabSyntaxAbbrev_decl _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(371u); +x_1 = lean_unsigned_to_nat(383u); x_2 = lean_unsigned_to_nat(39u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -16639,7 +17115,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Command_elabSyntaxAbbrev_decl _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(377u); +x_1 = lean_unsigned_to_nat(389u); x_2 = lean_unsigned_to_nat(49u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -16667,7 +17143,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Command_elabSyntaxAbbrev_decl _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(371u); +x_1 = lean_unsigned_to_nat(383u); x_2 = lean_unsigned_to_nat(43u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -16679,7 +17155,7 @@ static lean_object* _init_l___regBuiltin_Lean_Elab_Command_elabSyntaxAbbrev_decl _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_unsigned_to_nat(371u); +x_1 = lean_unsigned_to_nat(383u); x_2 = lean_unsigned_to_nat(59u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -17822,7 +18298,7 @@ lean_dec(x_2); return x_4; } } -static lean_object* _init_l_Lean_Elab_Command_initFn____x40_Lean_Elab_Syntax___hyg_12268____closed__1() { +static lean_object* _init_l_Lean_Elab_Command_initFn____x40_Lean_Elab_Syntax___hyg_12717____closed__1() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; @@ -17832,11 +18308,11 @@ x_3 = l_Lean_Name_mkStr2(x_1, x_2); return x_3; } } -LEAN_EXPORT lean_object* l_Lean_Elab_Command_initFn____x40_Lean_Elab_Syntax___hyg_12268_(lean_object* x_1) { +LEAN_EXPORT lean_object* l_Lean_Elab_Command_initFn____x40_Lean_Elab_Syntax___hyg_12717_(lean_object* x_1) { _start: { lean_object* x_2; uint8_t x_3; lean_object* x_4; -x_2 = l_Lean_Elab_Command_initFn____x40_Lean_Elab_Syntax___hyg_12268____closed__1; +x_2 = l_Lean_Elab_Command_initFn____x40_Lean_Elab_Syntax___hyg_12717____closed__1; x_3 = 0; x_4 = l_Lean_registerTraceClass(x_2, x_3, x_1); return x_4; @@ -18175,32 +18651,62 @@ l_panic___at_Lean_Elab_Term_toParserDescr_processAlias___spec__2___closed__2 = _ lean_mark_persistent(l_panic___at_Lean_Elab_Term_toParserDescr_processAlias___spec__2___closed__2); l_panic___at_Lean_Elab_Term_toParserDescr_processAlias___spec__2___closed__3 = _init_l_panic___at_Lean_Elab_Term_toParserDescr_processAlias___spec__2___closed__3(); lean_mark_persistent(l_panic___at_Lean_Elab_Term_toParserDescr_processAlias___spec__2___closed__3); +l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__1 = _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__1(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__1); +l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__2 = _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__2(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__2); +l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__3 = _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__3(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__3); +l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__4 = _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__4(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__4); +l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__5 = _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__5(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__5); +l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__6 = _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__6(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__6); +l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__7 = _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__7(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__7); +l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__8 = _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__8(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__8); +l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__9 = _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__9(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__9); +l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__10 = _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__10(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__10); +l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__11 = _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__11(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___lambda__1___closed__11); +l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___closed__1 = _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___closed__1(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___closed__1); +l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___closed__2 = _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___closed__2(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at_Lean_Elab_Term_toParserDescr_processAlias___spec__6___closed__2); +l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__1 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__1); +l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__2 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__2); +l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__3 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__3(); +lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__3); +l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__4 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__4(); +lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__4); +l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__5 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__5(); +lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__5); +l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__6 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__6(); +lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__6); +l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__7 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__7(); +lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__7); +l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__8 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__8(); +lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__8); +l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__9 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__9(); +lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__9); +l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__10 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__10(); +lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__10); +l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__11 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__11(); +lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__11); +l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__12 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__12(); +lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__12); +l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__13 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__13(); +lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___lambda__2___closed__13); l_Lean_Elab_Term_toParserDescr_processAlias___closed__1 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__1(); lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___closed__1); l_Lean_Elab_Term_toParserDescr_processAlias___closed__2 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__2(); lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___closed__2); -l_Lean_Elab_Term_toParserDescr_processAlias___closed__3 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__3(); -lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___closed__3); -l_Lean_Elab_Term_toParserDescr_processAlias___closed__4 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__4(); -lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___closed__4); -l_Lean_Elab_Term_toParserDescr_processAlias___closed__5 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__5(); -lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___closed__5); -l_Lean_Elab_Term_toParserDescr_processAlias___closed__6 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__6(); -lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___closed__6); -l_Lean_Elab_Term_toParserDescr_processAlias___closed__7 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__7(); -lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___closed__7); -l_Lean_Elab_Term_toParserDescr_processAlias___closed__8 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__8(); -lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___closed__8); -l_Lean_Elab_Term_toParserDescr_processAlias___closed__9 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__9(); -lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___closed__9); -l_Lean_Elab_Term_toParserDescr_processAlias___closed__10 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__10(); -lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___closed__10); -l_Lean_Elab_Term_toParserDescr_processAlias___closed__11 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__11(); -lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___closed__11); -l_Lean_Elab_Term_toParserDescr_processAlias___closed__12 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__12(); -lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___closed__12); -l_Lean_Elab_Term_toParserDescr_processAlias___closed__13 = _init_l_Lean_Elab_Term_toParserDescr_processAlias___closed__13(); -lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processAlias___closed__13); l_Lean_Elab_Term_toParserDescr_processNullaryOrCat___closed__1 = _init_l_Lean_Elab_Term_toParserDescr_processNullaryOrCat___closed__1(); lean_mark_persistent(l_Lean_Elab_Term_toParserDescr_processNullaryOrCat___closed__1); l_Lean_Elab_Term_toParserDescr_processNullaryOrCat___closed__2 = _init_l_Lean_Elab_Term_toParserDescr_processNullaryOrCat___closed__2(); @@ -18367,10 +18873,6 @@ l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___c lean_mark_persistent(l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__69); l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__70 = _init_l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__70(); lean_mark_persistent(l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__70); -l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__71 = _init_l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__71(); -lean_mark_persistent(l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__71); -l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__72 = _init_l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__72(); -lean_mark_persistent(l___private_Lean_Elab_Syntax_0__Lean_Elab_Command_declareSyntaxCatQuotParser___closed__72); l_Lean_Elab_Command_elabDeclareSyntaxCat___closed__1 = _init_l_Lean_Elab_Command_elabDeclareSyntaxCat___closed__1(); lean_mark_persistent(l_Lean_Elab_Command_elabDeclareSyntaxCat___closed__1); l_Lean_Elab_Command_elabDeclareSyntaxCat___closed__2 = _init_l_Lean_Elab_Command_elabDeclareSyntaxCat___closed__2(); @@ -18559,20 +19061,6 @@ l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__3 = _init_l_Lean_Elab lean_mark_persistent(l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__3); l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__4 = _init_l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__4(); lean_mark_persistent(l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__4); -l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__5 = _init_l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__5(); -lean_mark_persistent(l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__5); -l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__6 = _init_l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__6(); -lean_mark_persistent(l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__6); -l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__7 = _init_l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__7(); -lean_mark_persistent(l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__7); -l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__8 = _init_l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__8(); -lean_mark_persistent(l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__8); -l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__9 = _init_l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__9(); -lean_mark_persistent(l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__9); -l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__10 = _init_l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__10(); -lean_mark_persistent(l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__10); -l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__11 = _init_l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__11(); -lean_mark_persistent(l_Lean_Elab_Command_elabSyntaxAbbrev___lambda__2___closed__11); l_Lean_Elab_Command_elabSyntaxAbbrev___closed__1 = _init_l_Lean_Elab_Command_elabSyntaxAbbrev___closed__1(); lean_mark_persistent(l_Lean_Elab_Command_elabSyntaxAbbrev___closed__1); l_Lean_Elab_Command_elabSyntaxAbbrev___closed__2 = _init_l_Lean_Elab_Command_elabSyntaxAbbrev___closed__2(); @@ -18623,9 +19111,9 @@ l_Lean_Elab_Command_expandNoKindMacroRulesAux___lambda__1___closed__5 = _init_l_ lean_mark_persistent(l_Lean_Elab_Command_expandNoKindMacroRulesAux___lambda__1___closed__5); l_Lean_Elab_Command_expandNoKindMacroRulesAux___lambda__1___closed__6 = _init_l_Lean_Elab_Command_expandNoKindMacroRulesAux___lambda__1___closed__6(); lean_mark_persistent(l_Lean_Elab_Command_expandNoKindMacroRulesAux___lambda__1___closed__6); -l_Lean_Elab_Command_initFn____x40_Lean_Elab_Syntax___hyg_12268____closed__1 = _init_l_Lean_Elab_Command_initFn____x40_Lean_Elab_Syntax___hyg_12268____closed__1(); -lean_mark_persistent(l_Lean_Elab_Command_initFn____x40_Lean_Elab_Syntax___hyg_12268____closed__1); -res = l_Lean_Elab_Command_initFn____x40_Lean_Elab_Syntax___hyg_12268_(lean_io_mk_world()); +l_Lean_Elab_Command_initFn____x40_Lean_Elab_Syntax___hyg_12717____closed__1 = _init_l_Lean_Elab_Command_initFn____x40_Lean_Elab_Syntax___hyg_12717____closed__1(); +lean_mark_persistent(l_Lean_Elab_Command_initFn____x40_Lean_Elab_Syntax___hyg_12717____closed__1); +res = l_Lean_Elab_Command_initFn____x40_Lean_Elab_Syntax___hyg_12717_(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); return lean_io_result_mk_ok(lean_box(0)); diff --git a/stage0/stdlib/Lean/Elab/SyntheticMVars.c b/stage0/stdlib/Lean/Elab/SyntheticMVars.c index 63df3e9721..92841e2fbe 100644 --- a/stage0/stdlib/Lean/Elab/SyntheticMVars.c +++ b/stage0/stdlib/Lean/Elab/SyntheticMVars.c @@ -90,6 +90,7 @@ lean_object* l_Lean_PersistentHashMap_find_x3f___at_Lean_getDelayedMVarAssignmen LEAN_EXPORT lean_object* l___private_Lean_Elab_SyntheticMVars_0__Lean_Elab_Term_synthesizeUsingDefaultPrio_synthesizeUsingDefault___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Term_withSynthesize___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Elab_SyntheticMVars_0__Lean_Elab_Term_processPostponedUniverseContraints(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l___private_Lean_Elab_SyntheticMVars_0__Lean_Elab_Term_synthesizeUsingDefaultPrio_synthesizePendingInstMVar_x27___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Term_reportStuckSyntheticMVar___lambda__2___closed__2; LEAN_EXPORT lean_object* l___private_Lean_Elab_SyntheticMVars_0__Lean_Elab_Term_synthesizeUsingDefaultPrio_synthesizeUsingDefaultInstance___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); size_t lean_usize_shift_right(size_t, size_t); @@ -115,7 +116,6 @@ lean_object* l_Lean_Elab_Term_ensureHasType(lean_object*, lean_object*, lean_obj static lean_object* l_Lean_instantiateLCtxMVars___at_Lean_Elab_Term_runTactic___spec__2___closed__1; LEAN_EXPORT lean_object* l___private_Lean_Elab_SyntheticMVars_0__Lean_Elab_Term_withSynthesizeImp(lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Term_reportStuckSyntheticMVar___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_commitWhen___at___private_Lean_Elab_SyntheticMVars_0__Lean_Elab_Term_synthesizeUsingDefaultPrio_synthesizePendingInstMVar_x27___spec__1___at___private_Lean_Elab_SyntheticMVars_0__Lean_Elab_Term_synthesizeUsingDefaultPrio_synthesizePendingInstMVar_x27___spec__2___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_occursCheck_visitMVar___at___private_Lean_Elab_SyntheticMVars_0__Lean_Elab_Term_resumePostponed___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Term_reportStuckSyntheticMVar___lambda__1___closed__2; LEAN_EXPORT lean_object* l___private_Lean_Elab_SyntheticMVars_0__Lean_Elab_Term_synthesizeUsingDefaultPrio_synthesizeSomeUsingDefault_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -162,7 +162,6 @@ lean_object* l_Lean_Elab_Term_getSyntheticMVarDecl_x3f(lean_object*, lean_object lean_object* l_Lean_MVarId_admit(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PersistentArray_get_x21___rarg(lean_object*, lean_object*, lean_object*); lean_object* lean_nat_sub(lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_commitWhen___at___private_Lean_Elab_SyntheticMVars_0__Lean_Elab_Term_synthesizeUsingDefaultPrio_synthesizePendingInstMVar_x27___spec__1___at___private_Lean_Elab_SyntheticMVars_0__Lean_Elab_Term_synthesizeUsingDefaultPrio_synthesizePendingInstMVar_x27___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_RBNode_setBlack___rarg(lean_object*); extern lean_object* l_Lean_Level_instHashableLevel; lean_object* l_Lean_Elab_Tactic_mkInitialTacticInfo(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -3535,7 +3534,7 @@ return x_39; } } } -LEAN_EXPORT lean_object* l_Lean_commitWhen___at___private_Lean_Elab_SyntheticMVars_0__Lean_Elab_Term_synthesizeUsingDefaultPrio_synthesizePendingInstMVar_x27___spec__1___at___private_Lean_Elab_SyntheticMVars_0__Lean_Elab_Term_synthesizeUsingDefaultPrio_synthesizePendingInstMVar_x27___spec__2___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +LEAN_EXPORT lean_object* l___private_Lean_Elab_SyntheticMVars_0__Lean_Elab_Term_synthesizeUsingDefaultPrio_synthesizePendingInstMVar_x27___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { _start: { lean_object* x_10; @@ -3593,142 +3592,20 @@ return x_22; } } } -LEAN_EXPORT lean_object* l_Lean_commitWhen___at___private_Lean_Elab_SyntheticMVars_0__Lean_Elab_Term_synthesizeUsingDefaultPrio_synthesizePendingInstMVar_x27___spec__1___at___private_Lean_Elab_SyntheticMVars_0__Lean_Elab_Term_synthesizeUsingDefaultPrio_synthesizePendingInstMVar_x27___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { -_start: -{ -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; -lean_inc(x_1); -x_10 = lean_alloc_closure((void*)(l_Lean_commitWhen___at___private_Lean_Elab_SyntheticMVars_0__Lean_Elab_Term_synthesizeUsingDefaultPrio_synthesizePendingInstMVar_x27___spec__1___at___private_Lean_Elab_SyntheticMVars_0__Lean_Elab_Term_synthesizeUsingDefaultPrio_synthesizePendingInstMVar_x27___spec__2___lambda__1), 9, 2); -lean_closure_set(x_10, 0, x_1); -lean_closure_set(x_10, 1, x_2); -x_11 = l_Lean_Elab_Term_saveState___rarg(x_4, x_5, x_6, x_7, x_8, x_9); -x_12 = lean_ctor_get(x_11, 0); -lean_inc(x_12); -x_13 = lean_ctor_get(x_11, 1); -lean_inc(x_13); -lean_dec(x_11); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -x_14 = l_Lean_MVarId_withContext___at_Lean_Elab_Tactic_run___spec__1___rarg(x_1, x_10, x_3, x_4, x_5, x_6, x_7, x_8, x_13); -if (lean_obj_tag(x_14) == 0) -{ -lean_object* x_15; uint8_t x_16; -x_15 = lean_ctor_get(x_14, 0); -lean_inc(x_15); -x_16 = lean_unbox(x_15); -lean_dec(x_15); -if (x_16 == 0) -{ -lean_object* x_17; uint8_t x_18; lean_object* x_19; uint8_t x_20; -x_17 = lean_ctor_get(x_14, 1); -lean_inc(x_17); -lean_dec(x_14); -x_18 = 0; -x_19 = l_Lean_Elab_Term_SavedState_restore(x_12, x_18, x_3, x_4, x_5, x_6, x_7, x_8, x_17); -x_20 = !lean_is_exclusive(x_19); -if (x_20 == 0) -{ -lean_object* x_21; lean_object* x_22; -x_21 = lean_ctor_get(x_19, 0); -lean_dec(x_21); -x_22 = lean_box(x_18); -lean_ctor_set(x_19, 0, x_22); -return x_19; -} -else -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_23 = lean_ctor_get(x_19, 1); -lean_inc(x_23); -lean_dec(x_19); -x_24 = lean_box(x_18); -x_25 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_25, 0, x_24); -lean_ctor_set(x_25, 1, x_23); -return x_25; -} -} -else -{ -uint8_t x_26; -lean_dec(x_12); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -x_26 = !lean_is_exclusive(x_14); -if (x_26 == 0) -{ -lean_object* x_27; uint8_t x_28; lean_object* x_29; -x_27 = lean_ctor_get(x_14, 0); -lean_dec(x_27); -x_28 = 1; -x_29 = lean_box(x_28); -lean_ctor_set(x_14, 0, x_29); -return x_14; -} -else -{ -lean_object* x_30; uint8_t x_31; lean_object* x_32; lean_object* x_33; -x_30 = lean_ctor_get(x_14, 1); -lean_inc(x_30); -lean_dec(x_14); -x_31 = 1; -x_32 = lean_box(x_31); -x_33 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_33, 0, x_32); -lean_ctor_set(x_33, 1, x_30); -return x_33; -} -} -} -else -{ -lean_object* x_34; lean_object* x_35; uint8_t x_36; lean_object* x_37; uint8_t x_38; -x_34 = lean_ctor_get(x_14, 0); -lean_inc(x_34); -x_35 = lean_ctor_get(x_14, 1); -lean_inc(x_35); -lean_dec(x_14); -x_36 = 0; -x_37 = l_Lean_Elab_Term_SavedState_restore(x_12, x_36, x_3, x_4, x_5, x_6, x_7, x_8, x_35); -x_38 = !lean_is_exclusive(x_37); -if (x_38 == 0) -{ -lean_object* x_39; -x_39 = lean_ctor_get(x_37, 0); -lean_dec(x_39); -lean_ctor_set_tag(x_37, 1); -lean_ctor_set(x_37, 0, x_34); -return x_37; -} -else -{ -lean_object* x_40; lean_object* x_41; -x_40 = lean_ctor_get(x_37, 1); -lean_inc(x_40); -lean_dec(x_37); -x_41 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_41, 0, x_34); -lean_ctor_set(x_41, 1, x_40); -return x_41; -} -} -} -} LEAN_EXPORT lean_object* l___private_Lean_Elab_SyntheticMVars_0__Lean_Elab_Term_synthesizeUsingDefaultPrio_synthesizePendingInstMVar_x27(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_9; lean_object* x_10; +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; x_9 = lean_box(0); -x_10 = l_Lean_commitWhen___at___private_Lean_Elab_SyntheticMVars_0__Lean_Elab_Term_synthesizeUsingDefaultPrio_synthesizePendingInstMVar_x27___spec__1___at___private_Lean_Elab_SyntheticMVars_0__Lean_Elab_Term_synthesizeUsingDefaultPrio_synthesizePendingInstMVar_x27___spec__2(x_1, x_9, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -return x_10; +lean_inc(x_1); +x_10 = lean_alloc_closure((void*)(l___private_Lean_Elab_SyntheticMVars_0__Lean_Elab_Term_synthesizeUsingDefaultPrio_synthesizePendingInstMVar_x27___lambda__1), 9, 2); +lean_closure_set(x_10, 0, x_1); +lean_closure_set(x_10, 1, x_9); +x_11 = lean_alloc_closure((void*)(l_Lean_MVarId_withContext___at_Lean_Elab_Tactic_run___spec__1___rarg), 9, 2); +lean_closure_set(x_11, 0, x_1); +lean_closure_set(x_11, 1, x_10); +x_12 = l_Lean_commitWhen___at___private_Lean_Elab_SyntheticMVars_0__Lean_Elab_Term_synthesizeUsingDefaultPrio_synthesizePendingInstMVar_x27___spec__1(x_11, x_2, x_3, x_4, x_5, x_6, x_7, x_8); +return x_12; } } LEAN_EXPORT lean_object* l_List_filterAuxM___at___private_Lean_Elab_SyntheticMVars_0__Lean_Elab_Term_synthesizeUsingDefaultPrio_synthesizeUsingInstancesStep___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { diff --git a/stage0/stdlib/Lean/Elab/Tactic/ElabTerm.c b/stage0/stdlib/Lean/Elab/Tactic/ElabTerm.c index 05f7014aa6..949d45c55b 100644 --- a/stage0/stdlib/Lean/Elab/Tactic/ElabTerm.c +++ b/stage0/stdlib/Lean/Elab/Tactic/ElabTerm.c @@ -15,6 +15,7 @@ extern "C" { #endif static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalWithReducibleAndInstances___closed__5; LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_evalApplyLikeTactic(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_evalRename___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_evalApplyLikeTactic___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalSpecialize_declRange___closed__2; size_t lean_usize_add(size_t, size_t); @@ -61,7 +62,6 @@ LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_closeMainGoalUsing___lambda__1(lean_ static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalWithReducible___closed__5; static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalWithReducibleAndInstances___closed__3; uint8_t l_Lean_MetavarKind_isNatural(uint8_t); -LEAN_EXPORT lean_object* l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_uset(lean_object*, size_t, lean_object*); lean_object* l_Lean_instantiateMVars___at_Lean_Elab_Tactic_getMainTarget___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Elab_Tactic_ElabTerm_0__Lean_Elab_Tactic_mkNativeAuxDecl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -70,6 +70,7 @@ LEAN_EXPORT lean_object* l_Array_qsort_sort___at_Lean_Elab_Tactic_withCollecting LEAN_EXPORT lean_object* l___regBuiltin_Lean_Elab_Tactic_evalRefine_x27(lean_object*); static lean_object* l_Lean_Elab_Tactic_refineCore___lambda__4___closed__1; LEAN_EXPORT lean_object* l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Tactic_evalExact___spec__1___rarg(lean_object*); +static lean_object* l_Lean_Elab_Tactic_evalRename___lambda__1___closed__3; LEAN_EXPORT lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Tactic_withCollectingNewGoalsFrom_go___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_refineCore___lambda__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalRefine_x27_declRange___closed__3; @@ -117,6 +118,7 @@ LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_sortMVarIdArrayByIndex___rarg___lamb LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_evalNativeDecide___boxed(lean_object*); LEAN_EXPORT lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Tactic_filterOldMVars___spec__1(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_elabAsFVar___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Tactic_evalRename___lambda__1___closed__1; LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_evalApply(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Tactic_evalNativeDecide___rarg___lambda__1___closed__2; static lean_object* l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Tactic_evalExact___spec__1___rarg___closed__1; @@ -124,7 +126,6 @@ lean_object* l_Lean_Elab_Term_mkAuxName(lean_object*, lean_object*, lean_object* static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalDecide___closed__5; static lean_object* l_Lean_Elab_Tactic_evalDecide___rarg___lambda__1___closed__4; lean_object* l_Array_qpartition_loop___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_evalRename___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_appArg_x21(lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_sortMVarIdsByIndex___at_Lean_Elab_Tactic_withCollectingNewGoalsFrom_go___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_synthesizeSyntheticMVars(uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -136,6 +137,7 @@ lean_object* l_Lean_Meta_zetaReduce___lambda__2___boxed(lean_object*, lean_objec static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalConstructor___closed__1; LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Elab_Tactic_getFVarId___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Tactic_evalDecide___rarg___lambda__1___closed__3; +static lean_object* l_Lean_Elab_Tactic_evalRename___lambda__1___closed__2; lean_object* lean_nat_add(lean_object*, lean_object*); static lean_object* l_Lean_Elab_Tactic_evalDecide___rarg___lambda__1___closed__5; lean_object* l_Lean_Meta_mkDecide(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -144,7 +146,6 @@ static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalExact___closed__4; static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalSpecialize_declRange___closed__5; lean_object* l_Lean_Meta_mkEqRefl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Elab_Tactic_getFVarId___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__4; LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_elabTerm___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_findSomeRevM_x3f_find___at_Lean_Elab_Tactic_evalRename___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalDecide_declRange___closed__5; @@ -155,14 +156,13 @@ LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_refineCore___lambda__4(lean_object*, static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalRefine_x27_declRange___closed__1; LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_filterOldMVars(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Tactic_evalSpecialize___closed__3; -LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_evalRename___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_evalRename___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalWithReducible_declRange___closed__4; LEAN_EXPORT lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Tactic_withCollectingNewGoalsFrom_go___spec__5(lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalRefine_declRange___closed__1; lean_object* l_Lean_Meta_intro1Core(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalWithUnfoldingAll_declRange___closed__2; static lean_object* l_Lean_Elab_Tactic_evalNativeDecide___rarg___lambda__1___closed__7; -static lean_object* l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__1; static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalNativeDecide_declRange___closed__6; LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_elabTermWithHoles(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_fget(lean_object*, lean_object*); @@ -199,6 +199,7 @@ LEAN_EXPORT lean_object* l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Tacti lean_object* l_Lean_Elab_Term_elabTerm(lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Tactic_evalExact___closed__4; LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_evalConstructor___boxed(lean_object*); +static lean_object* l_Lean_Elab_Tactic_evalRename___lambda__1___closed__4; lean_object* l_Lean_MVarId_getKind(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_replaceRef(lean_object*, lean_object*); lean_object* lean_array_get(lean_object*, lean_object*, lean_object*); @@ -211,7 +212,6 @@ static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalDecide_declRange___close static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalWithReducible___closed__1; lean_object* l_Lean_Elab_Tactic_getMainTarget(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Tactic_evalExact___closed__1; -static lean_object* l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__2; static lean_object* l_Lean_Elab_Tactic_evalDecide___rarg___lambda__1___closed__6; LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_evalApply___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_PersistentArray_findSomeRevMAux___at_Lean_Elab_Tactic_evalRename___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -311,7 +311,6 @@ extern lean_object* l_Lean_instInhabitedMVarId; static lean_object* l_Lean_Elab_Tactic_filterOldMVars___closed__1; lean_object* l_Lean_Expr_const___override(lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalExact___closed__1; -static lean_object* l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__3; LEAN_EXPORT lean_object* l_Lean_PersistentArray_findSomeRevM_x3f___at_Lean_Elab_Tactic_evalRename___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Tactic_evalApply___closed__3; static lean_object* l_Lean_Elab_Tactic_evalNativeDecide___rarg___lambda__1___closed__4; @@ -419,7 +418,6 @@ LEAN_EXPORT lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Tactic_withCol static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalRefine___closed__1; lean_object* l_Lean_Syntax_getArg(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_LocalContext_findDeclRevM_x3f___at_Lean_Elab_Tactic_evalRename___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Tactic_getFVarId___closed__4; LEAN_EXPORT lean_object* l___regBuiltin_Lean_Elab_Tactic_evalWithReducibleAndInstances(lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_refineCore___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -463,6 +461,7 @@ LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_closeMainGoalUsing___lambda__1___box static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalDecide_declRange___closed__2; static lean_object* l_Lean_Elab_Tactic_getFVarId___closed__2; LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_refineCore(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_evalRename___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalWithUnfoldingAll___closed__2; LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_evalExact(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalRefine_x27_declRange___closed__7; @@ -10468,7 +10467,7 @@ return x_30; } } } -static lean_object* _init_l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__1() { +static lean_object* _init_l_Lean_Elab_Tactic_evalRename___lambda__1___closed__1() { _start: { lean_object* x_1; @@ -10476,16 +10475,16 @@ x_1 = lean_mk_string_from_bytes("failed to find a hypothesis with type", 37); return x_1; } } -static lean_object* _init_l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__2() { +static lean_object* _init_l_Lean_Elab_Tactic_evalRename___lambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__1; +x_1 = l_Lean_Elab_Tactic_evalRename___lambda__1___closed__1; x_2 = l_Lean_stringToMessageData(x_1); return x_2; } } -static lean_object* _init_l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__3() { +static lean_object* _init_l_Lean_Elab_Tactic_evalRename___lambda__1___closed__3() { _start: { lean_object* x_1; @@ -10493,16 +10492,16 @@ x_1 = lean_mk_string_from_bytes("", 0); return x_1; } } -static lean_object* _init_l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__4() { +static lean_object* _init_l_Lean_Elab_Tactic_evalRename___lambda__1___closed__4() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__3; +x_1 = l_Lean_Elab_Tactic_evalRename___lambda__1___closed__3; x_2 = l_Lean_stringToMessageData(x_1); return x_2; } } -LEAN_EXPORT lean_object* l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_evalRename___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { _start: { uint8_t x_12; lean_object* x_13; @@ -10546,11 +10545,11 @@ x_19 = lean_ctor_get(x_17, 1); lean_inc(x_19); lean_dec(x_17); x_20 = l_Lean_indentExpr(x_14); -x_21 = l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__2; +x_21 = l_Lean_Elab_Tactic_evalRename___lambda__1___closed__2; x_22 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_22, 0, x_21); lean_ctor_set(x_22, 1, x_20); -x_23 = l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__4; +x_23 = l_Lean_Elab_Tactic_evalRename___lambda__1___closed__4; x_24 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_24, 0, x_22); lean_ctor_set(x_24, 1, x_23); @@ -10669,21 +10668,10 @@ return x_39; } } } -LEAN_EXPORT lean_object* l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_evalRename___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { _start: { -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; -x_12 = lean_alloc_closure((void*)(l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1), 11, 2); -lean_closure_set(x_12, 0, x_1); -lean_closure_set(x_12, 1, x_2); -x_13 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_withoutRecover___rarg), 10, 1); -lean_closure_set(x_13, 0, x_12); -x_14 = l_Lean_Elab_Tactic_saveState___rarg(x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11); -x_15 = lean_ctor_get(x_14, 0); -lean_inc(x_15); -x_16 = lean_ctor_get(x_14, 1); -lean_inc(x_16); -lean_dec(x_14); +lean_object* x_12; lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); @@ -10692,98 +10680,15 @@ lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); -x_17 = l_Lean_Meta_withNewMCtxDepth___at_Lean_Elab_Tactic_evalRename___spec__7___rarg(x_13, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_16); -if (lean_obj_tag(x_17) == 0) +x_12 = l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8(x_1, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11); +if (lean_obj_tag(x_12) == 0) { -lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; uint8_t x_22; -x_18 = lean_ctor_get(x_17, 0); -lean_inc(x_18); -x_19 = lean_ctor_get(x_17, 1); -lean_inc(x_19); -lean_dec(x_17); -x_20 = 0; -x_21 = l_Lean_Elab_Tactic_SavedState_restore(x_15, x_20, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_19); -lean_dec(x_4); -lean_dec(x_3); -x_22 = !lean_is_exclusive(x_21); -if (x_22 == 0) -{ -lean_object* x_23; -x_23 = lean_ctor_get(x_21, 0); -lean_dec(x_23); -lean_ctor_set(x_21, 0, x_18); -return x_21; -} -else -{ -lean_object* x_24; lean_object* x_25; -x_24 = lean_ctor_get(x_21, 1); -lean_inc(x_24); -lean_dec(x_21); -x_25 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_25, 0, x_18); -lean_ctor_set(x_25, 1, x_24); -return x_25; -} -} -else -{ -lean_object* x_26; lean_object* x_27; uint8_t x_28; lean_object* x_29; uint8_t x_30; -x_26 = lean_ctor_get(x_17, 0); -lean_inc(x_26); -x_27 = lean_ctor_get(x_17, 1); -lean_inc(x_27); -lean_dec(x_17); -x_28 = 0; -x_29 = l_Lean_Elab_Tactic_SavedState_restore(x_15, x_28, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_27); -lean_dec(x_4); -lean_dec(x_3); -x_30 = !lean_is_exclusive(x_29); -if (x_30 == 0) -{ -lean_object* x_31; -x_31 = lean_ctor_get(x_29, 0); -lean_dec(x_31); -lean_ctor_set_tag(x_29, 1); -lean_ctor_set(x_29, 0, x_26); -return x_29; -} -else -{ -lean_object* x_32; lean_object* x_33; -x_32 = lean_ctor_get(x_29, 1); -lean_inc(x_32); -lean_dec(x_29); -x_33 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_33, 0, x_26); -lean_ctor_set(x_33, 1, x_32); -return x_33; -} -} -} -} -LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_evalRename___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { -_start: -{ -lean_object* x_13; -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -x_13 = l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9(x_1, x_2, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); -if (lean_obj_tag(x_13) == 0) -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_14 = lean_ctor_get(x_13, 0); +lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_13 = lean_ctor_get(x_12, 0); +lean_inc(x_13); +x_14 = lean_ctor_get(x_12, 1); lean_inc(x_14); -x_15 = lean_ctor_get(x_13, 1); -lean_inc(x_15); -lean_dec(x_13); -lean_inc(x_11); +lean_dec(x_12); lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); @@ -10791,40 +10696,40 @@ lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); -x_16 = l_Lean_Elab_Tactic_getMainGoal(x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_15); -if (lean_obj_tag(x_16) == 0) +lean_inc(x_3); +x_15 = l_Lean_Elab_Tactic_getMainGoal(x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_14); +if (lean_obj_tag(x_15) == 0) { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_17 = lean_ctor_get(x_16, 0); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); -lean_inc(x_18); -lean_dec(x_16); -x_19 = l_Lean_Syntax_getId(x_3); -lean_inc(x_11); +lean_dec(x_15); +x_18 = l_Lean_Syntax_getId(x_2); lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); -x_20 = l_Lean_MVarId_rename(x_17, x_14, x_19, x_8, x_9, x_10, x_11, x_18); -if (lean_obj_tag(x_20) == 0) +lean_inc(x_7); +x_19 = l_Lean_MVarId_rename(x_16, x_13, x_18, x_7, x_8, x_9, x_10, x_17); +if (lean_obj_tag(x_19) == 0) { -lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_20, 0); +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_20 = lean_ctor_get(x_19, 0); +lean_inc(x_20); +x_21 = lean_ctor_get(x_19, 1); lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = lean_box(0); -x_24 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_24, 0, x_21); -lean_ctor_set(x_24, 1, x_23); -x_25 = l_Lean_Elab_Tactic_replaceMainGoal(x_24, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_22); -return x_25; +lean_dec(x_19); +x_22 = lean_box(0); +x_23 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_23, 0, x_20); +lean_ctor_set(x_23, 1, x_22); +x_24 = l_Lean_Elab_Tactic_replaceMainGoal(x_23, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_21); +return x_24; } else { -uint8_t x_26; -lean_dec(x_11); +uint8_t x_25; lean_dec(x_10); lean_dec(x_9); lean_dec(x_8); @@ -10832,86 +10737,87 @@ lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -x_26 = !lean_is_exclusive(x_20); -if (x_26 == 0) +lean_dec(x_3); +x_25 = !lean_is_exclusive(x_19); +if (x_25 == 0) { -return x_20; +return x_19; } else { -lean_object* x_27; lean_object* x_28; lean_object* x_29; -x_27 = lean_ctor_get(x_20, 0); -x_28 = lean_ctor_get(x_20, 1); -lean_inc(x_28); +lean_object* x_26; lean_object* x_27; lean_object* x_28; +x_26 = lean_ctor_get(x_19, 0); +x_27 = lean_ctor_get(x_19, 1); lean_inc(x_27); -lean_dec(x_20); -x_29 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_29, 0, x_27); -lean_ctor_set(x_29, 1, x_28); -return x_29; +lean_inc(x_26); +lean_dec(x_19); +x_28 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_28, 0, x_26); +lean_ctor_set(x_28, 1, x_27); +return x_28; } } } else { -uint8_t x_30; -lean_dec(x_14); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -x_30 = !lean_is_exclusive(x_16); -if (x_30 == 0) -{ -return x_16; -} -else -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; -x_31 = lean_ctor_get(x_16, 0); -x_32 = lean_ctor_get(x_16, 1); -lean_inc(x_32); -lean_inc(x_31); -lean_dec(x_16); -x_33 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_33, 0, x_31); -lean_ctor_set(x_33, 1, x_32); -return x_33; -} -} -} -else -{ -uint8_t x_34; -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -x_34 = !lean_is_exclusive(x_13); -if (x_34 == 0) -{ -return x_13; -} -else -{ -lean_object* x_35; lean_object* x_36; lean_object* x_37; -x_35 = lean_ctor_get(x_13, 0); -x_36 = lean_ctor_get(x_13, 1); -lean_inc(x_36); -lean_inc(x_35); +uint8_t x_29; lean_dec(x_13); -x_37 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_37, 0, x_35); -lean_ctor_set(x_37, 1, x_36); -return x_37; +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_29 = !lean_is_exclusive(x_15); +if (x_29 == 0) +{ +return x_15; +} +else +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_30 = lean_ctor_get(x_15, 0); +x_31 = lean_ctor_get(x_15, 1); +lean_inc(x_31); +lean_inc(x_30); +lean_dec(x_15); +x_32 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_32, 0, x_30); +lean_ctor_set(x_32, 1, x_31); +return x_32; +} +} +} +else +{ +uint8_t x_33; +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_33 = !lean_is_exclusive(x_12); +if (x_33 == 0) +{ +return x_12; +} +else +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; +x_34 = lean_ctor_get(x_12, 0); +x_35 = lean_ctor_get(x_12, 1); +lean_inc(x_35); +lean_inc(x_34); +lean_dec(x_12); +x_36 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_36, 0, x_34); +lean_ctor_set(x_36, 1, x_35); +return x_36; } } } @@ -11005,14 +10911,20 @@ return x_20; } else { -lean_object* x_21; lean_object* x_22; lean_object* x_23; +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; x_21 = lean_box(0); -x_22 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_evalRename___lambda__1___boxed), 12, 3); +x_22 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_evalRename___lambda__1), 11, 2); lean_closure_set(x_22, 0, x_15); lean_closure_set(x_22, 1, x_21); -lean_closure_set(x_22, 2, x_17); -x_23 = l_Lean_Elab_Tactic_withMainContext___rarg(x_22, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); -return x_23; +x_23 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_withoutRecover___rarg), 10, 1); +lean_closure_set(x_23, 0, x_22); +x_24 = lean_alloc_closure((void*)(l_Lean_Meta_withNewMCtxDepth___at_Lean_Elab_Tactic_evalRename___spec__7___rarg), 10, 1); +lean_closure_set(x_24, 0, x_23); +x_25 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_evalRename___lambda__2___boxed), 11, 2); +lean_closure_set(x_25, 0, x_24); +lean_closure_set(x_25, 1, x_17); +x_26 = l_Lean_Elab_Tactic_withMainContext___rarg(x_25, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +return x_26; } } } @@ -11084,13 +10996,13 @@ lean_dec(x_4); return x_12; } } -LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_evalRename___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { +LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_evalRename___lambda__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { _start: { -lean_object* x_13; -x_13 = l_Lean_Elab_Tactic_evalRename___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); -lean_dec(x_3); -return x_13; +lean_object* x_12; +x_12 = l_Lean_Elab_Tactic_evalRename___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11); +lean_dec(x_2); +return x_12; } } static lean_object* _init_l___regBuiltin_Lean_Elab_Tactic_evalRename___closed__1() { @@ -11304,7 +11216,7 @@ x_12 = l___private_Lean_Elab_Tactic_ElabTerm_0__Lean_Elab_Tactic_preprocessPropT x_13 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_13, 0, x_12); lean_ctor_set(x_13, 1, x_11); -x_14 = l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__4; +x_14 = l_Lean_Elab_Tactic_evalRename___lambda__1___closed__4; x_15 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_15, 0, x_13); lean_ctor_set(x_15, 1, x_14); @@ -11688,7 +11600,7 @@ x_35 = l_Lean_Elab_Tactic_evalDecide___rarg___lambda__2___closed__2; x_36 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_36, 0, x_35); lean_ctor_set(x_36, 1, x_34); -x_37 = l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__4; +x_37 = l_Lean_Elab_Tactic_evalRename___lambda__1___closed__4; x_38 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_38, 0, x_36); lean_ctor_set(x_38, 1, x_37); @@ -11832,7 +11744,7 @@ x_72 = l_Lean_Elab_Tactic_evalDecide___rarg___lambda__2___closed__2; x_73 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_73, 0, x_72); lean_ctor_set(x_73, 1, x_71); -x_74 = l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__4; +x_74 = l_Lean_Elab_Tactic_evalRename___lambda__1___closed__4; x_75 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_75, 0, x_73); lean_ctor_set(x_75, 1, x_74); @@ -13200,14 +13112,14 @@ l_Lean_Elab_Tactic_elabAsFVar___lambda__1___closed__1 = _init_l_Lean_Elab_Tactic lean_mark_persistent(l_Lean_Elab_Tactic_elabAsFVar___lambda__1___closed__1); l_Lean_Elab_Tactic_elabAsFVar___lambda__1___closed__2 = _init_l_Lean_Elab_Tactic_elabAsFVar___lambda__1___closed__2(); lean_mark_persistent(l_Lean_Elab_Tactic_elabAsFVar___lambda__1___closed__2); -l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__1 = _init_l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__1(); -lean_mark_persistent(l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__1); -l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__2 = _init_l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__2(); -lean_mark_persistent(l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__2); -l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__3 = _init_l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__3(); -lean_mark_persistent(l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__3); -l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__4 = _init_l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__4(); -lean_mark_persistent(l_Lean_withoutModifyingState___at_Lean_Elab_Tactic_evalRename___spec__8___at_Lean_Elab_Tactic_evalRename___spec__9___lambda__1___closed__4); +l_Lean_Elab_Tactic_evalRename___lambda__1___closed__1 = _init_l_Lean_Elab_Tactic_evalRename___lambda__1___closed__1(); +lean_mark_persistent(l_Lean_Elab_Tactic_evalRename___lambda__1___closed__1); +l_Lean_Elab_Tactic_evalRename___lambda__1___closed__2 = _init_l_Lean_Elab_Tactic_evalRename___lambda__1___closed__2(); +lean_mark_persistent(l_Lean_Elab_Tactic_evalRename___lambda__1___closed__2); +l_Lean_Elab_Tactic_evalRename___lambda__1___closed__3 = _init_l_Lean_Elab_Tactic_evalRename___lambda__1___closed__3(); +lean_mark_persistent(l_Lean_Elab_Tactic_evalRename___lambda__1___closed__3); +l_Lean_Elab_Tactic_evalRename___lambda__1___closed__4 = _init_l_Lean_Elab_Tactic_evalRename___lambda__1___closed__4(); +lean_mark_persistent(l_Lean_Elab_Tactic_evalRename___lambda__1___closed__4); l_Lean_Elab_Tactic_evalRename___closed__1 = _init_l_Lean_Elab_Tactic_evalRename___closed__1(); lean_mark_persistent(l_Lean_Elab_Tactic_evalRename___closed__1); l_Lean_Elab_Tactic_evalRename___closed__2 = _init_l_Lean_Elab_Tactic_evalRename___closed__2(); diff --git a/stage0/stdlib/Lean/Elab/Tactic/Induction.c b/stage0/stdlib/Lean/Elab/Tactic/Induction.c index a8d0973056..c7e8531986 100644 --- a/stage0/stdlib/Lean/Elab/Tactic/Induction.c +++ b/stage0/stdlib/Lean/Elab/Tactic/Induction.c @@ -223,7 +223,6 @@ static lean_object* l_Lean_Elab_Tactic_ElimApp_setMotiveArg___closed__4; lean_object* lean_array_fget(lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Elab_Tactic_Induction_0__Lean_Elab_Tactic_ElimApp_addNewArg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Tactic_ElimApp_instInhabitedAlt___closed__1; -LEAN_EXPORT lean_object* l_Lean_withoutModifyingState___at___private_Lean_Elab_Tactic_Induction_0__Lean_Elab_Tactic_ElimApp_getNumExplicitFields___spec__2___at___private_Lean_Elab_Tactic_Induction_0__Lean_Elab_Tactic_ElimApp_getNumExplicitFields___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); lean_object* l_Lean_Expr_mvar___override(lean_object*); LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_Tactic_Induction_0__Lean_Elab_Tactic_generalizeTargets___spec__1(size_t, size_t, lean_object*); @@ -247,6 +246,7 @@ static lean_object* l___private_Lean_Elab_Tactic_Induction_0__Lean_Elab_Tactic_g lean_object* l_Lean_Meta_mkHasTypeButIsExpectedMsg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Elab_Tactic_Induction_0__Lean_Elab_Tactic_ElimApp_saveAltVarsInfo___lambda__1(lean_object*, uint8_t, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MVarId_assign___at_Lean_Meta_getLevel___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l___private_Lean_Elab_Tactic_Induction_0__Lean_Elab_Tactic_ElimApp_getNumExplicitFields___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalCases___closed__2; lean_object* l_Lean_Elab_Tactic_closeUsingOrAdmit(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_Tactic_Induction_0__Lean_Elab_Tactic_checkAltsOfOptInductionAlts___spec__1___lambda__2(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -4878,223 +4878,183 @@ return x_24; } } } -LEAN_EXPORT lean_object* l_Lean_withoutModifyingState___at___private_Lean_Elab_Tactic_Induction_0__Lean_Elab_Tactic_ElimApp_getNumExplicitFields___spec__2___at___private_Lean_Elab_Tactic_Induction_0__Lean_Elab_Tactic_ElimApp_getNumExplicitFields___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +LEAN_EXPORT lean_object* l___private_Lean_Elab_Tactic_Induction_0__Lean_Elab_Tactic_ElimApp_getNumExplicitFields___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { -lean_object* x_8; lean_object* x_9; lean_object* x_10; uint8_t x_11; lean_object* x_12; -x_8 = l_Lean_Meta_saveState___rarg(x_4, x_5, x_6, x_7); -x_9 = lean_ctor_get(x_8, 0); -lean_inc(x_9); -x_10 = lean_ctor_get(x_8, 1); +uint8_t x_8; lean_object* x_9; +x_8 = 0; +x_9 = l_Lean_Meta_forallMetaBoundedTelescope(x_1, x_2, x_8, x_3, x_4, x_5, x_6, x_7); +if (lean_obj_tag(x_9) == 0) +{ +lean_object* x_10; lean_object* x_11; uint8_t x_12; +x_10 = lean_ctor_get(x_9, 0); lean_inc(x_10); -lean_dec(x_8); -x_11 = 0; -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -x_12 = l_Lean_Meta_forallMetaBoundedTelescope(x_2, x_1, x_11, x_3, x_4, x_5, x_6, x_10); -if (lean_obj_tag(x_12) == 0) +x_11 = lean_ctor_get(x_10, 1); +lean_inc(x_11); +lean_dec(x_10); +x_12 = !lean_is_exclusive(x_9); +if (x_12 == 0) { -lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; -x_13 = lean_ctor_get(x_12, 0); -lean_inc(x_13); -x_14 = lean_ctor_get(x_13, 1); -lean_inc(x_14); +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; uint8_t x_17; +x_13 = lean_ctor_get(x_9, 0); lean_dec(x_13); -x_15 = lean_ctor_get(x_12, 1); -lean_inc(x_15); -lean_dec(x_12); -x_16 = lean_ctor_get(x_14, 0); -lean_inc(x_16); +x_14 = lean_ctor_get(x_11, 0); +lean_inc(x_14); +lean_dec(x_11); +x_15 = lean_array_get_size(x_14); +x_16 = lean_unsigned_to_nat(0u); +x_17 = lean_nat_dec_lt(x_16, x_15); +if (x_17 == 0) +{ +lean_dec(x_15); lean_dec(x_14); -x_17 = lean_array_get_size(x_16); -x_18 = lean_unsigned_to_nat(0u); -x_19 = lean_nat_dec_lt(x_18, x_17); -if (x_19 == 0) -{ -lean_object* x_20; uint8_t x_21; -lean_dec(x_17); -lean_dec(x_16); -x_20 = l_Lean_Meta_SavedState_restore(x_9, x_3, x_4, x_5, x_6, x_15); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_9); -x_21 = !lean_is_exclusive(x_20); -if (x_21 == 0) -{ -lean_object* x_22; -x_22 = lean_ctor_get(x_20, 0); -lean_dec(x_22); -lean_ctor_set(x_20, 0, x_18); -return x_20; +lean_ctor_set(x_9, 0, x_16); +return x_9; } else { -lean_object* x_23; lean_object* x_24; -x_23 = lean_ctor_get(x_20, 1); +uint8_t x_18; +x_18 = lean_nat_dec_le(x_15, x_15); +if (x_18 == 0) +{ +lean_dec(x_15); +lean_dec(x_14); +lean_ctor_set(x_9, 0, x_16); +return x_9; +} +else +{ +size_t x_19; size_t x_20; lean_object* x_21; +x_19 = 0; +x_20 = lean_usize_of_nat(x_15); +lean_dec(x_15); +x_21 = l_Array_foldlMUnsafe_fold___at___private_Lean_Elab_Tactic_Induction_0__Lean_Elab_Tactic_ElimApp_getNumExplicitFields___spec__1(x_14, x_19, x_20, x_16); +lean_dec(x_14); +lean_ctor_set(x_9, 0, x_21); +return x_9; +} +} +} +else +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; uint8_t x_26; +x_22 = lean_ctor_get(x_9, 1); +lean_inc(x_22); +lean_dec(x_9); +x_23 = lean_ctor_get(x_11, 0); lean_inc(x_23); -lean_dec(x_20); -x_24 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_24, 0, x_18); -lean_ctor_set(x_24, 1, x_23); -return x_24; +lean_dec(x_11); +x_24 = lean_array_get_size(x_23); +x_25 = lean_unsigned_to_nat(0u); +x_26 = lean_nat_dec_lt(x_25, x_24); +if (x_26 == 0) +{ +lean_object* x_27; +lean_dec(x_24); +lean_dec(x_23); +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_25); +lean_ctor_set(x_27, 1, x_22); +return x_27; +} +else +{ +uint8_t x_28; +x_28 = lean_nat_dec_le(x_24, x_24); +if (x_28 == 0) +{ +lean_object* x_29; +lean_dec(x_24); +lean_dec(x_23); +x_29 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_29, 0, x_25); +lean_ctor_set(x_29, 1, x_22); +return x_29; +} +else +{ +size_t x_30; size_t x_31; lean_object* x_32; lean_object* x_33; +x_30 = 0; +x_31 = lean_usize_of_nat(x_24); +lean_dec(x_24); +x_32 = l_Array_foldlMUnsafe_fold___at___private_Lean_Elab_Tactic_Induction_0__Lean_Elab_Tactic_ElimApp_getNumExplicitFields___spec__1(x_23, x_30, x_31, x_25); +lean_dec(x_23); +x_33 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_33, 0, x_32); +lean_ctor_set(x_33, 1, x_22); +return x_33; +} +} } } else { -uint8_t x_25; -x_25 = lean_nat_dec_le(x_17, x_17); -if (x_25 == 0) +uint8_t x_34; +x_34 = !lean_is_exclusive(x_9); +if (x_34 == 0) { -lean_object* x_26; uint8_t x_27; -lean_dec(x_17); -lean_dec(x_16); -x_26 = l_Lean_Meta_SavedState_restore(x_9, x_3, x_4, x_5, x_6, x_15); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); +return x_9; +} +else +{ +lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_35 = lean_ctor_get(x_9, 0); +x_36 = lean_ctor_get(x_9, 1); +lean_inc(x_36); +lean_inc(x_35); lean_dec(x_9); -x_27 = !lean_is_exclusive(x_26); -if (x_27 == 0) -{ -lean_object* x_28; -x_28 = lean_ctor_get(x_26, 0); -lean_dec(x_28); -lean_ctor_set(x_26, 0, x_18); -return x_26; -} -else -{ -lean_object* x_29; lean_object* x_30; -x_29 = lean_ctor_get(x_26, 1); -lean_inc(x_29); -lean_dec(x_26); -x_30 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_30, 0, x_18); -lean_ctor_set(x_30, 1, x_29); -return x_30; -} -} -else -{ -size_t x_31; size_t x_32; lean_object* x_33; lean_object* x_34; uint8_t x_35; -x_31 = 0; -x_32 = lean_usize_of_nat(x_17); -lean_dec(x_17); -x_33 = l_Array_foldlMUnsafe_fold___at___private_Lean_Elab_Tactic_Induction_0__Lean_Elab_Tactic_ElimApp_getNumExplicitFields___spec__1(x_16, x_31, x_32, x_18); -lean_dec(x_16); -x_34 = l_Lean_Meta_SavedState_restore(x_9, x_3, x_4, x_5, x_6, x_15); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_9); -x_35 = !lean_is_exclusive(x_34); -if (x_35 == 0) -{ -lean_object* x_36; -x_36 = lean_ctor_get(x_34, 0); -lean_dec(x_36); -lean_ctor_set(x_34, 0, x_33); -return x_34; -} -else -{ -lean_object* x_37; lean_object* x_38; -x_37 = lean_ctor_get(x_34, 1); -lean_inc(x_37); -lean_dec(x_34); -x_38 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_38, 0, x_33); -lean_ctor_set(x_38, 1, x_37); -return x_38; +x_37 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_37, 0, x_35); +lean_ctor_set(x_37, 1, x_36); +return x_37; } } } } -else -{ -lean_object* x_39; lean_object* x_40; lean_object* x_41; uint8_t x_42; -x_39 = lean_ctor_get(x_12, 0); -lean_inc(x_39); -x_40 = lean_ctor_get(x_12, 1); -lean_inc(x_40); -lean_dec(x_12); -x_41 = l_Lean_Meta_SavedState_restore(x_9, x_3, x_4, x_5, x_6, x_40); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_9); -x_42 = !lean_is_exclusive(x_41); -if (x_42 == 0) -{ -lean_object* x_43; -x_43 = lean_ctor_get(x_41, 0); -lean_dec(x_43); -lean_ctor_set_tag(x_41, 1); -lean_ctor_set(x_41, 0, x_39); -return x_41; -} -else -{ -lean_object* x_44; lean_object* x_45; -x_44 = lean_ctor_get(x_41, 1); -lean_inc(x_44); -lean_dec(x_41); -x_45 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_45, 0, x_39); -lean_ctor_set(x_45, 1, x_44); -return x_45; -} -} -} -} -LEAN_EXPORT lean_object* l___private_Lean_Elab_Tactic_Induction_0__Lean_Elab_Tactic_ElimApp_getNumExplicitFields___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +LEAN_EXPORT lean_object* l___private_Lean_Elab_Tactic_Induction_0__Lean_Elab_Tactic_ElimApp_getNumExplicitFields___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { lean_object* x_8; x_8 = l_Lean_MVarId_getType(x_1, x_3, x_4, x_5, x_6, x_7); if (lean_obj_tag(x_8) == 0) { -lean_object* x_9; lean_object* x_10; lean_object* x_11; +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; x_9 = lean_ctor_get(x_8, 0); lean_inc(x_9); x_10 = lean_ctor_get(x_8, 1); lean_inc(x_10); lean_dec(x_8); -x_11 = l_Lean_withoutModifyingState___at___private_Lean_Elab_Tactic_Induction_0__Lean_Elab_Tactic_ElimApp_getNumExplicitFields___spec__2___at___private_Lean_Elab_Tactic_Induction_0__Lean_Elab_Tactic_ElimApp_getNumExplicitFields___spec__3(x_2, x_9, x_3, x_4, x_5, x_6, x_10); -return x_11; +x_11 = lean_alloc_closure((void*)(l___private_Lean_Elab_Tactic_Induction_0__Lean_Elab_Tactic_ElimApp_getNumExplicitFields___lambda__1), 7, 2); +lean_closure_set(x_11, 0, x_9); +lean_closure_set(x_11, 1, x_2); +x_12 = l_Lean_withoutModifyingState___at___private_Lean_Elab_Tactic_Induction_0__Lean_Elab_Tactic_ElimApp_getNumExplicitFields___spec__2(x_11, x_3, x_4, x_5, x_6, x_10); +return x_12; } else { -uint8_t x_12; +uint8_t x_13; lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_12 = !lean_is_exclusive(x_8); -if (x_12 == 0) +x_13 = !lean_is_exclusive(x_8); +if (x_13 == 0) { return x_8; } else { -lean_object* x_13; lean_object* x_14; lean_object* x_15; -x_13 = lean_ctor_get(x_8, 0); -x_14 = lean_ctor_get(x_8, 1); +lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_14 = lean_ctor_get(x_8, 0); +x_15 = lean_ctor_get(x_8, 1); +lean_inc(x_15); lean_inc(x_14); -lean_inc(x_13); lean_dec(x_8); -x_15 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_15, 0, x_13); -lean_ctor_set(x_15, 1, x_14); -return x_15; +x_16 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_16, 0, x_14); +lean_ctor_set(x_16, 1, x_15); +return x_16; } } } @@ -5104,7 +5064,7 @@ _start: { lean_object* x_8; lean_object* x_9; lean_inc(x_1); -x_8 = lean_alloc_closure((void*)(l___private_Lean_Elab_Tactic_Induction_0__Lean_Elab_Tactic_ElimApp_getNumExplicitFields___lambda__1), 7, 2); +x_8 = lean_alloc_closure((void*)(l___private_Lean_Elab_Tactic_Induction_0__Lean_Elab_Tactic_ElimApp_getNumExplicitFields___lambda__2), 7, 2); lean_closure_set(x_8, 0, x_1); lean_closure_set(x_8, 1, x_2); x_9 = l_Lean_MVarId_withContext___at___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___spec__2___rarg(x_1, x_8, x_3, x_4, x_5, x_6, x_7); diff --git a/stage0/stdlib/Lean/Elab/Tactic/Split.c b/stage0/stdlib/Lean/Elab/Tactic/Split.c index bc584ed7b8..3aa0b5b116 100644 --- a/stage0/stdlib/Lean/Elab/Tactic/Split.c +++ b/stage0/stdlib/Lean/Elab/Tactic/Split.c @@ -31,7 +31,6 @@ static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalSplit_declRange___closed static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalSplit___closed__5; static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalSplit___closed__3; static lean_object* l_Lean_Elab_Tactic_evalSplit___lambda__1___closed__1; -lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_Tactic_evalSplit___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Tactic_evalSplit___closed__2; static lean_object* l___regBuiltin_Lean_Elab_Tactic_evalSplit_declRange___closed__5; @@ -48,6 +47,7 @@ lean_object* l_Lean_addBuiltinDeclarationRanges(lean_object*, lean_object*, lean lean_object* l_Lean_Elab_Tactic_getMainGoal(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_evalSplit___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_instInhabitedSyntax; +lean_object* l_Lean_Meta_splitTarget_x3f(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); size_t lean_usize_of_nat(lean_object*); lean_object* l_Lean_Meta_splitLocalDecl_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Elab_Tactic_tacticElabAttribute; @@ -297,7 +297,7 @@ lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); lean_inc(x_1); -x_9 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2(x_1, x_8, x_3, x_4, x_5, x_6, x_7); +x_9 = l_Lean_Meta_splitTarget_x3f(x_1, x_8, x_3, x_4, x_5, x_6, x_7); if (lean_obj_tag(x_9) == 0) { lean_object* x_10; @@ -923,7 +923,7 @@ lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_11); -x_14 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2(x_11, x_13, x_5, x_6, x_7, x_8, x_12); +x_14 = l_Lean_Meta_splitTarget_x3f(x_11, x_13, x_5, x_6, x_7, x_8, x_12); if (lean_obj_tag(x_14) == 0) { lean_object* x_15; diff --git a/stage0/stdlib/Lean/Meta/Match/Match.c b/stage0/stdlib/Lean/Meta/Match/Match.c index c4a9ef591b..cc0f32cfc4 100644 --- a/stage0/stdlib/Lean/Meta/Match/Match.c +++ b/stage0/stdlib/Lean/Meta/Match/Match.c @@ -26,15 +26,15 @@ static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_checkNu lean_object* lean_array_set(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Match_mkMatcher___lambda__15(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_LocalContext_foldrM___at_Lean_Meta_Match_withCleanLCtxFor___spec__1___boxed(lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_List_mapTRAux___at_Lean_Meta_Match_mkMatcher___spec__16___at_Lean_Meta_Match_mkMatcher___spec__17(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Match_mkMatcher___lambda__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_checkpointDefEq___at_Lean_Meta_isLevelDefEq___spec__1(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_solveCnstrs_go___closed__6; LEAN_EXPORT lean_object* l_panic___at_Lean_Meta_Match_processInaccessibleAsCtor___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); size_t lean_usize_add(size_t, size_t); +LEAN_EXPORT lean_object* l_List_filterTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__7(lean_object*, lean_object*, lean_object*); static lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processSkipInaccessible___spec__3___closed__2; -LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__2___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at___private_Lean_Meta_Match_Match_0__Lean_Meta_updateAlts___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT uint8_t l_List_foldr___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_isConstructorTransition___spec__1(uint8_t, lean_object*); lean_object* l_Lean_Expr_mvarId_x21(lean_object*); @@ -51,6 +51,7 @@ lean_object* l_Lean_stringToMessageData(lean_object*); static lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__2___closed__11; LEAN_EXPORT lean_object* l_List_foldr___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_hasAsPattern___spec__1___boxed(lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_checkNumPatterns___closed__2; +static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__4; LEAN_EXPORT lean_object* l_panic___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_mk_empty_array_with_capacity(lean_object*); uint8_t l_Array_contains___at___private_Lean_Meta_FunInfo_0__Lean_Meta_collectDeps_visit___spec__2(lean_object*, lean_object*); @@ -103,7 +104,6 @@ static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_process LEAN_EXPORT lean_object* l_Lean_Meta_MatcherApp_addArg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Util_0__outOfBounds___rarg(lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_withEqs_go(lean_object*); -LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__9___boxed(lean_object*, lean_object*, lean_object*); lean_object* lean_array_uset(lean_object*, size_t, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_collectArraySizes(lean_object*); lean_object* l_Lean_Meta_forallTelescopeReducing___at_Lean_Meta_getParamNames___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -124,10 +124,9 @@ lean_object* l_Lean_Meta_Match_AltLHS_collectFVars(lean_object*, lean_object*, l LEAN_EXPORT lean_object* l_Lean_Meta_matchMatcherApp_x3f___at_Lean_Meta_Match_withMkMatcherInput___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__4___closed__2; size_t lean_usize_sub(size_t, size_t); -static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__4; LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_expandVarIntoArrayLit(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_withAlts_loop___rarg___closed__12; -LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__6(lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__6(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_getConstInfo___at_Lean_Meta_mkConstWithFreshMVarLevels___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_expandVarIntoCtor_x3f___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Match_mkMatcher___lambda__13___boxed(lean_object**); @@ -145,19 +144,18 @@ LEAN_EXPORT lean_object* l_Lean_Meta_Match_getMkMatcherInputInContext(lean_objec LEAN_EXPORT lean_object* l_Lean_throwError___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_getUElimPos_x3f___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Match_processInaccessibleAsCtor___lambda__1___closed__3; LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_throwCasesException___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__11(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_name_eq(lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_checkNumPatterns(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_List_filterTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__8(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_constructorApp_x3f(lean_object*, lean_object*, uint8_t); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_solveCnstrs_go___lambda__3___closed__3; LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_filterTrivialCnstrs(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_List_mapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_expandVarIntoArrayLit_loop___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Match_mkMatcher___lambda__14(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_throwCasesException___rarg___closed__6; +static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__9; extern lean_object* l_Lean_Meta_Match_instInhabitedAlt; -LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__11___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_instInhabitedNat; +LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__3___boxed(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Match_MkMatcherInput_collectDependencies(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_hasValPattern___boxed(lean_object*); static lean_object* l_Lean_Meta_Match_mkMatcher___lambda__13___closed__2; @@ -170,7 +168,6 @@ LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_so LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_withAlts_loop___rarg___lambda__2___boxed(lean_object**); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_solveSomeLocalFVarIdCnstr_x3f___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_PersistentHashMap_insertAux_traverse___at_Lean_Meta_Match_mkMatcherAuxDefinition___spec__6(size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__9; lean_object* lean_expr_instantiate1(lean_object*, lean_object*); lean_object* l_Array_toSubarray___rarg(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_expandVarIntoCtor_x3f___lambda__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -187,10 +184,9 @@ LEAN_EXPORT lean_object* l_Array_foldrMUnsafe_fold___at_Lean_Meta_Match_withClea LEAN_EXPORT uint8_t l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_hasNatValPattern(lean_object*); LEAN_EXPORT lean_object* l_List_mapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processVariable___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Name_mkStr3(lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__7(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MessageData_ofList(lean_object*); +static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__2; static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_expandVarIntoCtor_x3f___lambda__2___closed__3; -static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__4; lean_object* l_Lean_Meta_isTypeCorrect(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_expandVarIntoCtor_x3f___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT uint8_t l_List_foldr___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_hasVarPattern___spec__1(uint8_t, lean_object*); @@ -201,16 +197,15 @@ static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_solveSo static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_throwCasesException___rarg___closed__4; LEAN_EXPORT lean_object* l_Lean_HashSetImp_contains___at_Lean_Meta_Match_mkMatcher___spec__3___boxed(lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_isFirstPatternVar___boxed(lean_object*); -static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__8; LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_solveCnstrs_go(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT uint8_t l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_inLocalDecls(lean_object*, lean_object*); +static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__4; static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_withAlts_loop___rarg___closed__10; LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_getInductiveVal_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_mapMUnsafe_map___at_Lean_Meta_Match_toPattern___spec__2(size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_List_foldl___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_collectArraySizes___spec__1(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Match_processInaccessibleAsCtor___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_foldrMUnsafe_fold___at_Lean_Meta_Match_withCleanLCtxFor___spec__24(lean_object*, lean_object*, size_t, size_t, lean_object*); -static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__2; LEAN_EXPORT lean_object* l_Array_foldrMUnsafe_fold___at_Lean_Meta_Match_withCleanLCtxFor___spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); size_t lean_usize_shift_right(size_t, size_t); static lean_object* l_Lean_Meta_Match_mkMatcher___lambda__5___closed__4; @@ -243,10 +238,8 @@ LEAN_EXPORT lean_object* l_Lean_Meta_Match_mkMatcher___lambda__3(lean_object*, l LEAN_EXPORT lean_object* l_List_foldr___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_hasVarPattern___spec__1___boxed(lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_traceStep(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_PersistentHashMap_insertAux_traverse___at_Lean_Meta_Match_mkMatcherAuxDefinition___spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__11___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkHashSetImp___rarg(lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__2(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__1; static lean_object* l_Lean_Meta_Match_getMkMatcherInputInContext___lambda__3___closed__4; LEAN_EXPORT lean_object* l_Lean_Meta_Match_getMkMatcherInputInContext___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_withEqs___rarg___closed__1; @@ -266,6 +259,7 @@ LEAN_EXPORT uint8_t l_List_foldr___at___private_Lean_Meta_Match_Match_0__Lean_Me LEAN_EXPORT lean_object* l_Lean_Meta_Match_mkMatcher___lambda__8(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_Match_withMkMatcherInput___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_solveCnstrs_go___closed__7; +LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_checkNextPatternTypes___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_ReaderT_pure___at_Lean_Meta_Match_mkMatcher___spec__5(lean_object*); LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_withAlts_mkMinorType___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -276,8 +270,9 @@ lean_object* l_Lean_mkAppN(lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_expandVarIntoCtor_x3f___lambda__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_withAlts_loop___rarg___closed__3; size_t lean_uint64_to_usize(uint64_t); +static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__3___closed__1; static lean_object* l_List_mapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processNonVariable___spec__1___closed__1; -LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Match_Match___hyg_16081_(lean_object*); +LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Match_Match___hyg_16091_(lean_object*); uint8_t l_Lean_Environment_hasUnsafe(lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_checkNextPatternTypes(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Match_mkMatcher___lambda__7___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -287,6 +282,7 @@ LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_pr LEAN_EXPORT lean_object* l_List_mapTRAux___at_Lean_Meta_Match_mkMatcher___spec__16(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_expandNatValuePattern___spec__1___closed__4; lean_object* l_Lean_PersistentHashMap_getCollisionNodeSize___rarg(lean_object*); +LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__8___boxed(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_List_foldl___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_solveCnstrs_go___spec__7(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_foldrMUnsafe_fold___at_Lean_Meta_Match_withCleanLCtxFor___spec__8(lean_object*, lean_object*, size_t, size_t, lean_object*); LEAN_EXPORT lean_object* l_List_mapTRAux___at_Lean_Meta_Match_mkMatcher___spec__16___at_Lean_Meta_Match_mkMatcher___spec__17___at_Lean_Meta_Match_mkMatcher___spec__18(lean_object*, lean_object*); @@ -325,15 +321,16 @@ LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_so LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Match_mkMatcher___lambda__10___boxed(lean_object**); LEAN_EXPORT lean_object* l_Lean_Meta_Match_mkMatcher___lambda__19(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__9(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Match_Pattern_toMessageData(lean_object*); lean_object* lean_st_ref_take(lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_expandVarIntoCtor_x3f___lambda__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Match_mkMatcher___lambda__18___boxed(lean_object**); +LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processSkipInaccessible___spec__3___closed__4; LEAN_EXPORT lean_object* l_Lean_Meta_Match_mkMatcher___lambda__9(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_process(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_foldrMUnsafe_fold___at_Lean_Meta_Match_withCleanLCtxFor___spec__8___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__8(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_foldrMUnsafe_fold___at_Lean_Meta_Match_withCleanLCtxFor___spec__21(lean_object*, lean_object*, size_t, size_t, lean_object*); lean_object* l_Lean_MVarId_admit(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_withAlts_loop___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -423,6 +420,7 @@ lean_object* l_Nat_repr(lean_object*); static lean_object* l_Lean_Meta_Match_getMkMatcherInputInContext___closed__3; LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Meta_Match_getMkMatcherInputInContext___spec__2(lean_object*, size_t, size_t, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Match_withMkMatcherInput(lean_object*); +static lean_object* l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__9___closed__2; LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Meta_Match_mkMatcher___spec__8(size_t, size_t, lean_object*); static lean_object* l_Array_mapIdxM_map___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processValue___spec__11___lambda__2___closed__1; LEAN_EXPORT lean_object* l_Lean_PersistentHashMap_findAtAux___at_Lean_Meta_Match_mkMatcherAuxDefinition___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -432,6 +430,7 @@ lean_object* l_Lean_Meta_mkArrayLit(lean_object*, lean_object*, lean_object*, le LEAN_EXPORT uint8_t l_List_foldr___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_hasNatValPattern___spec__1(uint8_t, lean_object*); static lean_object* l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processNonVariable___spec__2___closed__1; static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_expandVarIntoCtor_x3f___closed__1; +static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__3___closed__2; lean_object* lean_st_mk_ref(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Match_matcherExt; LEAN_EXPORT lean_object* l_Array_foldrMUnsafe_fold___at_Lean_Meta_Match_withCleanLCtxFor___spec__22___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -477,20 +476,20 @@ LEAN_EXPORT lean_object* l_List_mapM_loop___at___private_Lean_Meta_Match_Match_0 LEAN_EXPORT lean_object* l_List_mapTRAux___at_Lean_Meta_Match_mkMatcher___spec__9___at_Lean_Meta_Match_mkMatcher___spec__10___at_Lean_Meta_Match_mkMatcher___spec__11(lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_getUElimPos_x3f___closed__2; LEAN_EXPORT uint8_t l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_isFirstPatternVar(lean_object*); +static lean_object* l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__9___closed__1; static lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__2___closed__2; LEAN_EXPORT lean_object* l_Lean_addTrace___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_solveCnstrs_go___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint64_t lean_uint64_of_nat(lean_object*); LEAN_EXPORT lean_object* l_List_foldl___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_collectValues___spec__1(lean_object*, lean_object*); -static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__3; LEAN_EXPORT lean_object* l_Array_mapIdxM_map___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processArrayLit___spec__9(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_PersistentHashMap_insert___at_Lean_Meta_Match_mkMatcherAuxDefinition___spec__4(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_PersistentHashMap_find_x3f___at_Lean_Meta_Match_mkMatcherAuxDefinition___spec__1(lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_expandVarIntoCtor_x3f___lambda__5___closed__6; +static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__3; LEAN_EXPORT lean_object* l_Lean_Meta_Match_mkMatcher___lambda__16(lean_object*, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_instInhabitedExpr; lean_object* l_Lean_Meta_Match_addMatcherInfo(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processValue___spec__7___closed__1; -static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2___closed__1; LEAN_EXPORT lean_object* l_Lean_Meta_MatcherApp_addArg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_withCleanLCtxFor___spec__25___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processArrayLit___spec__4(lean_object*, lean_object*, lean_object*, lean_object*); @@ -531,6 +530,7 @@ LEAN_EXPORT lean_object* l_Lean_Meta_Match_getMkMatcherInputInContext___lambda__ LEAN_EXPORT lean_object* l_Lean_throwError___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_checkNextPatternTypes___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Match_getMkMatcherInputInContext___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); size_t lean_usize_mul(size_t, size_t); +static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__5; lean_object* l_Lean_Meta_Closure_mkValueTypeClosure(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Match_getMkMatcherInputInContext___lambda__3___closed__2; LEAN_EXPORT lean_object* l_Lean_Meta_MatcherApp_addArg_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -538,7 +538,7 @@ LEAN_EXPORT lean_object* l_Lean_Meta_Match_processInaccessibleAsCtor___lambda__1 static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_expandVarIntoCtor_x3f___lambda__2___closed__4; LEAN_EXPORT lean_object* l_List_foldr___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_hasValPattern___spec__1___boxed(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_List_mapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processVariable___spec__2___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__5; +LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT uint8_t l_List_foldr___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_isValueTransition___spec__1(uint8_t, lean_object*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_solveSomeLocalFVarIdCnstr_x3f_go___closed__1; LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processArrayLit___spec__5___boxed(lean_object*, lean_object*, lean_object*); @@ -557,9 +557,7 @@ size_t lean_usize_of_nat(lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_Match_withMkMatcherInput___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkSimpleThunkType(lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processVariable(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2___closed__2; lean_object* l_Lean_ConstantInfo_type(lean_object*); -static lean_object* l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10___closed__2; static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_expandVarIntoCtor_x3f___lambda__2___closed__1; LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processValue___spec__7(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_instBEqProd___rarg(lean_object*, lean_object*, lean_object*, lean_object*); @@ -571,11 +569,9 @@ LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_ex static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_withAlts_loop___rarg___lambda__1___closed__2; size_t lean_usize_land(size_t, size_t); lean_object* l_Lean_LocalDecl_fvarId(lean_object*); -static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__5; LEAN_EXPORT uint8_t l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_hasCtorPattern(lean_object*); lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_withMVarContextImp___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_throwCasesException(lean_object*); -static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__3; static lean_object* l_Lean_Meta_Match_MkMatcherInput_collectDependencies___closed__1; LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_withAlts_mkMinorType___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processLeaf___lambda__2___closed__1; @@ -586,12 +582,12 @@ LEAN_EXPORT lean_object* l_Lean_Meta_Match_MkMatcherInput_collectDependencies___ LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processLeaf_go___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_List_mapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_expandVarIntoArrayLit_loop___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Match_mkMatcher___spec__13(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PersistentArray_push___rarg(lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processLeaf___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Match_isCurrVarInductive___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_foldrMUnsafe_fold___at_Lean_Meta_Match_withCleanLCtxFor___spec__7(lean_object*, lean_object*, size_t, size_t, lean_object*); lean_object* l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__7___boxed(lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_expandVarIntoCtor_x3f___lambda__5___closed__2; LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processArrayLit___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Match_getNumEqsFromDiscrInfos(lean_object*); @@ -601,6 +597,7 @@ LEAN_EXPORT lean_object* l_List_foldr___at___private_Lean_Meta_Match_Match_0__Le LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processNonVariable___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_fvar___override(lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_solveCnstrs_go___spec__10(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____lambda__1___boxed(lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processArrayLit___lambda__1___closed__1; static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_process___closed__4; lean_object* l_Lean_MVarId_getType(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -613,7 +610,7 @@ LEAN_EXPORT lean_object* l___private_Lean_Data_PersistentArray_0__Lean_Persisten lean_object* l_Lean_Expr_const___override(lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_isNatValueTransition___boxed(lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_Match_getMkMatcherInputInContext___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__4(lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__4(lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_throwNonSupported___lambda__1___closed__2; extern uint8_t l_instInhabitedBool; LEAN_EXPORT lean_object* l_Lean_Meta_Match_MkMatcherInput_collectFVars(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -622,7 +619,6 @@ LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_updateAl LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_withAlts_mkMinorType___boxed__const__1; static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_expandVarIntoCtor_x3f___lambda__5___closed__1; static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_expandVarIntoCtor_x3f___lambda__2___closed__2; -static lean_object* l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10___closed__1; LEAN_EXPORT uint8_t l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_hasAsPattern(lean_object*); LEAN_EXPORT lean_object* l_List_foldr___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_hasCtorPattern___spec__1___boxed(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_panic___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processVariable___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -638,6 +634,7 @@ LEAN_EXPORT lean_object* l_Array_mapIdxM_map___at___private_Lean_Meta_Match_Matc static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_solveSomeLocalFVarIdCnstr_x3f___lambda__2___closed__4; extern lean_object* l_Id_instMonadId; LEAN_EXPORT lean_object* l_Array_foldrMUnsafe_fold___at_Lean_Meta_Match_withCleanLCtxFor___spec__11___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_List_filterTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__7___boxed(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_foldrMUnsafe_fold___at_Lean_Meta_Match_withCleanLCtxFor___spec__24___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_le(lean_object*, lean_object*); uint8_t lean_usize_dec_le(size_t, size_t); @@ -665,33 +662,34 @@ lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_instantiateForallAux(lean_ LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_Match_withMkMatcherInput___spec__3___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processValue___spec__7___closed__2; lean_object* l_Lean_Meta_Match_Alt_replaceFVarId(lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__3; static size_t l_Lean_PersistentHashMap_findAux___at_Lean_Meta_Match_mkMatcherAuxDefinition___spec__2___closed__2; LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_withAlts_mkMinorType___spec__1(size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Data_PersistentArray_0__Lean_PersistentArray_foldrMAux___at_Lean_Meta_Match_withCleanLCtxFor___spec__14(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_hasNatValPattern___boxed(lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Match_withCleanLCtxFor___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_Match_processInaccessibleAsCtor___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT uint8_t l_List_foldr___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_hasValPattern___spec__1(uint8_t, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processNonVariable___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__7; static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_expandVarIntoCtor_x3f___lambda__5___closed__4; static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_solveCnstrs_go___lambda__3___closed__4; LEAN_EXPORT lean_object* l_Array_foldlMUnsafe_fold___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_process___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__4___boxed(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Meta_Match_mkMatcher___spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Expr_isConstructorApp(lean_object*, lean_object*); static lean_object* l_Lean_Meta_Match_mkMatcher___lambda__3___closed__2; LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processSkipInaccessible(lean_object*); LEAN_EXPORT lean_object* l_List_foldr___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_checkNumPatterns___spec__1___boxed(lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__5; LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_updateAlts___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processValue___spec__7___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__7; LEAN_EXPORT lean_object* l___private_Lean_Data_PersistentArray_0__Lean_PersistentArray_foldrMAux___at_Lean_Meta_Match_withCleanLCtxFor___spec__3___boxed(lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_throwCasesException___rarg___closed__10; LEAN_EXPORT lean_object* l_Array_indexOfAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_getUElimPos_x3f___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l_Array_ofSubarray___rarg(lean_object*); lean_object* l_Lean_Meta_getLevel(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_MatcherApp_addArg___lambda__4___closed__2; -LEAN_EXPORT lean_object* l_List_filterTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__8___boxed(lean_object*, lean_object*, lean_object*); lean_object* lean_nat_mul(lean_object*, lean_object*); static lean_object* l_List_mapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processArrayLit___spec__8___closed__2; LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_traceState(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -724,7 +722,6 @@ static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_process extern lean_object* l_Lean_instInhabitedName; static size_t l_Lean_PersistentHashMap_findAux___at_Lean_Meta_Match_mkMatcherAuxDefinition___spec__2___closed__1; LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processAsPattern(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__1; LEAN_EXPORT lean_object* l_List_foldr___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_hasArrayLitPattern___spec__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_PersistentHashMap_mkEmptyEntries(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Match_getMkMatcherInputInContext___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -738,6 +735,7 @@ LEAN_EXPORT lean_object* l_Lean_Meta_Match_mkMatcher___lambda__18(lean_object*, lean_object* l_instBEq___rarg(lean_object*, lean_object*, lean_object*); lean_object* lean_infer_type(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_panic___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processSkipInaccessible___spec__2___closed__1; +static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__1; LEAN_EXPORT lean_object* l_Lean_addTrace___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_solveCnstrs_go___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_List_filterTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processValue___spec__4___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isExprDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -745,6 +743,7 @@ lean_object* l_Lean_MVarId_contradictionCore(lean_object*, lean_object*, lean_ob lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_mkFreshExprMVarImpl(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_isValueTransition___boxed(lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processLeaf_go___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__3(lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_updateAlts___lambda__3___closed__1; lean_object* l_Lean_Meta_Match_withGoalOf___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_foldrMUnsafe_fold___at_Lean_Meta_Match_withCleanLCtxFor___spec__15___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -764,6 +763,7 @@ LEAN_EXPORT lean_object* l_Array_foldrMUnsafe_fold___at_Lean_Meta_Match_withClea static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_expandVarIntoCtor_x3f___lambda__5___closed__3; LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_updateAlts___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Match_processInaccessibleAsCtor___closed__3; +static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__8; LEAN_EXPORT lean_object* l_Array_foldrMUnsafe_fold___at_Lean_Meta_Match_withCleanLCtxFor___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_mk_array(lean_object*, lean_object*); static lean_object* l_List_mapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processArrayLit___spec__8___closed__1; @@ -792,14 +792,14 @@ LEAN_EXPORT lean_object* l_Array_foldrMUnsafe_fold___at_Lean_Meta_Match_withClea lean_object* l_Lean_Meta_getMatcherInfo_x3f___at_Lean_Meta_reduceMatcher_x3f___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_traceStep___closed__2; static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processAsPattern___closed__2; +LEAN_EXPORT uint8_t l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____lambda__1(uint8_t, uint8_t); LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processArrayLit___spec__7(lean_object*, lean_object*, lean_object*); static lean_object* l_Array_mapIdxM_map___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processValue___spec__11___closed__2; lean_object* l_Lean_indentD(lean_object*); -LEAN_EXPORT lean_object* l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_withEqs___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_List_filterTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processArrayLit___spec__6(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__3(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____lambda__1___boxed(lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__9(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkFreshTypeMVar(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Match_examplesToMessageData(lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_solveCnstrs_go___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -819,7 +819,6 @@ LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_wi LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_expandVarIntoArrayLit_loop___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Match_getMkMatcherInputInContext___lambda__3___closed__1; LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processValue___spec__5(lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT uint8_t l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____lambda__1(uint8_t, uint8_t); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_inLocalDecls___boxed(lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processVariable___closed__1; lean_object* l_Lean_Meta_setInlineAttribute(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -828,12 +827,11 @@ LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_pr static lean_object* l_Lean_Meta_Match_mkMatcher___lambda__5___closed__3; LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_solveCnstrs_go___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Nat_foldTR_loop___at_Lean_Meta_Match_mkMatcher___spec__4(lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__2; lean_object* l_Lean_CollectFVars_State_addDependencies(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_PersistentArray_foldrM___at_Lean_Meta_Match_withCleanLCtxFor___spec__2___boxed(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_withEqs(lean_object*); lean_object* l_Lean_Expr_getAppFn(lean_object*); -LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__6___boxed(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processValue___spec__3(lean_object*, lean_object*, lean_object*); static lean_object* l_Array_mapMUnsafe_map___at_Lean_Meta_Match_getMkMatcherInputInContext___spec__5___closed__1; LEAN_EXPORT lean_object* l_Lean_throwError___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_solveCnstrs_go___spec__10___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -873,6 +871,7 @@ lean_object* l_EStateM_pure___rarg(lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_process___closed__1; LEAN_EXPORT lean_object* l_Array_foldrMUnsafe_fold___at_Lean_Meta_Match_withCleanLCtxFor___spec__10___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_lambdaTelescope___at___private_Lean_Meta_Eqns_0__Lean_Meta_mkSimpleEqThm___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__1; static lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__2___closed__4; LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_isVariableTransition___boxed(lean_object*); LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Meta_Match_mkMatcher___spec__2(size_t, size_t, lean_object*); @@ -887,6 +886,7 @@ LEAN_EXPORT lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_getMkMat lean_object* l_Lean_Meta_kabstract(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_FVarId_getType(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__2___closed__9; +LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__4___closed__1; lean_object* l_Array_mapMUnsafe_map___at_Lean_Meta_Closure_mkBinding___spec__1(size_t, size_t, lean_object*); LEAN_EXPORT lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_withCleanLCtxFor___spec__25(lean_object*, lean_object*, size_t, size_t, lean_object*); @@ -900,15 +900,16 @@ lean_object* l_Lean_PersistentHashMap_mkCollisionNode___rarg(lean_object*, lean_ lean_object* l_Lean_Meta_Match_Alt_applyFVarSubst(lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_throwCasesException___rarg___closed__12; LEAN_EXPORT lean_object* l_Array_foldrMUnsafe_fold___at_Lean_Meta_Match_withCleanLCtxFor___spec__11(lean_object*, lean_object*, size_t, size_t, lean_object*); -LEAN_EXPORT lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779_(lean_object*); -LEAN_EXPORT lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743_(lean_object*); +LEAN_EXPORT lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789_(lean_object*); +LEAN_EXPORT lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753_(lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_reorientCnstrs(lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_Match_withMkMatcherInput___spec__3___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_panic___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processAsPattern___spec__1___closed__1; lean_object* l_List_appendTR___rarg(lean_object*, lean_object*); LEAN_EXPORT uint8_t l_List_foldr___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_isArrayLitTransition___spec__1(uint8_t, lean_object*); +static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__2; static lean_object* l_Lean_PersistentHashMap_insertAux___at_Lean_Meta_Match_mkMatcherAuxDefinition___spec__5___closed__1; -LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__5(lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__5(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PersistentHashMap_instInhabitedPersistentHashMap___rarg(lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_process___closed__2; LEAN_EXPORT lean_object* l_List_filterAuxM___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_filterTrivialCnstrs___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -917,7 +918,6 @@ LEAN_EXPORT lean_object* l_List_replace___at___private_Lean_Meta_Match_Match_0__ lean_object* l_Lean_mkConstWithLevelParams___at_Lean_Meta_mkSimpCongrTheorem___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_instInhabitedMetaM___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_Match_withMkMatcherInput___spec__1(lean_object*); -static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__6; LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processNonVariable(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Expr_withAppAux___at_Lean_Meta_Match_getMkMatcherInputInContext___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processSkipInaccessible___spec__3___closed__3; @@ -935,6 +935,7 @@ static lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__2___close uint8_t lean_nat_dec_lt(lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_updateAlts___lambda__2___closed__1; static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_updateAlts___closed__1; +static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__6; static lean_object* l_Lean_Meta_Match_withMkMatcherInput___rarg___lambda__1___closed__2; LEAN_EXPORT lean_object* l_List_filterTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processValue___spec__4(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_throwError___at_Lean_Expr_abstractRangeM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -11589,232 +11590,7 @@ return x_36; } } } -LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__2___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { -_start: -{ -lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_30; -x_11 = l_Lean_Meta_saveState___rarg(x_7, x_8, x_9, x_10); -x_12 = lean_ctor_get(x_11, 0); -lean_inc(x_12); -x_13 = lean_ctor_get(x_11, 1); -lean_inc(x_13); -if (lean_is_exclusive(x_11)) { - lean_ctor_release(x_11, 0); - lean_ctor_release(x_11, 1); - x_14 = x_11; -} else { - lean_dec_ref(x_11); - x_14 = lean_box(0); -} -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -x_30 = l_Lean_Meta_Cases_cases(x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_13); -if (lean_obj_tag(x_30) == 0) -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; -lean_dec(x_1); -x_31 = lean_ctor_get(x_30, 0); -lean_inc(x_31); -x_32 = lean_ctor_get(x_30, 1); -lean_inc(x_32); -lean_dec(x_30); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -x_33 = lean_apply_6(x_2, x_31, x_6, x_7, x_8, x_9, x_32); -if (lean_obj_tag(x_33) == 0) -{ -lean_object* x_34; lean_object* x_35; -x_34 = lean_ctor_get(x_33, 0); -lean_inc(x_34); -x_35 = lean_ctor_get(x_33, 1); -lean_inc(x_35); -lean_dec(x_33); -x_15 = x_34; -x_16 = x_35; -goto block_29; -} -else -{ -lean_object* x_36; lean_object* x_37; lean_object* x_38; uint8_t x_39; -lean_dec(x_14); -x_36 = lean_ctor_get(x_33, 0); -lean_inc(x_36); -x_37 = lean_ctor_get(x_33, 1); -lean_inc(x_37); -lean_dec(x_33); -x_38 = l_Lean_Meta_SavedState_restore(x_12, x_6, x_7, x_8, x_9, x_37); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_12); -x_39 = !lean_is_exclusive(x_38); -if (x_39 == 0) -{ -lean_object* x_40; -x_40 = lean_ctor_get(x_38, 0); -lean_dec(x_40); -lean_ctor_set_tag(x_38, 1); -lean_ctor_set(x_38, 0, x_36); -return x_38; -} -else -{ -lean_object* x_41; lean_object* x_42; -x_41 = lean_ctor_get(x_38, 1); -lean_inc(x_41); -lean_dec(x_38); -x_42 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_42, 0, x_36); -lean_ctor_set(x_42, 1, x_41); -return x_42; -} -} -} -else -{ -lean_object* x_43; lean_object* x_44; lean_object* x_45; uint8_t x_46; -lean_dec(x_2); -x_43 = lean_ctor_get(x_30, 0); -lean_inc(x_43); -x_44 = lean_ctor_get(x_30, 1); -lean_inc(x_44); -lean_dec(x_30); -x_45 = lean_ctor_get(x_1, 2); -lean_inc(x_45); -x_46 = l_List_isEmpty___rarg(x_45); -lean_dec(x_45); -if (x_46 == 0) -{ -lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; uint8_t x_51; -lean_dec(x_14); -x_47 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_throwCasesException___rarg(x_1, x_43, x_6, x_7, x_8, x_9, x_44); -x_48 = lean_ctor_get(x_47, 0); -lean_inc(x_48); -x_49 = lean_ctor_get(x_47, 1); -lean_inc(x_49); -lean_dec(x_47); -x_50 = l_Lean_Meta_SavedState_restore(x_12, x_6, x_7, x_8, x_9, x_49); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_12); -x_51 = !lean_is_exclusive(x_50); -if (x_51 == 0) -{ -lean_object* x_52; -x_52 = lean_ctor_get(x_50, 0); -lean_dec(x_52); -lean_ctor_set_tag(x_50, 1); -lean_ctor_set(x_50, 0, x_48); -return x_50; -} -else -{ -lean_object* x_53; lean_object* x_54; -x_53 = lean_ctor_get(x_50, 1); -lean_inc(x_53); -lean_dec(x_50); -x_54 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_54, 0, x_48); -lean_ctor_set(x_54, 1, x_53); -return x_54; -} -} -else -{ -lean_object* x_55; -lean_dec(x_43); -lean_dec(x_1); -x_55 = lean_box(0); -x_15 = x_55; -x_16 = x_44; -goto block_29; -} -} -block_29: -{ -if (lean_obj_tag(x_15) == 0) -{ -lean_object* x_17; uint8_t x_18; -lean_dec(x_14); -x_17 = l_Lean_Meta_SavedState_restore(x_12, x_6, x_7, x_8, x_9, x_16); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_12); -x_18 = !lean_is_exclusive(x_17); -if (x_18 == 0) -{ -lean_object* x_19; lean_object* x_20; -x_19 = lean_ctor_get(x_17, 0); -lean_dec(x_19); -x_20 = lean_box(0); -lean_ctor_set(x_17, 0, x_20); -return x_17; -} -else -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_21 = lean_ctor_get(x_17, 1); -lean_inc(x_21); -lean_dec(x_17); -x_22 = lean_box(0); -x_23 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_23, 0, x_22); -lean_ctor_set(x_23, 1, x_21); -return x_23; -} -} -else -{ -uint8_t x_24; -lean_dec(x_12); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -x_24 = !lean_is_exclusive(x_15); -if (x_24 == 0) -{ -lean_object* x_25; -if (lean_is_scalar(x_14)) { - x_25 = lean_alloc_ctor(0, 2, 0); -} else { - x_25 = x_14; -} -lean_ctor_set(x_25, 0, x_15); -lean_ctor_set(x_25, 1, x_16); -return x_25; -} -else -{ -lean_object* x_26; lean_object* x_27; lean_object* x_28; -x_26 = lean_ctor_get(x_15, 0); -lean_inc(x_26); -lean_dec(x_15); -x_27 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_27, 0, x_26); -if (lean_is_scalar(x_14)) { - x_28 = lean_alloc_ctor(0, 2, 0); -} else { - x_28 = x_14; -} -lean_ctor_set(x_28, 0, x_27); -lean_ctor_set(x_28, 1, x_16); -return x_28; -} -} -} -} -} -LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__4(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { if (lean_obj_tag(x_2) == 0) @@ -11862,7 +11638,7 @@ goto _start; } } } -LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__5(lean_object* x_1, lean_object* x_2) { +LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__4(lean_object* x_1, lean_object* x_2) { _start: { if (lean_obj_tag(x_1) == 0) @@ -11960,7 +11736,7 @@ goto _start; } } } -LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__6(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__5(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { if (lean_obj_tag(x_3) == 0) @@ -12008,7 +11784,7 @@ goto _start; } } } -LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__7(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__6(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { if (lean_obj_tag(x_2) == 0) @@ -12056,7 +11832,7 @@ goto _start; } } } -LEAN_EXPORT lean_object* l_List_filterTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__8(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +LEAN_EXPORT lean_object* l_List_filterTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__7(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { if (lean_obj_tag(x_2) == 0) @@ -12240,7 +12016,7 @@ goto _start; } } } -LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__9(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__8(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { if (lean_obj_tag(x_2) == 0) @@ -12288,7 +12064,7 @@ goto _start; } } } -static lean_object* _init_l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10___closed__1() { +static lean_object* _init_l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__9___closed__1() { _start: { lean_object* x_1; @@ -12296,12 +12072,12 @@ x_1 = lean_mk_string_from_bytes("_private.Lean.Meta.Match.Match.0.Lean.Meta.Matc return x_1; } } -static lean_object* _init_l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10___closed__2() { +static lean_object* _init_l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__9___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; x_1 = l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processSkipInaccessible___spec__3___closed__1; -x_2 = l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10___closed__1; +x_2 = l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__9___closed__1; x_3 = lean_unsigned_to_nat(456u); x_4 = lean_unsigned_to_nat(37u); x_5 = l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processSkipInaccessible___spec__3___closed__3; @@ -12309,7 +12085,7 @@ x_6 = l___private_Init_Util_0__mkPanicMessageWithDecl(x_1, x_2, x_3, x_4, x_5); return x_6; } } -LEAN_EXPORT lean_object* l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +LEAN_EXPORT lean_object* l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__9(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { if (lean_obj_tag(x_2) == 0) @@ -12346,7 +12122,7 @@ if (lean_obj_tag(x_20) == 0) { lean_object* x_21; lean_object* x_22; lean_dec(x_10); -x_21 = l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10___closed__2; +x_21 = l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__9___closed__2; lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); @@ -12663,7 +12439,7 @@ lean_object* x_79; lean_object* x_80; lean_dec(x_29); lean_dec(x_20); lean_dec(x_10); -x_79 = l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10___closed__2; +x_79 = l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__9___closed__2; lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); @@ -12745,11 +12521,11 @@ goto _start; } } } -LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__11___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { _start: { lean_object* x_12; -x_12 = l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10(x_1, x_2, x_3, x_7, x_8, x_9, x_10, x_11); +x_12 = l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__9(x_1, x_2, x_3, x_7, x_8, x_9, x_10, x_11); if (lean_obj_tag(x_12) == 0) { uint8_t x_13; @@ -12812,7 +12588,7 @@ return x_23; } } } -LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__11(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { _start: { uint8_t x_12; @@ -12851,28 +12627,28 @@ lean_inc(x_2); lean_inc(x_21); x_22 = l_List_appendTR___rarg(x_21, x_2); x_23 = lean_box(0); -x_24 = l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__4(x_20, x_22, x_23); +x_24 = l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__3(x_20, x_22, x_23); x_25 = lean_ctor_get(x_14, 1); lean_inc(x_25); lean_dec(x_14); -x_26 = l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__5(x_21, x_23); +x_26 = l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__4(x_21, x_23); lean_inc(x_25); x_27 = lean_alloc_ctor(2, 2, 0); lean_ctor_set(x_27, 0, x_25); lean_ctor_set(x_27, 1, x_26); x_28 = lean_ctor_get(x_1, 3); lean_inc(x_28); -x_29 = l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__6(x_3, x_27, x_28, x_23); +x_29 = l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__5(x_3, x_27, x_28, x_23); lean_dec(x_27); -x_30 = l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__7(x_20, x_29, x_23); +x_30 = l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__6(x_20, x_29, x_23); x_31 = lean_ctor_get(x_1, 2); lean_inc(x_31); -x_32 = l_List_filterTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__8(x_25, x_31, x_23); -x_33 = l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__9(x_20, x_32, x_23); +x_32 = l_List_filterTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__7(x_25, x_31, x_23); +x_33 = l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__8(x_20, x_32, x_23); lean_dec(x_20); x_34 = l_List_reverse___rarg(x_33); lean_inc(x_18); -x_35 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__11___lambda__1), 11, 6); +x_35 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10___lambda__1), 11, 6); lean_closure_set(x_35, 0, x_25); lean_closure_set(x_35, 1, x_34); lean_closure_set(x_35, 2, x_23); @@ -13079,12 +12855,144 @@ return x_35; } } } -static lean_object* _init_l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2___closed__1() { +LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +_start: +{ +lean_object* x_12; +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +x_12 = l_Lean_Meta_Cases_cases(x_1, x_2, x_3, x_7, x_8, x_9, x_10, x_11); +if (lean_obj_tag(x_12) == 0) +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; +lean_dec(x_6); +x_13 = lean_ctor_get(x_12, 0); +lean_inc(x_13); +x_14 = lean_ctor_get(x_12, 1); +lean_inc(x_14); +lean_dec(x_12); +x_15 = lean_apply_6(x_4, x_13, x_7, x_8, x_9, x_10, x_14); +return x_15; +} +else +{ +uint8_t x_16; +lean_dec(x_4); +x_16 = !lean_is_exclusive(x_12); +if (x_16 == 0) +{ +lean_object* x_17; lean_object* x_18; uint8_t x_19; +x_17 = lean_ctor_get(x_12, 0); +x_18 = lean_ctor_get(x_12, 1); +x_19 = l_List_isEmpty___rarg(x_5); +if (x_19 == 0) +{ +lean_object* x_20; uint8_t x_21; +lean_free_object(x_12); +x_20 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_throwCasesException___rarg(x_6, x_17, x_7, x_8, x_9, x_10, x_18); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +x_21 = !lean_is_exclusive(x_20); +if (x_21 == 0) +{ +return x_20; +} +else +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_22 = lean_ctor_get(x_20, 0); +x_23 = lean_ctor_get(x_20, 1); +lean_inc(x_23); +lean_inc(x_22); +lean_dec(x_20); +x_24 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_24, 0, x_22); +lean_ctor_set(x_24, 1, x_23); +return x_24; +} +} +else +{ +lean_object* x_25; +lean_dec(x_17); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +x_25 = lean_box(0); +lean_ctor_set_tag(x_12, 0); +lean_ctor_set(x_12, 0, x_25); +return x_12; +} +} +else +{ +lean_object* x_26; lean_object* x_27; uint8_t x_28; +x_26 = lean_ctor_get(x_12, 0); +x_27 = lean_ctor_get(x_12, 1); +lean_inc(x_27); +lean_inc(x_26); +lean_dec(x_12); +x_28 = l_List_isEmpty___rarg(x_5); +if (x_28 == 0) +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; +x_29 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_throwCasesException___rarg(x_6, x_26, x_7, x_8, x_9, x_10, x_27); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +x_30 = lean_ctor_get(x_29, 0); +lean_inc(x_30); +x_31 = lean_ctor_get(x_29, 1); +lean_inc(x_31); +if (lean_is_exclusive(x_29)) { + lean_ctor_release(x_29, 0); + lean_ctor_release(x_29, 1); + x_32 = x_29; +} else { + lean_dec_ref(x_29); + x_32 = lean_box(0); +} +if (lean_is_scalar(x_32)) { + x_33 = lean_alloc_ctor(1, 2, 0); +} else { + x_33 = x_32; +} +lean_ctor_set(x_33, 0, x_30); +lean_ctor_set(x_33, 1, x_31); +return x_33; +} +else +{ +lean_object* x_34; lean_object* x_35; +lean_dec(x_26); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +x_34 = lean_box(0); +x_35 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_35, 0, x_34); +lean_ctor_set(x_35, 1, x_27); +return x_35; +} +} +} +} +} +static lean_object* _init_l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__3___closed__1() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; x_1 = l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processSkipInaccessible___spec__3___closed__1; -x_2 = l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10___closed__1; +x_2 = l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__9___closed__1; x_3 = lean_unsigned_to_nat(409u); x_4 = lean_unsigned_to_nat(26u); x_5 = l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processSkipInaccessible___spec__3___closed__3; @@ -13092,7 +13000,7 @@ x_6 = l___private_Init_Util_0__mkPanicMessageWithDecl(x_1, x_2, x_3, x_4, x_5); return x_6; } } -static lean_object* _init_l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2___closed__2() { +static lean_object* _init_l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__3___closed__2() { _start: { lean_object* x_1; lean_object* x_2; @@ -13101,7 +13009,7 @@ x_2 = lean_mk_empty_array_with_capacity(x_1); return x_2; } } -LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { lean_object* x_8; @@ -13112,13 +13020,13 @@ if (lean_obj_tag(x_8) == 0) { lean_object* x_9; lean_object* x_10; lean_dec(x_1); -x_9 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2___closed__1; +x_9 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__3___closed__1; x_10 = l_panic___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__1(x_9, x_3, x_4, x_5, x_6, x_7); return x_10; } else { -lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; x_11 = lean_ctor_get(x_1, 0); lean_inc(x_11); x_12 = lean_ctor_get(x_1, 2); @@ -13139,121 +13047,129 @@ lean_closure_set(x_16, 1, x_14); lean_closure_set(x_16, 2, x_1); x_17 = l_Lean_Expr_fvarId_x21(x_14); x_18 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_withEqs___rarg___closed__1; +lean_inc(x_1); +lean_inc(x_12); +lean_inc(x_17); +lean_inc(x_11); +x_19 = lean_alloc_closure((void*)(l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2___boxed), 11, 6); +lean_closure_set(x_19, 0, x_11); +lean_closure_set(x_19, 1, x_17); +lean_closure_set(x_19, 2, x_18); +lean_closure_set(x_19, 3, x_16); +lean_closure_set(x_19, 4, x_12); +lean_closure_set(x_19, 5, x_1); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); -lean_inc(x_17); -lean_inc(x_11); -lean_inc(x_1); -x_19 = l_Lean_commitWhenSome_x3f___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__2___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__3(x_1, x_16, x_11, x_17, x_18, x_3, x_4, x_5, x_6, x_7); -if (lean_obj_tag(x_19) == 0) -{ -lean_object* x_20; -x_20 = lean_ctor_get(x_19, 0); -lean_inc(x_20); +x_20 = l_Lean_commitWhenSome_x3f___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__2(x_19, x_3, x_4, x_5, x_6, x_7); if (lean_obj_tag(x_20) == 0) { -uint8_t x_21; +lean_object* x_21; +x_21 = lean_ctor_get(x_20, 0); +lean_inc(x_21); +if (lean_obj_tag(x_21) == 0) +{ +uint8_t x_22; lean_dec(x_17); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); -x_21 = !lean_is_exclusive(x_1); -if (x_21 == 0) +x_22 = !lean_is_exclusive(x_1); +if (x_22 == 0) { -lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; uint8_t x_26; -x_22 = lean_ctor_get(x_1, 3); -lean_dec(x_22); -x_23 = lean_ctor_get(x_1, 2); +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; +x_23 = lean_ctor_get(x_1, 3); lean_dec(x_23); -x_24 = lean_ctor_get(x_1, 1); +x_24 = lean_ctor_get(x_1, 2); lean_dec(x_24); -x_25 = lean_ctor_get(x_1, 0); +x_25 = lean_ctor_get(x_1, 1); lean_dec(x_25); -x_26 = !lean_is_exclusive(x_19); -if (x_26 == 0) +x_26 = lean_ctor_get(x_1, 0); +lean_dec(x_26); +x_27 = !lean_is_exclusive(x_20); +if (x_27 == 0) { -lean_object* x_27; lean_object* x_28; lean_object* x_29; -x_27 = lean_ctor_get(x_19, 0); -lean_dec(x_27); +lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_28 = lean_ctor_get(x_20, 0); +lean_dec(x_28); lean_ctor_set(x_1, 1, x_15); -x_28 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2___closed__2; -x_29 = lean_array_push(x_28, x_1); -lean_ctor_set(x_19, 0, x_29); -return x_19; +x_29 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__3___closed__2; +x_30 = lean_array_push(x_29, x_1); +lean_ctor_set(x_20, 0, x_30); +return x_20; } else { -lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; -x_30 = lean_ctor_get(x_19, 1); -lean_inc(x_30); -lean_dec(x_19); +lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; +x_31 = lean_ctor_get(x_20, 1); +lean_inc(x_31); +lean_dec(x_20); lean_ctor_set(x_1, 1, x_15); -x_31 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2___closed__2; -x_32 = lean_array_push(x_31, x_1); -x_33 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_33, 0, x_32); -lean_ctor_set(x_33, 1, x_30); -return x_33; +x_32 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__3___closed__2; +x_33 = lean_array_push(x_32, x_1); +x_34 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_34, 0, x_33); +lean_ctor_set(x_34, 1, x_31); +return x_34; } } else { -lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; +lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_dec(x_1); -x_34 = lean_ctor_get(x_19, 1); -lean_inc(x_34); -if (lean_is_exclusive(x_19)) { - lean_ctor_release(x_19, 0); - lean_ctor_release(x_19, 1); - x_35 = x_19; +x_35 = lean_ctor_get(x_20, 1); +lean_inc(x_35); +if (lean_is_exclusive(x_20)) { + lean_ctor_release(x_20, 0); + lean_ctor_release(x_20, 1); + x_36 = x_20; } else { - lean_dec_ref(x_19); - x_35 = lean_box(0); + lean_dec_ref(x_20); + x_36 = lean_box(0); } -x_36 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_36, 0, x_11); -lean_ctor_set(x_36, 1, x_15); -lean_ctor_set(x_36, 2, x_12); -lean_ctor_set(x_36, 3, x_13); -x_37 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2___closed__2; -x_38 = lean_array_push(x_37, x_36); -if (lean_is_scalar(x_35)) { - x_39 = lean_alloc_ctor(0, 2, 0); +x_37 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_37, 0, x_11); +lean_ctor_set(x_37, 1, x_15); +lean_ctor_set(x_37, 2, x_12); +lean_ctor_set(x_37, 3, x_13); +x_38 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__3___closed__2; +x_39 = lean_array_push(x_38, x_37); +if (lean_is_scalar(x_36)) { + x_40 = lean_alloc_ctor(0, 2, 0); } else { - x_39 = x_35; + x_40 = x_36; } -lean_ctor_set(x_39, 0, x_38); -lean_ctor_set(x_39, 1, x_34); -return x_39; +lean_ctor_set(x_40, 0, x_39); +lean_ctor_set(x_40, 1, x_35); +return x_40; } } else { -lean_object* x_40; lean_object* x_41; lean_object* x_42; size_t x_43; size_t x_44; lean_object* x_45; +lean_object* x_41; lean_object* x_42; lean_object* x_43; size_t x_44; size_t x_45; lean_object* x_46; lean_dec(x_13); lean_dec(x_12); lean_dec(x_11); -x_40 = lean_ctor_get(x_19, 1); -lean_inc(x_40); -lean_dec(x_19); -x_41 = lean_ctor_get(x_20, 0); +x_41 = lean_ctor_get(x_20, 1); lean_inc(x_41); lean_dec(x_20); -x_42 = lean_array_get_size(x_41); -x_43 = lean_usize_of_nat(x_42); -lean_dec(x_42); -x_44 = 0; -x_45 = l_Array_mapMUnsafe_map___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__11(x_1, x_15, x_17, x_43, x_44, x_41, x_3, x_4, x_5, x_6, x_40); +x_42 = lean_ctor_get(x_21, 0); +lean_inc(x_42); +lean_dec(x_21); +x_43 = lean_array_get_size(x_42); +x_44 = lean_usize_of_nat(x_43); +lean_dec(x_43); +x_45 = 0; +x_46 = l_Array_mapMUnsafe_map___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10(x_1, x_15, x_17, x_44, x_45, x_42, x_3, x_4, x_5, x_6, x_41); lean_dec(x_17); -return x_45; +return x_46; } } else { -uint8_t x_46; +uint8_t x_47; lean_dec(x_17); lean_dec(x_15); lean_dec(x_13); @@ -13264,23 +13180,23 @@ lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_46 = !lean_is_exclusive(x_19); -if (x_46 == 0) +x_47 = !lean_is_exclusive(x_20); +if (x_47 == 0) { -return x_19; +return x_20; } else { -lean_object* x_47; lean_object* x_48; lean_object* x_49; -x_47 = lean_ctor_get(x_19, 0); -x_48 = lean_ctor_get(x_19, 1); +lean_object* x_48; lean_object* x_49; lean_object* x_50; +x_48 = lean_ctor_get(x_20, 0); +x_49 = lean_ctor_get(x_20, 1); +lean_inc(x_49); lean_inc(x_48); -lean_inc(x_47); -lean_dec(x_19); -x_49 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_49, 0, x_47); -lean_ctor_set(x_49, 1, x_48); -return x_49; +lean_dec(x_20); +x_50 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_50, 0, x_48); +lean_ctor_set(x_50, 1, x_49); +return x_50; } } } @@ -13320,7 +13236,7 @@ x_11 = lean_ctor_get(x_8, 1); lean_inc(x_11); lean_dec(x_8); x_12 = lean_box(0); -x_13 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2(x_1, x_12, x_2, x_3, x_4, x_5, x_11); +x_13 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__3(x_1, x_12, x_2, x_3, x_4, x_5, x_11); return x_13; } else @@ -13336,58 +13252,58 @@ lean_inc(x_17); x_18 = lean_ctor_get(x_16, 1); lean_inc(x_18); lean_dec(x_16); -x_19 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2(x_1, x_17, x_2, x_3, x_4, x_5, x_18); +x_19 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__3(x_1, x_17, x_2, x_3, x_4, x_5, x_18); return x_19; } } } -LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__4___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; -x_4 = l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__4(x_1, x_2, x_3); +x_4 = l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__3(x_1, x_2, x_3); lean_dec(x_1); return x_4; } } -LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__6___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__5___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__6(x_1, x_2, x_3, x_4); +x_5 = l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__5(x_1, x_2, x_3, x_4); lean_dec(x_2); lean_dec(x_1); return x_5; } } -LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__7___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__6___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; -x_4 = l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__7(x_1, x_2, x_3); +x_4 = l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__6(x_1, x_2, x_3); lean_dec(x_1); return x_4; } } -LEAN_EXPORT lean_object* l_List_filterTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__8___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +LEAN_EXPORT lean_object* l_List_filterTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__7___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; -x_4 = l_List_filterTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__8(x_1, x_2, x_3); +x_4 = l_List_filterTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__7(x_1, x_2, x_3); lean_dec(x_1); return x_4; } } -LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__9___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +LEAN_EXPORT lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__8___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; -x_4 = l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__9(x_1, x_2, x_3); +x_4 = l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__8(x_1, x_2, x_3); lean_dec(x_1); return x_4; } } -LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__11___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { _start: { size_t x_12; size_t x_13; lean_object* x_14; @@ -13395,7 +13311,7 @@ x_12 = lean_unbox_usize(x_4); lean_dec(x_4); x_13 = lean_unbox_usize(x_5); lean_dec(x_5); -x_14 = l_Array_mapMUnsafe_map___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__11(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); +x_14 = l_Array_mapMUnsafe_map___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); lean_dec(x_3); return x_14; } @@ -13409,6 +13325,15 @@ lean_dec(x_1); return x_10; } } +LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +_start: +{ +lean_object* x_12; +x_12 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11); +lean_dec(x_5); +return x_12; +} +} LEAN_EXPORT lean_object* l_List_allM___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_altsAreCtorLike___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { @@ -21789,7 +21714,7 @@ lean_dec(x_2); return x_7; } } -static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__1() { +static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__1() { _start: { lean_object* x_1; @@ -21797,7 +21722,7 @@ x_1 = lean_mk_string_from_bytes("bootstrap", 9); return x_1; } } -static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__2() { +static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__2() { _start: { lean_object* x_1; @@ -21805,17 +21730,17 @@ x_1 = lean_mk_string_from_bytes("genMatcherCode", 14); return x_1; } } -static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__3() { +static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__1; -x_2 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__2; +x_1 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__1; +x_2 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__2; x_3 = l_Lean_Name_mkStr2(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__4() { +static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__4() { _start: { lean_object* x_1; @@ -21823,13 +21748,13 @@ x_1 = lean_mk_string_from_bytes("disable code generation for auxiliary matcher f return x_1; } } -static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__5() { +static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__5() { _start: { uint8_t x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; x_1 = 1; -x_2 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__1; -x_3 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__4; +x_2 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__1; +x_3 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__4; x_4 = lean_box(x_1); x_5 = lean_alloc_ctor(0, 3, 0); lean_ctor_set(x_5, 0, x_4); @@ -21838,17 +21763,17 @@ lean_ctor_set(x_5, 2, x_3); return x_5; } } -LEAN_EXPORT lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743_(lean_object* x_1) { +LEAN_EXPORT lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753_(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_2 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__3; -x_3 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__5; +x_2 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__3; +x_3 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__5; x_4 = l_Lean_Option_register___at_Std_Format_initFn____x40_Lean_Data_Format___hyg_87____spec__1(x_2, x_3, x_1); return x_4; } } -LEAN_EXPORT uint8_t l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____lambda__1(uint8_t x_1, uint8_t x_2) { +LEAN_EXPORT uint8_t l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____lambda__1(uint8_t x_1, uint8_t x_2) { _start: { if (x_1 == 0) @@ -21872,37 +21797,37 @@ return x_2; } } } -static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__1() { +static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__1() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____lambda__1___boxed), 2, 0); +x_1 = lean_alloc_closure((void*)(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____lambda__1___boxed), 2, 0); return x_1; } } -static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__2() { +static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__2() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__1; +x_1 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__1; x_2 = lean_alloc_closure((void*)(l_instBEq___rarg), 3, 1); lean_closure_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__3() { +static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Expr_instBEqExpr; -x_2 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__2; +x_2 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__2; x_3 = lean_alloc_closure((void*)(l_instBEqProd___rarg), 4, 2); lean_closure_set(x_3, 0, x_1); lean_closure_set(x_3, 1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__4() { +static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__4() { _start: { lean_object* x_1; @@ -21910,19 +21835,19 @@ x_1 = lean_alloc_closure((void*)(l_instHashableBool___boxed), 1, 0); return x_1; } } -static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__5() { +static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__5() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Expr_instHashableExpr; -x_2 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__4; +x_2 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__4; x_3 = lean_alloc_closure((void*)(l_instHashableProd___rarg___boxed), 3, 2); lean_closure_set(x_3, 0, x_1); lean_closure_set(x_3, 1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__6() { +static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__6() { _start: { lean_object* x_1; @@ -21930,21 +21855,21 @@ x_1 = l_Lean_PersistentHashMap_mkEmptyEntriesArray(lean_box(0), lean_box(0)); return x_1; } } -static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__7() { +static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__7() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__6; +x_1 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__6; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__8() { +static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__8() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__7; +x_1 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__7; x_2 = lean_unsigned_to_nat(0u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -21952,26 +21877,26 @@ lean_ctor_set(x_3, 1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__9() { +static lean_object* _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__9() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__8; +x_1 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__8; x_2 = lean_alloc_closure((void*)(l_EStateM_pure___rarg), 2, 1); lean_closure_set(x_2, 0, x_1); return x_2; } } -LEAN_EXPORT lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779_(lean_object* x_1) { +LEAN_EXPORT lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789_(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; -x_2 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__9; +x_2 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__9; x_3 = l_Lean_EnvExtensionInterfaceUnsafe_registerExt___rarg(x_2, x_1); return x_3; } } -LEAN_EXPORT lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____lambda__1___boxed(lean_object* x_1, lean_object* x_2) { +LEAN_EXPORT lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____lambda__1___boxed(lean_object* x_1, lean_object* x_2) { _start: { uint8_t x_3; uint8_t x_4; uint8_t x_5; lean_object* x_6; @@ -21979,7 +21904,7 @@ x_3 = lean_unbox(x_1); lean_dec(x_1); x_4 = lean_unbox(x_2); lean_dec(x_2); -x_5 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____lambda__1(x_3, x_4); +x_5 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____lambda__1(x_3, x_4); x_6 = lean_box(x_5); return x_6; } @@ -23152,7 +23077,7 @@ static lean_object* _init_l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__2__ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__7; +x_1 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__7; x_2 = lean_unsigned_to_nat(0u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -23175,7 +23100,7 @@ static lean_object* _init_l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__2__ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__7; +x_1 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__7; x_2 = lean_unsigned_to_nat(0u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -23195,7 +23120,7 @@ static lean_object* _init_l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__2__ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__7; +x_1 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__7; x_2 = lean_unsigned_to_nat(0u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -23207,7 +23132,7 @@ static lean_object* _init_l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__2__ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__7; +x_1 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__7; x_2 = lean_unsigned_to_nat(0u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -23241,7 +23166,7 @@ static lean_object* _init_l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__2__ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__7; +x_1 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__7; x_2 = lean_unsigned_to_nat(0u); x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -23726,8 +23651,8 @@ static lean_object* _init_l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__4__ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__3; -x_2 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__5; +x_1 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__3; +x_2 = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__5; x_3 = l_Lean_PersistentHashMap_instInhabitedPersistentHashMap___rarg(x_1, x_2); return x_3; } @@ -28858,7 +28783,7 @@ lean_inc(x_41); x_42 = lean_ctor_get(x_40, 1); lean_inc(x_42); lean_dec(x_40); -x_43 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2___closed__2; +x_43 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__3___closed__2; x_44 = lean_array_push(x_43, x_3); x_45 = l_Array_append___rarg(x_44, x_2); x_46 = lean_array_get_size(x_13); @@ -29652,7 +29577,7 @@ lean_dec(x_31); lean_inc(x_3); x_34 = l_Lean_mkAppN(x_6, x_3); x_35 = l_Lean_mkAppN(x_34, x_33); -x_36 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2___closed__2; +x_36 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__3___closed__2; lean_inc(x_7); x_37 = lean_array_push(x_36, x_7); lean_inc(x_3); @@ -32172,7 +32097,7 @@ x_26 = lean_ctor_get(x_24, 1); lean_inc(x_26); lean_dec(x_24); x_27 = l_Lean_ConstantInfo_type(x_25); -x_28 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2___closed__2; +x_28 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__3___closed__2; x_29 = lean_array_push(x_28, x_9); x_30 = l_Array_append___rarg(x_8, x_29); x_31 = lean_unsigned_to_nat(0u); @@ -32476,7 +32401,7 @@ x_87 = lean_ctor_get(x_85, 1); lean_inc(x_87); lean_dec(x_85); x_88 = l_Lean_ConstantInfo_type(x_86); -x_89 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2___closed__2; +x_89 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__3___closed__2; x_90 = lean_array_push(x_89, x_9); x_91 = l_Array_append___rarg(x_8, x_90); x_92 = lean_unsigned_to_nat(0u); @@ -34482,7 +34407,7 @@ lean_inc(x_25); lean_dec(x_23); x_26 = lean_ctor_get(x_2, 2); lean_inc(x_26); -x_27 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2___closed__2; +x_27 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__3___closed__2; x_28 = lean_array_push(x_27, x_3); x_29 = lean_ctor_get(x_2, 8); lean_inc(x_29); @@ -34516,7 +34441,7 @@ lean_inc(x_35); lean_dec(x_32); x_36 = lean_ctor_get(x_2, 2); lean_inc(x_36); -x_37 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2___closed__2; +x_37 = l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__3___closed__2; x_38 = lean_array_push(x_37, x_3); x_39 = lean_ctor_get(x_2, 8); lean_inc(x_39); @@ -35117,7 +35042,7 @@ return x_21; } } } -LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Match_Match___hyg_16081_(lean_object* x_1) { +LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Match_Match___hyg_16091_(lean_object* x_1) { _start: { lean_object* x_2; uint8_t x_3; lean_object* x_4; @@ -35418,16 +35343,16 @@ l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_throwCasesException___rarg_ lean_mark_persistent(l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_throwCasesException___rarg___closed__17); l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_throwCasesException___rarg___closed__18 = _init_l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_throwCasesException___rarg___closed__18(); lean_mark_persistent(l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_throwCasesException___rarg___closed__18); -l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10___closed__1 = _init_l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10___closed__1(); -lean_mark_persistent(l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10___closed__1); -l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10___closed__2 = _init_l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10___closed__2(); -lean_mark_persistent(l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__10___closed__2); +l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__9___closed__1 = _init_l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__9___closed__1(); +lean_mark_persistent(l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__9___closed__1); +l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__9___closed__2 = _init_l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__9___closed__2(); +lean_mark_persistent(l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__9___closed__2); l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__1___closed__1 = _init_l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__1___closed__1(); lean_mark_persistent(l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__1___closed__1); -l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2___closed__1 = _init_l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2___closed__1(); -lean_mark_persistent(l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2___closed__1); -l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2___closed__2 = _init_l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2___closed__2(); -lean_mark_persistent(l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__2___closed__2); +l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__3___closed__1 = _init_l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__3___closed__1(); +lean_mark_persistent(l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__3___closed__1); +l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__3___closed__2 = _init_l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__3___closed__2(); +lean_mark_persistent(l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___lambda__3___closed__2); l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___closed__1 = _init_l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___closed__1(); lean_mark_persistent(l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___closed__1); l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___closed__2 = _init_l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___closed__2(); @@ -35516,40 +35441,40 @@ l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_getUElimPos_x3f___closed__1 lean_mark_persistent(l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_getUElimPos_x3f___closed__1); l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_getUElimPos_x3f___closed__2 = _init_l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_getUElimPos_x3f___closed__2(); lean_mark_persistent(l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_getUElimPos_x3f___closed__2); -l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__1 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__1(); -lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__1); -l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__2 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__2(); -lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__2); -l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__3 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__3(); -lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__3); -l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__4 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__4(); -lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__4); -l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__5 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__5(); -lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743____closed__5); -if (builtin) {res = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10743_(lean_io_mk_world()); +l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__1 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__1(); +lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__1); +l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__2 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__2(); +lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__2); +l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__3 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__3(); +lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__3); +l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__4 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__4(); +lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__4); +l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__5 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__5(); +lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753____closed__5); +if (builtin) {res = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10753_(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; l_Lean_Meta_Match_bootstrap_genMatcherCode = lean_io_result_get_value(res); lean_mark_persistent(l_Lean_Meta_Match_bootstrap_genMatcherCode); lean_dec_ref(res); -}l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__1 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__1(); -lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__1); -l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__2 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__2(); -lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__2); -l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__3 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__3(); -lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__3); -l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__4 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__4(); -lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__4); -l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__5 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__5(); -lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__5); -l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__6 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__6(); -lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__6); -l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__7 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__7(); -lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__7); -l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__8 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__8(); -lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__8); -l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__9 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__9(); -lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779____closed__9); -if (builtin) {res = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10779_(lean_io_mk_world()); +}l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__1 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__1(); +lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__1); +l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__2 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__2(); +lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__2); +l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__3 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__3(); +lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__3); +l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__4 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__4(); +lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__4); +l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__5 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__5(); +lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__5); +l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__6 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__6(); +lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__6); +l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__7 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__7(); +lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__7); +l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__8 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__8(); +lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__8); +l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__9 = _init_l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__9(); +lean_mark_persistent(l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789____closed__9); +if (builtin) {res = l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_10789_(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; l_Lean_Meta_Match_matcherExt = lean_io_result_get_value(res); lean_mark_persistent(l_Lean_Meta_Match_matcherExt); @@ -35688,7 +35613,7 @@ l_Lean_Meta_MatcherApp_addArg___lambda__4___closed__3 = _init_l_Lean_Meta_Matche lean_mark_persistent(l_Lean_Meta_MatcherApp_addArg___lambda__4___closed__3); l_Lean_Meta_MatcherApp_addArg___lambda__4___closed__4 = _init_l_Lean_Meta_MatcherApp_addArg___lambda__4___closed__4(); lean_mark_persistent(l_Lean_Meta_MatcherApp_addArg___lambda__4___closed__4); -res = l_Lean_Meta_initFn____x40_Lean_Meta_Match_Match___hyg_16081_(lean_io_mk_world()); +res = l_Lean_Meta_initFn____x40_Lean_Meta_Match_Match___hyg_16091_(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); return lean_io_result_mk_ok(lean_box(0)); diff --git a/stage0/stdlib/Lean/Meta/Match/MatchEqs.c b/stage0/stdlib/Lean/Meta/Match/MatchEqs.c index 565c86d7cf..71854f5451 100644 --- a/stage0/stdlib/Lean/Meta/Match/MatchEqs.c +++ b/stage0/stdlib/Lean/Meta/Match/MatchEqs.c @@ -147,8 +147,8 @@ LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_MatchEqs_0__Lean_Meta_Match static lean_object* l_Lean_Meta_Match_proveCondEqThm_go___lambda__2___closed__11; lean_object* lean_array_push(lean_object*, lean_object*); lean_object* lean_array_get_size(lean_object*); +lean_object* l_Lean_Meta_subst_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Match_forallAltTelescope_go___rarg___lambda__5___closed__4; -lean_object* l_Lean_observing_x3f___at_Lean_Meta_subst_x3f___spec__1___at_Lean_Meta_subst_x3f___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Match_MatchEqs_0__Lean_Meta_Match_mkSplitterProof_convertTemplate___lambda__3___closed__1; static lean_object* l___private_Lean_Meta_Match_MatchEqs_0__Lean_Meta_Match_SimpH_substRHS___closed__4; LEAN_EXPORT lean_object* l_Lean_Meta_withLetDecl___at___private_Lean_Meta_Match_MatchEqs_0__Lean_Meta_Match_mkSplitterProof_convertTemplate___spec__14(lean_object*, lean_object*); @@ -172,6 +172,7 @@ LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_MatchEqs_0__Lean_Meta_Match static lean_object* l___private_Lean_Meta_Match_MatchEqs_0__Lean_Meta_Match_mkSplitterProof_convertTemplate___closed__1; size_t lean_usize_shift_right(size_t, size_t); static lean_object* l___private_Lean_Meta_Match_MatchEqs_0__Lean_Meta_Match_mkEquationsFor___lambda__4___closed__1; +lean_object* l_Lean_Meta_splitIfTarget_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_MatchEqs_0__Lean_Meta_Match_mkEquationsFor___lambda__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_appArg_x21(lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Match_forallAltTelescope(lean_object*); @@ -555,7 +556,6 @@ lean_object* l_Lean_Meta_simpIfTarget(lean_object*, uint8_t, lean_object*, lean_ LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_MatchEqs_0__Lean_Meta_Match_injectionAnyCandidate_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_transform___at___private_Lean_Meta_Match_MatchEqs_0__Lean_Meta_Match_mkSplitterProof_convertTemplate___spec__6(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Meta_Match_MatchEqs_0__Lean_Meta_Match_mkEquationsFor___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfTarget_x3f___spec__1___at_Lean_Meta_splitIfTarget_x3f___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_MatchEqs_0__Lean_Meta_Match_mkSplitterProof_proveSubgoal___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Match_MatchEqs_0__Lean_Meta_Match_simpH_x3f___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Match_forallAltTelescope_go___rarg___closed__11; @@ -10258,7 +10258,7 @@ lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); lean_inc(x_1); -x_48 = l_Lean_observing_x3f___at_Lean_Meta_subst_x3f___spec__1___at_Lean_Meta_subst_x3f___spec__2(x_1, x_43, x_8, x_9, x_10, x_11, x_47); +x_48 = l_Lean_Meta_subst_x3f(x_1, x_43, x_8, x_9, x_10, x_11, x_47); x_49 = lean_ctor_get(x_48, 0); lean_inc(x_49); if (lean_obj_tag(x_49) == 0) @@ -10778,7 +10778,7 @@ lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); lean_inc(x_1); -x_49 = l_Lean_observing_x3f___at_Lean_Meta_subst_x3f___spec__1___at_Lean_Meta_subst_x3f___spec__2(x_1, x_44, x_8, x_9, x_10, x_11, x_48); +x_49 = l_Lean_Meta_subst_x3f(x_1, x_44, x_8, x_9, x_10, x_11, x_48); x_50 = lean_ctor_get(x_49, 0); lean_inc(x_50); if (lean_obj_tag(x_50) == 0) @@ -11832,7 +11832,7 @@ lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_12); -x_99 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfTarget_x3f___spec__1___at_Lean_Meta_splitIfTarget_x3f___spec__2(x_12, x_74, x_5, x_6, x_7, x_8, x_77); +x_99 = l_Lean_Meta_splitIfTarget_x3f(x_12, x_74, x_5, x_6, x_7, x_8, x_77); if (lean_obj_tag(x_99) == 0) { lean_object* x_100; diff --git a/stage0/stdlib/Lean/Meta/Tactic/Cases.c b/stage0/stdlib/Lean/Meta/Tactic/Cases.c index 96be230e68..c17ea20045 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Cases.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Cases.c @@ -41,7 +41,6 @@ lean_object* l_Lean_Meta_unifyEq_x3f(lean_object*, lean_object*, lean_object*, l LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_throwInductiveTypeExpected(lean_object*); lean_object* l_Lean_Name_str___override(lean_object*, lean_object*); lean_object* l_Lean_Meta_mkForallFVars(lean_object*, lean_object*, uint8_t, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__8(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_LocalDecl_userName(lean_object*); LEAN_EXPORT lean_object* l_Array_anyMUnsafe_any___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__51___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_MetavarContext_0__Lean_DependsOn_dep_visitMain___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__21___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -52,6 +51,7 @@ lean_object* l_Lean_MVarId_assert(lean_object*, lean_object*, lean_object*, lean lean_object* lean_array_uget(lean_object*, size_t); LEAN_EXPORT lean_object* l___private_Lean_MetavarContext_0__Lean_DependsOn_dep_visitApp___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__46(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Expr_withAppAux___at_Lean_Meta_generalizeIndices___spec__1___lambda__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_throwError___at_Lean_Meta_mkSimpCongrTheorem___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_MetavarContext_0__Lean_DependsOn_dep_visitApp___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__30___boxed(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_MetavarContext_0__Lean_DependsOn_dep_visitApp___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -60,7 +60,6 @@ LEAN_EXPORT lean_object* l_List_mapTRAux___at_Lean_MVarId_casesRec___spec__1(lea LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_withNewEqs_loop(lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_inductionCasesOn___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Expr_withAppAux___at_Lean_Meta_generalizeIndices___spec__1___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_PersistentArray_forInAux___at_Lean_MVarId_casesRec___spec__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_generalizeIndices___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Util_0__outOfBounds___rarg(lean_object*); static lean_object* l_Lean_Meta_Cases_cases___lambda__2___closed__1; @@ -72,7 +71,7 @@ lean_object* l_Lean_Meta_forallTelescopeReducing___at_Lean_Meta_getParamNames___ static lean_object* l_Lean_Meta_generalizeTargetsEq___lambda__3___closed__3; LEAN_EXPORT lean_object* l___private_Lean_MetavarContext_0__Lean_DependsOn_dep_visitMain___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__5(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_extract___rarg(lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_observing_x3f___at_Lean_MVarId_casesRec___spec__2___at_Lean_MVarId_casesRec___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_PersistentArray_forInAux___at_Lean_MVarId_casesRec___spec__4___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT uint8_t l_Array_anyMUnsafe_any___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__3(lean_object*, lean_object*, size_t, size_t); LEAN_EXPORT lean_object* l_Array_anyMUnsafe_any___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__42___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_withNewEqs_loop___rarg___closed__1; @@ -84,9 +83,8 @@ lean_object* lean_environment_find(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_PersistentArray_anyM___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__7___boxed(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_MVarId_cases(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MVarId_getTag(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_PersistentArray_forInAux___at_Lean_MVarId_casesRec___spec__5___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Cases_Context_majorTypeIndices___default___boxed(lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__6(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__6(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_observing_x3f___at_Lean_MVarId_casesRec___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_MVarId_byCases___closed__4; LEAN_EXPORT lean_object* l___private_Lean_MetavarContext_0__Lean_DependsOn_dep_visitMain___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__13(lean_object*, lean_object*, lean_object*, lean_object*); @@ -161,6 +159,7 @@ static lean_object* l_Lean_Meta_Cases_cases___lambda__2___closed__8; lean_object* lean_array_fget(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_toByCasesSubgoal___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_PersistentArray_forInAux___at_Lean_MVarId_casesRec___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Cases_cases___lambda__2___closed__4; static lean_object* l_Lean_Meta_Cases_unifyEqs_x3f___closed__1; lean_object* lean_st_ref_take(lean_object*, lean_object*); @@ -177,6 +176,7 @@ lean_object* l_Lean_Meta_throwNestedTacticEx___rarg(lean_object*, lean_object*, LEAN_EXPORT lean_object* l_Array_anyMUnsafe_any___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__52___boxed(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_MVarId_casesRec(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_FVarSubst_apply(lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_withNewEqs_loop___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_PersistentArray_anyMAux___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__54___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_generalizeTargetsEq___closed__2; @@ -185,7 +185,6 @@ static lean_object* l___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_mkEqAndProof lean_object* l_Lean_Expr_fvarId_x21(lean_object*); LEAN_EXPORT lean_object* l_Lean_MVarId_substEqs(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_toByCasesSubgoal(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__8___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_MVarId_byCases___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT uint8_t l_Array_anyMUnsafe_any___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__19(lean_object*, lean_object*, lean_object*, size_t, size_t); LEAN_EXPORT lean_object* l_Lean_Meta_generalizeIndices(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -220,7 +219,6 @@ uint8_t l_Lean_Expr_isAppOfArity(lean_object*, lean_object*, lean_object*); LEAN_EXPORT uint8_t l_Array_anyMUnsafe_any___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__51(lean_object*, lean_object*, lean_object*, size_t, size_t); extern lean_object* l_Lean_instInhabitedExpr; LEAN_EXPORT lean_object* l___private_Lean_MetavarContext_0__Lean_DependsOn_dep_visitApp___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__38(lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_PersistentArray_forIn___at_Lean_MVarId_casesRec___spec__4___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT uint8_t l_Array_anyMUnsafe_any___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__27(lean_object*, lean_object*, lean_object*, size_t, size_t); uint8_t l_Array_isEmpty___rarg(lean_object*); lean_object* l_Lean_LocalDecl_toExpr(lean_object*); @@ -231,8 +229,8 @@ LEAN_EXPORT lean_object* l_Lean_PersistentArray_anyM___at___private_Lean_Meta_Ta lean_object* l_Lean_mkEM(lean_object*); LEAN_EXPORT lean_object* l___private_Lean_MetavarContext_0__Lean_DependsOn_dep_visitApp___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__30(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT uint8_t l_Lean_PersistentArray_anyM___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__7(lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_PersistentArray_forIn___at_Lean_MVarId_casesRec___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_generalizeTargetsEq___lambda__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__6___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_whnf(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_saturate(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT uint8_t l_Array_anyMUnsafe_any___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__35(lean_object*, lean_object*, lean_object*, size_t, size_t); @@ -256,12 +254,13 @@ LEAN_EXPORT lean_object* l_Array_foldlMUnsafe_fold___at___private_Lean_Meta_Tact LEAN_EXPORT lean_object* l___private_Lean_MetavarContext_0__Lean_DependsOn_dep_visitApp___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__14___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkFreshExprMVarAt(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_LocalDecl_type(lean_object*); -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_throwTacticEx___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_FVarSubst_get(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_throwInductiveTypeExpected___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Cases_cases___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Cases_Context_nminors___default___boxed(lean_object*); +LEAN_EXPORT lean_object* l_Lean_PersistentArray_forIn___at_Lean_MVarId_casesRec___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Expr_withAppAux___at_Lean_Meta_generalizeIndices___spec__1___lambda__6___closed__3; LEAN_EXPORT lean_object* l_Lean_Expr_withAppAux___at_Lean_Meta_generalizeIndices___spec__1___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_fvar___override(lean_object*); @@ -292,7 +291,6 @@ LEAN_EXPORT lean_object* l_Lean_PersistentArray_anyM___at___private_Lean_Meta_Ta LEAN_EXPORT lean_object* l_Lean_PersistentArray_anyMAux___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__24___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_FVarSubst_insert(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_MVarId_casesRec___lambda__1___closed__1; -LEAN_EXPORT lean_object* l_Lean_PersistentArray_forIn___at_Lean_MVarId_casesRec___spec__4___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_MVarId_substEqs___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_MVarId_byCases___closed__3; lean_object* l_Lean_Meta_exactlyOne(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -345,6 +343,7 @@ LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_MVarId_byCases___spec__1___ static lean_object* l_Lean_Expr_withAppAux___at_Lean_Meta_generalizeIndices___spec__1___lambda__6___closed__2; LEAN_EXPORT lean_object* l_Array_anyMUnsafe_any___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__41___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_toByCasesSubgoal___closed__1; +LEAN_EXPORT lean_object* l_Lean_PersistentArray_forIn___at_Lean_MVarId_casesRec___spec__3___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_generalizeTargetsEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_throwInductiveTypeExpected___rarg___closed__1; LEAN_EXPORT uint8_t l_Array_anyMUnsafe_any___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__49(lean_object*, lean_object*, lean_object*, size_t, size_t); @@ -363,6 +362,7 @@ static lean_object* l_Lean_MVarId_casesAnd___lambda__1___closed__1; LEAN_EXPORT uint8_t l_Nat_anyTR_loop___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_generalizeTargetsEq___lambda__3___closed__2; lean_object* l_Lean_Expr_getAppFn(lean_object*); +LEAN_EXPORT lean_object* l_Lean_PersistentArray_forIn___at_Lean_MVarId_casesRec___spec__3___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkFreshExprSyntheticOpaqueMVar(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MetavarContext_getDecl(lean_object*, lean_object*); LEAN_EXPORT uint8_t l_Array_anyMUnsafe_any___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__9(lean_object*, lean_object*, lean_object*, size_t, size_t); @@ -396,11 +396,11 @@ LEAN_EXPORT lean_object* l_Array_anyMUnsafe_any___at___private_Lean_Meta_Tactic_ extern lean_object* l_Lean_casesOnSuffix; LEAN_EXPORT uint8_t l_Lean_PersistentArray_anyMAux___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__16(lean_object*, lean_object*, lean_object*); LEAN_EXPORT uint8_t l_Array_anyMUnsafe_any___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__42(lean_object*, lean_object*, lean_object*, size_t, size_t); -LEAN_EXPORT lean_object* l_Lean_PersistentArray_forInAux___at_Lean_MVarId_casesRec___spec__5___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT uint8_t l_Lean_PersistentArray_anyMAux___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__24(lean_object*, lean_object*, lean_object*); LEAN_EXPORT uint8_t l_Array_anyMUnsafe_any___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__25(lean_object*, lean_object*, lean_object*, size_t, size_t); lean_object* l_Lean_mkApp3(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_PersistentArray_anyM___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_hasIndepIndices___spec__47___boxed(lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_PersistentArray_forInAux___at_Lean_MVarId_casesRec___spec__4___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_Cases_inductionCasesOn(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_throwInductiveTypeExpected___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { @@ -13317,99 +13317,7 @@ return x_25; } } } -LEAN_EXPORT lean_object* l_Lean_observing_x3f___at_Lean_MVarId_casesRec___spec__2___at_Lean_MVarId_casesRec___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { -_start: -{ -lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; -x_9 = l_Lean_Meta_saveState___rarg(x_5, x_6, x_7, x_8); -x_10 = lean_ctor_get(x_9, 0); -lean_inc(x_10); -x_11 = lean_ctor_get(x_9, 1); -lean_inc(x_11); -lean_dec(x_9); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -x_12 = l_Lean_Meta_Cases_cases(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_11); -if (lean_obj_tag(x_12) == 0) -{ -uint8_t x_13; -lean_dec(x_10); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -x_13 = !lean_is_exclusive(x_12); -if (x_13 == 0) -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_14 = lean_ctor_get(x_12, 0); -x_15 = lean_array_to_list(lean_box(0), x_14); -x_16 = lean_box(0); -x_17 = l_List_mapTRAux___at_Lean_MVarId_casesRec___spec__1(x_15, x_16); -x_18 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_18, 0, x_17); -lean_ctor_set(x_12, 0, x_18); -return x_12; -} -else -{ -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_19 = lean_ctor_get(x_12, 0); -x_20 = lean_ctor_get(x_12, 1); -lean_inc(x_20); -lean_inc(x_19); -lean_dec(x_12); -x_21 = lean_array_to_list(lean_box(0), x_19); -x_22 = lean_box(0); -x_23 = l_List_mapTRAux___at_Lean_MVarId_casesRec___spec__1(x_21, x_22); -x_24 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_24, 0, x_23); -x_25 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_25, 0, x_24); -lean_ctor_set(x_25, 1, x_20); -return x_25; -} -} -else -{ -lean_object* x_26; lean_object* x_27; uint8_t x_28; -x_26 = lean_ctor_get(x_12, 1); -lean_inc(x_26); -lean_dec(x_12); -x_27 = l_Lean_Meta_SavedState_restore(x_10, x_4, x_5, x_6, x_7, x_26); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_10); -x_28 = !lean_is_exclusive(x_27); -if (x_28 == 0) -{ -lean_object* x_29; lean_object* x_30; -x_29 = lean_ctor_get(x_27, 0); -lean_dec(x_29); -x_30 = lean_box(0); -lean_ctor_set(x_27, 0, x_30); -return x_27; -} -else -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; -x_31 = lean_ctor_get(x_27, 1); -lean_inc(x_31); -lean_dec(x_27); -x_32 = lean_box(0); -x_33 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_33, 0, x_32); -lean_ctor_set(x_33, 1, x_31); -return x_33; -} -} -} -} -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__6(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, size_t x_7, size_t x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14) { +LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__5(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, size_t x_7, size_t x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14) { _start: { uint8_t x_15; @@ -13451,7 +13359,7 @@ lean_inc(x_4); lean_inc(x_3); lean_inc(x_2); lean_inc(x_1); -x_21 = l_Lean_PersistentArray_forInAux___at_Lean_MVarId_casesRec___spec__5(x_1, x_2, x_3, x_4, x_17, x_19, x_10, x_11, x_12, x_13, x_14); +x_21 = l_Lean_PersistentArray_forInAux___at_Lean_MVarId_casesRec___spec__4(x_1, x_2, x_3, x_4, x_17, x_19, x_10, x_11, x_12, x_13, x_14); if (lean_obj_tag(x_21) == 0) { lean_object* x_22; @@ -13565,7 +13473,7 @@ lean_inc(x_4); lean_inc(x_3); lean_inc(x_2); lean_inc(x_1); -x_39 = l_Lean_PersistentArray_forInAux___at_Lean_MVarId_casesRec___spec__5(x_1, x_2, x_3, x_4, x_17, x_38, x_10, x_11, x_12, x_13, x_14); +x_39 = l_Lean_PersistentArray_forInAux___at_Lean_MVarId_casesRec___spec__4(x_1, x_2, x_3, x_4, x_17, x_38, x_10, x_11, x_12, x_13, x_14); if (lean_obj_tag(x_39) == 0) { lean_object* x_40; @@ -13667,7 +13575,67 @@ return x_55; } } } -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__7(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, size_t x_6, size_t x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13) { +LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__6___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +_start: +{ +lean_object* x_9; +x_9 = l_Lean_Meta_Cases_cases(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); +if (lean_obj_tag(x_9) == 0) +{ +uint8_t x_10; +x_10 = !lean_is_exclusive(x_9); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_11 = lean_ctor_get(x_9, 0); +x_12 = lean_array_to_list(lean_box(0), x_11); +x_13 = lean_box(0); +x_14 = l_List_mapTRAux___at_Lean_MVarId_casesRec___spec__1(x_12, x_13); +lean_ctor_set(x_9, 0, x_14); +return x_9; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_15 = lean_ctor_get(x_9, 0); +x_16 = lean_ctor_get(x_9, 1); +lean_inc(x_16); +lean_inc(x_15); +lean_dec(x_9); +x_17 = lean_array_to_list(lean_box(0), x_15); +x_18 = lean_box(0); +x_19 = l_List_mapTRAux___at_Lean_MVarId_casesRec___spec__1(x_17, x_18); +x_20 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_20, 0, x_19); +lean_ctor_set(x_20, 1, x_16); +return x_20; +} +} +else +{ +uint8_t x_21; +x_21 = !lean_is_exclusive(x_9); +if (x_21 == 0) +{ +return x_9; +} +else +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_22 = lean_ctor_get(x_9, 0); +x_23 = lean_ctor_get(x_9, 1); +lean_inc(x_23); +lean_inc(x_22); +lean_dec(x_9); +x_24 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_24, 0, x_22); +lean_ctor_set(x_24, 1, x_23); +return x_24; +} +} +} +} +LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__6(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, size_t x_6, size_t x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13) { _start: { uint8_t x_14; @@ -13751,57 +13719,61 @@ goto block_29; } else { -lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; +lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; x_38 = lean_ctor_get(x_33, 1); lean_inc(x_38); lean_dec(x_33); x_39 = l_Lean_LocalDecl_fvarId(x_32); lean_dec(x_32); x_40 = l___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_withNewEqs___rarg___closed__1; +lean_inc(x_2); +x_41 = lean_alloc_closure((void*)(l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__6___lambda__1), 8, 3); +lean_closure_set(x_41, 0, x_2); +lean_closure_set(x_41, 1, x_39); +lean_closure_set(x_41, 2, x_40); lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); -lean_inc(x_2); -x_41 = l_Lean_observing_x3f___at_Lean_MVarId_casesRec___spec__2___at_Lean_MVarId_casesRec___spec__3(x_2, x_39, x_40, x_9, x_10, x_11, x_12, x_38); -x_42 = lean_ctor_get(x_41, 0); -lean_inc(x_42); -if (lean_obj_tag(x_42) == 0) -{ -lean_object* x_43; lean_object* x_44; -lean_free_object(x_16); -x_43 = lean_ctor_get(x_41, 1); +x_42 = l_Lean_observing_x3f___at_Lean_MVarId_casesRec___spec__2(x_41, x_9, x_10, x_11, x_12, x_38); +x_43 = lean_ctor_get(x_42, 0); lean_inc(x_43); -lean_dec(x_41); +if (lean_obj_tag(x_43) == 0) +{ +lean_object* x_44; lean_object* x_45; +lean_free_object(x_16); +x_44 = lean_ctor_get(x_42, 1); +lean_inc(x_44); +lean_dec(x_42); lean_inc(x_3); -x_44 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_44, 0, x_3); -x_19 = x_44; -x_20 = x_43; +x_45 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_45, 0, x_3); +x_19 = x_45; +x_20 = x_44; goto block_29; } else { -lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; -x_45 = lean_ctor_get(x_41, 1); -lean_inc(x_45); -lean_dec(x_41); -lean_ctor_set(x_16, 0, x_42); -x_46 = lean_box(0); -x_47 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_47, 0, x_16); -lean_ctor_set(x_47, 1, x_46); -x_48 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_48, 0, x_47); -x_19 = x_48; -x_20 = x_45; +lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; +x_46 = lean_ctor_get(x_42, 1); +lean_inc(x_46); +lean_dec(x_42); +lean_ctor_set(x_16, 0, x_43); +x_47 = lean_box(0); +x_48 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_48, 0, x_16); +lean_ctor_set(x_48, 1, x_47); +x_49 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_49, 0, x_48); +x_19 = x_49; +x_20 = x_46; goto block_29; } } } else { -uint8_t x_49; +uint8_t x_50; lean_free_object(x_16); lean_dec(x_32); lean_dec(x_18); @@ -13814,114 +13786,118 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_49 = !lean_is_exclusive(x_33); -if (x_49 == 0) +x_50 = !lean_is_exclusive(x_33); +if (x_50 == 0) { return x_33; } else { -lean_object* x_50; lean_object* x_51; lean_object* x_52; -x_50 = lean_ctor_get(x_33, 0); -x_51 = lean_ctor_get(x_33, 1); +lean_object* x_51; lean_object* x_52; lean_object* x_53; +x_51 = lean_ctor_get(x_33, 0); +x_52 = lean_ctor_get(x_33, 1); +lean_inc(x_52); lean_inc(x_51); -lean_inc(x_50); lean_dec(x_33); -x_52 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_52, 0, x_50); -lean_ctor_set(x_52, 1, x_51); -return x_52; +x_53 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_53, 0, x_51); +lean_ctor_set(x_53, 1, x_52); +return x_53; } } } else { -lean_object* x_53; lean_object* x_54; -x_53 = lean_ctor_get(x_16, 0); -lean_inc(x_53); +lean_object* x_54; lean_object* x_55; +x_54 = lean_ctor_get(x_16, 0); +lean_inc(x_54); lean_dec(x_16); lean_inc(x_1); lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); -lean_inc(x_53); -x_54 = lean_apply_6(x_1, x_53, x_9, x_10, x_11, x_12, x_13); -if (lean_obj_tag(x_54) == 0) +lean_inc(x_54); +x_55 = lean_apply_6(x_1, x_54, x_9, x_10, x_11, x_12, x_13); +if (lean_obj_tag(x_55) == 0) { -lean_object* x_55; uint8_t x_56; -x_55 = lean_ctor_get(x_54, 0); -lean_inc(x_55); -x_56 = lean_unbox(x_55); -lean_dec(x_55); -if (x_56 == 0) +lean_object* x_56; uint8_t x_57; +x_56 = lean_ctor_get(x_55, 0); +lean_inc(x_56); +x_57 = lean_unbox(x_56); +lean_dec(x_56); +if (x_57 == 0) { -lean_object* x_57; lean_object* x_58; -lean_dec(x_53); -x_57 = lean_ctor_get(x_54, 1); -lean_inc(x_57); +lean_object* x_58; lean_object* x_59; lean_dec(x_54); +x_58 = lean_ctor_get(x_55, 1); +lean_inc(x_58); +lean_dec(x_55); lean_inc(x_3); -x_58 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_58, 0, x_3); -x_19 = x_58; -x_20 = x_57; +x_59 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_59, 0, x_3); +x_19 = x_59; +x_20 = x_58; goto block_29; } else { -lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; -x_59 = lean_ctor_get(x_54, 1); -lean_inc(x_59); +lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; +x_60 = lean_ctor_get(x_55, 1); +lean_inc(x_60); +lean_dec(x_55); +x_61 = l_Lean_LocalDecl_fvarId(x_54); lean_dec(x_54); -x_60 = l_Lean_LocalDecl_fvarId(x_53); -lean_dec(x_53); -x_61 = l___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_withNewEqs___rarg___closed__1; +x_62 = l___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_withNewEqs___rarg___closed__1; +lean_inc(x_2); +x_63 = lean_alloc_closure((void*)(l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__6___lambda__1), 8, 3); +lean_closure_set(x_63, 0, x_2); +lean_closure_set(x_63, 1, x_61); +lean_closure_set(x_63, 2, x_62); lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); -lean_inc(x_2); -x_62 = l_Lean_observing_x3f___at_Lean_MVarId_casesRec___spec__2___at_Lean_MVarId_casesRec___spec__3(x_2, x_60, x_61, x_9, x_10, x_11, x_12, x_59); -x_63 = lean_ctor_get(x_62, 0); -lean_inc(x_63); -if (lean_obj_tag(x_63) == 0) +x_64 = l_Lean_observing_x3f___at_Lean_MVarId_casesRec___spec__2(x_63, x_9, x_10, x_11, x_12, x_60); +x_65 = lean_ctor_get(x_64, 0); +lean_inc(x_65); +if (lean_obj_tag(x_65) == 0) { -lean_object* x_64; lean_object* x_65; -x_64 = lean_ctor_get(x_62, 1); -lean_inc(x_64); -lean_dec(x_62); -lean_inc(x_3); -x_65 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_65, 0, x_3); -x_19 = x_65; -x_20 = x_64; -goto block_29; -} -else -{ -lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; -x_66 = lean_ctor_get(x_62, 1); +lean_object* x_66; lean_object* x_67; +x_66 = lean_ctor_get(x_64, 1); lean_inc(x_66); -lean_dec(x_62); +lean_dec(x_64); +lean_inc(x_3); x_67 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_67, 0, x_63); -x_68 = lean_box(0); -x_69 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_69, 0, x_67); -lean_ctor_set(x_69, 1, x_68); -x_70 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_70, 0, x_69); -x_19 = x_70; +lean_ctor_set(x_67, 0, x_3); +x_19 = x_67; x_20 = x_66; goto block_29; } +else +{ +lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; +x_68 = lean_ctor_get(x_64, 1); +lean_inc(x_68); +lean_dec(x_64); +x_69 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_69, 0, x_65); +x_70 = lean_box(0); +x_71 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_71, 0, x_69); +lean_ctor_set(x_71, 1, x_70); +x_72 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_72, 0, x_71); +x_19 = x_72; +x_20 = x_68; +goto block_29; +} } } else { -lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; -lean_dec(x_53); +lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; +lean_dec(x_54); lean_dec(x_18); lean_dec(x_17); lean_dec(x_12); @@ -13932,26 +13908,26 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_71 = lean_ctor_get(x_54, 0); -lean_inc(x_71); -x_72 = lean_ctor_get(x_54, 1); -lean_inc(x_72); -if (lean_is_exclusive(x_54)) { - lean_ctor_release(x_54, 0); - lean_ctor_release(x_54, 1); - x_73 = x_54; +x_73 = lean_ctor_get(x_55, 0); +lean_inc(x_73); +x_74 = lean_ctor_get(x_55, 1); +lean_inc(x_74); +if (lean_is_exclusive(x_55)) { + lean_ctor_release(x_55, 0); + lean_ctor_release(x_55, 1); + x_75 = x_55; } else { - lean_dec_ref(x_54); - x_73 = lean_box(0); + lean_dec_ref(x_55); + x_75 = lean_box(0); } -if (lean_is_scalar(x_73)) { - x_74 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_75)) { + x_76 = lean_alloc_ctor(1, 2, 0); } else { - x_74 = x_73; + x_76 = x_75; } -lean_ctor_set(x_74, 0, x_71); -lean_ctor_set(x_74, 1, x_72); -return x_74; +lean_ctor_set(x_76, 0, x_73); +lean_ctor_set(x_76, 1, x_74); +return x_76; } } } @@ -14008,7 +13984,7 @@ goto _start; } } } -LEAN_EXPORT lean_object* l_Lean_PersistentArray_forInAux___at_Lean_MVarId_casesRec___spec__5___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +LEAN_EXPORT lean_object* l_Lean_PersistentArray_forInAux___at_Lean_MVarId_casesRec___spec__4___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { lean_object* x_8; lean_object* x_9; @@ -14020,7 +13996,7 @@ lean_ctor_set(x_9, 1, x_7); return x_9; } } -LEAN_EXPORT lean_object* l_Lean_PersistentArray_forInAux___at_Lean_MVarId_casesRec___spec__5(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +LEAN_EXPORT lean_object* l_Lean_PersistentArray_forInAux___at_Lean_MVarId_casesRec___spec__4(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { _start: { if (lean_obj_tag(x_5) == 0) @@ -14041,7 +14017,7 @@ lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); -x_18 = l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__6(x_1, x_2, x_3, x_4, x_13, x_12, x_16, x_17, x_14, x_7, x_8, x_9, x_10, x_11); +x_18 = l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__5(x_1, x_2, x_3, x_4, x_13, x_12, x_16, x_17, x_14, x_7, x_8, x_9, x_10, x_11); lean_dec(x_12); if (lean_obj_tag(x_18) == 0) { @@ -14060,7 +14036,7 @@ x_22 = lean_ctor_get(x_19, 1); lean_inc(x_22); lean_dec(x_19); x_23 = lean_box(0); -x_24 = l_Lean_PersistentArray_forInAux___at_Lean_MVarId_casesRec___spec__5___lambda__1(x_22, x_23, x_7, x_8, x_9, x_10, x_21); +x_24 = l_Lean_PersistentArray_forInAux___at_Lean_MVarId_casesRec___spec__4___lambda__1(x_22, x_23, x_7, x_8, x_9, x_10, x_21); lean_dec(x_10); lean_dec(x_9); lean_dec(x_8); @@ -14149,7 +14125,7 @@ lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); -x_41 = l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__7(x_1, x_2, x_3, x_36, x_35, x_39, x_40, x_37, x_7, x_8, x_9, x_10, x_11); +x_41 = l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__6(x_1, x_2, x_3, x_36, x_35, x_39, x_40, x_37, x_7, x_8, x_9, x_10, x_11); lean_dec(x_35); if (lean_obj_tag(x_41) == 0) { @@ -14168,7 +14144,7 @@ x_45 = lean_ctor_get(x_42, 1); lean_inc(x_45); lean_dec(x_42); x_46 = lean_box(0); -x_47 = l_Lean_PersistentArray_forInAux___at_Lean_MVarId_casesRec___spec__5___lambda__1(x_45, x_46, x_7, x_8, x_9, x_10, x_44); +x_47 = l_Lean_PersistentArray_forInAux___at_Lean_MVarId_casesRec___spec__4___lambda__1(x_45, x_46, x_7, x_8, x_9, x_10, x_44); lean_dec(x_10); lean_dec(x_9); lean_dec(x_8); @@ -14240,7 +14216,7 @@ return x_57; } } } -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__8(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, size_t x_6, size_t x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13) { +LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__7(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, size_t x_6, size_t x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13) { _start: { uint8_t x_14; @@ -14324,57 +14300,61 @@ goto block_30; } else { -lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; +lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; x_39 = lean_ctor_get(x_34, 1); lean_inc(x_39); lean_dec(x_34); x_40 = l_Lean_LocalDecl_fvarId(x_33); lean_dec(x_33); x_41 = l___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_withNewEqs___rarg___closed__1; +lean_inc(x_2); +x_42 = lean_alloc_closure((void*)(l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__6___lambda__1), 8, 3); +lean_closure_set(x_42, 0, x_2); +lean_closure_set(x_42, 1, x_40); +lean_closure_set(x_42, 2, x_41); lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); -lean_inc(x_2); -x_42 = l_Lean_observing_x3f___at_Lean_MVarId_casesRec___spec__2___at_Lean_MVarId_casesRec___spec__3(x_2, x_40, x_41, x_9, x_10, x_11, x_12, x_39); -x_43 = lean_ctor_get(x_42, 0); -lean_inc(x_43); -if (lean_obj_tag(x_43) == 0) -{ -lean_object* x_44; lean_object* x_45; -lean_free_object(x_16); -x_44 = lean_ctor_get(x_42, 1); +x_43 = l_Lean_observing_x3f___at_Lean_MVarId_casesRec___spec__2(x_42, x_9, x_10, x_11, x_12, x_39); +x_44 = lean_ctor_get(x_43, 0); lean_inc(x_44); -lean_dec(x_42); +if (lean_obj_tag(x_44) == 0) +{ +lean_object* x_45; lean_object* x_46; +lean_free_object(x_16); +x_45 = lean_ctor_get(x_43, 1); +lean_inc(x_45); +lean_dec(x_43); lean_inc(x_3); -x_45 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_45, 0, x_3); -x_19 = x_45; -x_20 = x_44; +x_46 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_46, 0, x_3); +x_19 = x_46; +x_20 = x_45; goto block_30; } else { -lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; -x_46 = lean_ctor_get(x_42, 1); -lean_inc(x_46); -lean_dec(x_42); -lean_ctor_set(x_16, 0, x_43); -x_47 = lean_box(0); -x_48 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_48, 0, x_16); -lean_ctor_set(x_48, 1, x_47); -x_49 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_49, 0, x_48); -x_19 = x_49; -x_20 = x_46; +lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; +x_47 = lean_ctor_get(x_43, 1); +lean_inc(x_47); +lean_dec(x_43); +lean_ctor_set(x_16, 0, x_44); +x_48 = lean_box(0); +x_49 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_49, 0, x_16); +lean_ctor_set(x_49, 1, x_48); +x_50 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_50, 0, x_49); +x_19 = x_50; +x_20 = x_47; goto block_30; } } } else { -uint8_t x_50; +uint8_t x_51; lean_free_object(x_16); lean_dec(x_33); lean_dec(x_18); @@ -14387,114 +14367,118 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_50 = !lean_is_exclusive(x_34); -if (x_50 == 0) +x_51 = !lean_is_exclusive(x_34); +if (x_51 == 0) { return x_34; } else { -lean_object* x_51; lean_object* x_52; lean_object* x_53; -x_51 = lean_ctor_get(x_34, 0); -x_52 = lean_ctor_get(x_34, 1); +lean_object* x_52; lean_object* x_53; lean_object* x_54; +x_52 = lean_ctor_get(x_34, 0); +x_53 = lean_ctor_get(x_34, 1); +lean_inc(x_53); lean_inc(x_52); -lean_inc(x_51); lean_dec(x_34); -x_53 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_53, 0, x_51); -lean_ctor_set(x_53, 1, x_52); -return x_53; +x_54 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_54, 0, x_52); +lean_ctor_set(x_54, 1, x_53); +return x_54; } } } else { -lean_object* x_54; lean_object* x_55; -x_54 = lean_ctor_get(x_16, 0); -lean_inc(x_54); +lean_object* x_55; lean_object* x_56; +x_55 = lean_ctor_get(x_16, 0); +lean_inc(x_55); lean_dec(x_16); lean_inc(x_1); lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); -lean_inc(x_54); -x_55 = lean_apply_6(x_1, x_54, x_9, x_10, x_11, x_12, x_13); -if (lean_obj_tag(x_55) == 0) +lean_inc(x_55); +x_56 = lean_apply_6(x_1, x_55, x_9, x_10, x_11, x_12, x_13); +if (lean_obj_tag(x_56) == 0) { -lean_object* x_56; uint8_t x_57; -x_56 = lean_ctor_get(x_55, 0); -lean_inc(x_56); -x_57 = lean_unbox(x_56); -lean_dec(x_56); -if (x_57 == 0) +lean_object* x_57; uint8_t x_58; +x_57 = lean_ctor_get(x_56, 0); +lean_inc(x_57); +x_58 = lean_unbox(x_57); +lean_dec(x_57); +if (x_58 == 0) { -lean_object* x_58; lean_object* x_59; -lean_dec(x_54); -x_58 = lean_ctor_get(x_55, 1); -lean_inc(x_58); +lean_object* x_59; lean_object* x_60; lean_dec(x_55); +x_59 = lean_ctor_get(x_56, 1); +lean_inc(x_59); +lean_dec(x_56); lean_inc(x_3); -x_59 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_59, 0, x_3); -x_19 = x_59; -x_20 = x_58; +x_60 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_60, 0, x_3); +x_19 = x_60; +x_20 = x_59; goto block_30; } else { -lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; -x_60 = lean_ctor_get(x_55, 1); -lean_inc(x_60); +lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; +x_61 = lean_ctor_get(x_56, 1); +lean_inc(x_61); +lean_dec(x_56); +x_62 = l_Lean_LocalDecl_fvarId(x_55); lean_dec(x_55); -x_61 = l_Lean_LocalDecl_fvarId(x_54); -lean_dec(x_54); -x_62 = l___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_withNewEqs___rarg___closed__1; +x_63 = l___private_Lean_Meta_Tactic_Cases_0__Lean_Meta_withNewEqs___rarg___closed__1; +lean_inc(x_2); +x_64 = lean_alloc_closure((void*)(l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__6___lambda__1), 8, 3); +lean_closure_set(x_64, 0, x_2); +lean_closure_set(x_64, 1, x_62); +lean_closure_set(x_64, 2, x_63); lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); -lean_inc(x_2); -x_63 = l_Lean_observing_x3f___at_Lean_MVarId_casesRec___spec__2___at_Lean_MVarId_casesRec___spec__3(x_2, x_61, x_62, x_9, x_10, x_11, x_12, x_60); -x_64 = lean_ctor_get(x_63, 0); -lean_inc(x_64); -if (lean_obj_tag(x_64) == 0) +x_65 = l_Lean_observing_x3f___at_Lean_MVarId_casesRec___spec__2(x_64, x_9, x_10, x_11, x_12, x_61); +x_66 = lean_ctor_get(x_65, 0); +lean_inc(x_66); +if (lean_obj_tag(x_66) == 0) { -lean_object* x_65; lean_object* x_66; -x_65 = lean_ctor_get(x_63, 1); -lean_inc(x_65); -lean_dec(x_63); -lean_inc(x_3); -x_66 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_66, 0, x_3); -x_19 = x_66; -x_20 = x_65; -goto block_30; -} -else -{ -lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; -x_67 = lean_ctor_get(x_63, 1); +lean_object* x_67; lean_object* x_68; +x_67 = lean_ctor_get(x_65, 1); lean_inc(x_67); -lean_dec(x_63); +lean_dec(x_65); +lean_inc(x_3); x_68 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_68, 0, x_64); -x_69 = lean_box(0); -x_70 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_70, 0, x_68); -lean_ctor_set(x_70, 1, x_69); -x_71 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_71, 0, x_70); -x_19 = x_71; +lean_ctor_set(x_68, 0, x_3); +x_19 = x_68; x_20 = x_67; goto block_30; } +else +{ +lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; +x_69 = lean_ctor_get(x_65, 1); +lean_inc(x_69); +lean_dec(x_65); +x_70 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_70, 0, x_66); +x_71 = lean_box(0); +x_72 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_72, 0, x_70); +lean_ctor_set(x_72, 1, x_71); +x_73 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_73, 0, x_72); +x_19 = x_73; +x_20 = x_69; +goto block_30; +} } } else { -lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; -lean_dec(x_54); +lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; +lean_dec(x_55); lean_dec(x_18); lean_dec(x_17); lean_dec(x_12); @@ -14505,26 +14489,26 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_72 = lean_ctor_get(x_55, 0); -lean_inc(x_72); -x_73 = lean_ctor_get(x_55, 1); -lean_inc(x_73); -if (lean_is_exclusive(x_55)) { - lean_ctor_release(x_55, 0); - lean_ctor_release(x_55, 1); - x_74 = x_55; +x_74 = lean_ctor_get(x_56, 0); +lean_inc(x_74); +x_75 = lean_ctor_get(x_56, 1); +lean_inc(x_75); +if (lean_is_exclusive(x_56)) { + lean_ctor_release(x_56, 0); + lean_ctor_release(x_56, 1); + x_76 = x_56; } else { - lean_dec_ref(x_55); - x_74 = lean_box(0); + lean_dec_ref(x_56); + x_76 = lean_box(0); } -if (lean_is_scalar(x_74)) { - x_75 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_76)) { + x_77 = lean_alloc_ctor(1, 2, 0); } else { - x_75 = x_74; + x_77 = x_76; } -lean_ctor_set(x_75, 0, x_72); -lean_ctor_set(x_75, 1, x_73); -return x_75; +lean_ctor_set(x_77, 0, x_74); +lean_ctor_set(x_77, 1, x_75); +return x_77; } } } @@ -14584,7 +14568,7 @@ goto _start; } } } -LEAN_EXPORT lean_object* l_Lean_PersistentArray_forIn___at_Lean_MVarId_casesRec___spec__4___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +LEAN_EXPORT lean_object* l_Lean_PersistentArray_forIn___at_Lean_MVarId_casesRec___spec__3___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { lean_object* x_8; @@ -14594,7 +14578,7 @@ lean_ctor_set(x_8, 1, x_7); return x_8; } } -LEAN_EXPORT lean_object* l_Lean_PersistentArray_forIn___at_Lean_MVarId_casesRec___spec__4(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { +LEAN_EXPORT lean_object* l_Lean_PersistentArray_forIn___at_Lean_MVarId_casesRec___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { lean_object* x_11; lean_object* x_12; @@ -14608,7 +14592,7 @@ lean_inc(x_5); lean_inc(x_3); lean_inc(x_2); lean_inc(x_1); -x_12 = l_Lean_PersistentArray_forInAux___at_Lean_MVarId_casesRec___spec__5(x_1, x_2, x_3, x_5, x_11, x_5, x_6, x_7, x_8, x_9, x_10); +x_12 = l_Lean_PersistentArray_forInAux___at_Lean_MVarId_casesRec___spec__4(x_1, x_2, x_3, x_5, x_11, x_5, x_6, x_7, x_8, x_9, x_10); if (lean_obj_tag(x_12) == 0) { lean_object* x_13; @@ -14672,7 +14656,7 @@ x_25 = lean_array_get_size(x_22); x_26 = lean_usize_of_nat(x_25); lean_dec(x_25); x_27 = 0; -x_28 = l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__8(x_1, x_2, x_3, x_23, x_22, x_26, x_27, x_24, x_6, x_7, x_8, x_9, x_20); +x_28 = l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__7(x_1, x_2, x_3, x_23, x_22, x_26, x_27, x_24, x_6, x_7, x_8, x_9, x_20); lean_dec(x_22); if (lean_obj_tag(x_28) == 0) { @@ -14822,7 +14806,7 @@ x_10 = lean_ctor_get(x_8, 1); lean_inc(x_10); lean_dec(x_8); x_11 = l_Lean_MVarId_casesRec___lambda__1___closed__1; -x_12 = l_Lean_PersistentArray_forIn___at_Lean_MVarId_casesRec___spec__4(x_1, x_2, x_11, x_10, x_11, x_3, x_4, x_5, x_6, x_7); +x_12 = l_Lean_PersistentArray_forIn___at_Lean_MVarId_casesRec___spec__3(x_1, x_2, x_11, x_10, x_11, x_3, x_4, x_5, x_6, x_7); if (lean_obj_tag(x_12) == 0) { lean_object* x_13; lean_object* x_14; @@ -14932,7 +14916,7 @@ x_9 = l_Lean_Meta_saturate(x_1, x_8, x_3, x_4, x_5, x_6, x_7); return x_9; } } -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__6___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14) { +LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__5___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14) { _start: { size_t x_15; size_t x_16; lean_object* x_17; @@ -14940,11 +14924,37 @@ x_15 = lean_unbox_usize(x_7); lean_dec(x_7); x_16 = lean_unbox_usize(x_8); lean_dec(x_8); -x_17 = l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__6(x_1, x_2, x_3, x_4, x_5, x_6, x_15, x_16, x_9, x_10, x_11, x_12, x_13, x_14); +x_17 = l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__5(x_1, x_2, x_3, x_4, x_5, x_6, x_15, x_16, x_9, x_10, x_11, x_12, x_13, x_14); lean_dec(x_6); return x_17; } } +LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__6___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13) { +_start: +{ +size_t x_14; size_t x_15; lean_object* x_16; +x_14 = lean_unbox_usize(x_6); +lean_dec(x_6); +x_15 = lean_unbox_usize(x_7); +lean_dec(x_7); +x_16 = l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__6(x_1, x_2, x_3, x_4, x_5, x_14, x_15, x_8, x_9, x_10, x_11, x_12, x_13); +lean_dec(x_5); +return x_16; +} +} +LEAN_EXPORT lean_object* l_Lean_PersistentArray_forInAux___at_Lean_MVarId_casesRec___spec__4___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; +x_8 = l_Lean_PersistentArray_forInAux___at_Lean_MVarId_casesRec___spec__4___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_8; +} +} LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__7___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13) { _start: { @@ -14958,37 +14968,11 @@ lean_dec(x_5); return x_16; } } -LEAN_EXPORT lean_object* l_Lean_PersistentArray_forInAux___at_Lean_MVarId_casesRec___spec__5___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +LEAN_EXPORT lean_object* l_Lean_PersistentArray_forIn___at_Lean_MVarId_casesRec___spec__3___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { lean_object* x_8; -x_8 = l_Lean_PersistentArray_forInAux___at_Lean_MVarId_casesRec___spec__5___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_8; -} -} -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__8___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13) { -_start: -{ -size_t x_14; size_t x_15; lean_object* x_16; -x_14 = lean_unbox_usize(x_6); -lean_dec(x_6); -x_15 = lean_unbox_usize(x_7); -lean_dec(x_7); -x_16 = l_Array_forInUnsafe_loop___at_Lean_MVarId_casesRec___spec__8(x_1, x_2, x_3, x_4, x_5, x_14, x_15, x_8, x_9, x_10, x_11, x_12, x_13); -lean_dec(x_5); -return x_16; -} -} -LEAN_EXPORT lean_object* l_Lean_PersistentArray_forIn___at_Lean_MVarId_casesRec___spec__4___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { -_start: -{ -lean_object* x_8; -x_8 = l_Lean_PersistentArray_forIn___at_Lean_MVarId_casesRec___spec__4___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +x_8 = l_Lean_PersistentArray_forIn___at_Lean_MVarId_casesRec___spec__3___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); diff --git a/stage0/stdlib/Lean/Meta/Tactic/Congr.c b/stage0/stdlib/Lean/Meta/Tactic/Congr.c index 8d5215ea78..ba9d48ac47 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Congr.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Congr.c @@ -22,6 +22,7 @@ lean_object* l_Lean_Name_str___override(lean_object*, lean_object*); static lean_object* l_Lean_MVarId_congr_x3f___closed__2; lean_object* l_Lean_MVarId_assert(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkConstWithFreshMVarLevels(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_saveState___rarg(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_MVarId_congrImplies_x3f___closed__1; LEAN_EXPORT lean_object* l_List_filterMapM_loop___at___private_Lean_Meta_Tactic_Congr_0__Lean_congrPost___spec__1___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_st_ref_get(lean_object*, lean_object*); @@ -55,12 +56,13 @@ LEAN_EXPORT lean_object* l_List_filterMapM_loop___at___private_Lean_Meta_Tactic_ lean_object* l_Lean_MVarId_heqOfEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_nat_sub(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_MVarId_congr_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_MVarId_hcongr_x3f___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_cleanupAnnotations(lean_object*); LEAN_EXPORT lean_object* l_List_filterMapM_loop___at___private_Lean_Meta_Tactic_Congr_0__Lean_congrPost___spec__1___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkHCongr(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MVarId_assumptionCore(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MVarId_checkNotAssigned(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_MVarId_hcongr_x3f___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_MVarId_hcongr_x3f___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_st_mk_ref(lean_object*, lean_object*); lean_object* l_Lean_MVarId_tryClear(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_MVarId_congrN_go___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -72,6 +74,7 @@ LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Congr_0__Lean_congrPost(le uint8_t l_Lean_Expr_isAppOfArity(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_MVarId_hcongr_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_MVarId_congr_x3f___lambda__2___closed__2; +lean_object* l_Lean_Meta_SavedState_restore(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_MVarId_congr___closed__2; lean_object* l_Lean_MVarId_hrefl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_throwTacticEx___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -85,6 +88,7 @@ LEAN_EXPORT lean_object* l_Lean_MVarId_congr(lean_object*, uint8_t, lean_object* static lean_object* l_Lean_MVarId_congrN___closed__1; LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Congr_0__Lean_applyCongrThm_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_MVarId_congrImplies_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___at_Lean_MVarId_congr_x3f___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_List_forM___at_Lean_MVarId_congrN_go___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_MVarId_congrImplies_x3f___lambda__1___closed__1; lean_object* lean_st_ref_set(lean_object*, lean_object*, lean_object*); @@ -92,11 +96,13 @@ uint8_t lean_nat_dec_eq(lean_object*, lean_object*); lean_object* l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MVarId_getType_x27(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_MVarId_congr___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_commitWhenSomeNoEx_x3f___at_Lean_MVarId_congr_x3f___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_getAppFn(lean_object*); LEAN_EXPORT lean_object* l_Lean_MVarId_congrN_go(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Congr_0__Lean_applyCongrThm_x3f___closed__2; static lean_object* l_Lean_MVarId_congr_x3f___lambda__2___closed__1; +lean_object* l_Lean_MVarId_eqOfHEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_MVarId_congr_x3f___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_List_filterMapM_loop___at___private_Lean_Meta_Tactic_Congr_0__Lean_congrPost___spec__1___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: @@ -924,6 +930,214 @@ return x_41; } } } +LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___at_Lean_MVarId_congr_x3f___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_7 = l_Lean_Meta_saveState___rarg(x_3, x_4, x_5, x_6); +x_8 = lean_ctor_get(x_7, 0); +lean_inc(x_8); +x_9 = lean_ctor_get(x_7, 1); +lean_inc(x_9); +lean_dec(x_7); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +x_10 = lean_apply_5(x_1, x_2, x_3, x_4, x_5, x_9); +if (lean_obj_tag(x_10) == 0) +{ +lean_object* x_11; +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +if (lean_obj_tag(x_11) == 0) +{ +lean_object* x_12; lean_object* x_13; uint8_t x_14; +x_12 = lean_ctor_get(x_10, 1); +lean_inc(x_12); +lean_dec(x_10); +x_13 = l_Lean_Meta_SavedState_restore(x_8, x_2, x_3, x_4, x_5, x_12); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_8); +x_14 = !lean_is_exclusive(x_13); +if (x_14 == 0) +{ +lean_object* x_15; lean_object* x_16; +x_15 = lean_ctor_get(x_13, 0); +lean_dec(x_15); +x_16 = lean_box(0); +lean_ctor_set(x_13, 0, x_16); +return x_13; +} +else +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_17 = lean_ctor_get(x_13, 1); +lean_inc(x_17); +lean_dec(x_13); +x_18 = lean_box(0); +x_19 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_19, 0, x_18); +lean_ctor_set(x_19, 1, x_17); +return x_19; +} +} +else +{ +uint8_t x_20; +lean_dec(x_8); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_20 = !lean_is_exclusive(x_10); +if (x_20 == 0) +{ +lean_object* x_21; uint8_t x_22; +x_21 = lean_ctor_get(x_10, 0); +lean_dec(x_21); +x_22 = !lean_is_exclusive(x_11); +if (x_22 == 0) +{ +return x_10; +} +else +{ +lean_object* x_23; lean_object* x_24; +x_23 = lean_ctor_get(x_11, 0); +lean_inc(x_23); +lean_dec(x_11); +x_24 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_24, 0, x_23); +lean_ctor_set(x_10, 0, x_24); +return x_10; +} +} +else +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; +x_25 = lean_ctor_get(x_10, 1); +lean_inc(x_25); +lean_dec(x_10); +x_26 = lean_ctor_get(x_11, 0); +lean_inc(x_26); +if (lean_is_exclusive(x_11)) { + lean_ctor_release(x_11, 0); + x_27 = x_11; +} else { + lean_dec_ref(x_11); + x_27 = lean_box(0); +} +if (lean_is_scalar(x_27)) { + x_28 = lean_alloc_ctor(1, 1, 0); +} else { + x_28 = x_27; +} +lean_ctor_set(x_28, 0, x_26); +x_29 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_29, 0, x_28); +lean_ctor_set(x_29, 1, x_25); +return x_29; +} +} +} +else +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; uint8_t x_33; +x_30 = lean_ctor_get(x_10, 0); +lean_inc(x_30); +x_31 = lean_ctor_get(x_10, 1); +lean_inc(x_31); +lean_dec(x_10); +x_32 = l_Lean_Meta_SavedState_restore(x_8, x_2, x_3, x_4, x_5, x_31); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_8); +x_33 = !lean_is_exclusive(x_32); +if (x_33 == 0) +{ +lean_object* x_34; +x_34 = lean_ctor_get(x_32, 0); +lean_dec(x_34); +lean_ctor_set_tag(x_32, 1); +lean_ctor_set(x_32, 0, x_30); +return x_32; +} +else +{ +lean_object* x_35; lean_object* x_36; +x_35 = lean_ctor_get(x_32, 1); +lean_inc(x_35); +lean_dec(x_32); +x_36 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_36, 0, x_30); +lean_ctor_set(x_36, 1, x_35); +return x_36; +} +} +} +} +LEAN_EXPORT lean_object* l_Lean_commitWhenSomeNoEx_x3f___at_Lean_MVarId_congr_x3f___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; +x_7 = l_Lean_commitWhenSome_x3f___at_Lean_MVarId_congr_x3f___spec__2(x_1, x_2, x_3, x_4, x_5, x_6); +if (lean_obj_tag(x_7) == 0) +{ +uint8_t x_8; +x_8 = !lean_is_exclusive(x_7); +if (x_8 == 0) +{ +return x_7; +} +else +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_9 = lean_ctor_get(x_7, 0); +x_10 = lean_ctor_get(x_7, 1); +lean_inc(x_10); +lean_inc(x_9); +lean_dec(x_7); +x_11 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_11, 0, x_9); +lean_ctor_set(x_11, 1, x_10); +return x_11; +} +} +else +{ +uint8_t x_12; +x_12 = !lean_is_exclusive(x_7); +if (x_12 == 0) +{ +lean_object* x_13; lean_object* x_14; +x_13 = lean_ctor_get(x_7, 0); +lean_dec(x_13); +x_14 = lean_box(0); +lean_ctor_set_tag(x_7, 0); +lean_ctor_set(x_7, 0, x_14); +return x_7; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_15 = lean_ctor_get(x_7, 1); +lean_inc(x_15); +lean_dec(x_7); +x_16 = lean_box(0); +x_17 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_17, 0, x_16); +lean_ctor_set(x_17, 1, x_15); +return x_17; +} +} +} +} LEAN_EXPORT lean_object* l_Lean_MVarId_congr_x3f___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { @@ -1352,14 +1566,16 @@ return x_3; LEAN_EXPORT lean_object* l_Lean_MVarId_congr_x3f(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_7; lean_object* x_8; lean_object* x_9; +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; x_7 = l_Lean_MVarId_congr_x3f___closed__2; lean_inc(x_1); x_8 = lean_alloc_closure((void*)(l_Lean_MVarId_congr_x3f___lambda__2), 7, 2); lean_closure_set(x_8, 0, x_1); lean_closure_set(x_8, 1, x_7); -x_9 = l_Lean_MVarId_withContext___at___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___spec__2___rarg(x_1, x_8, x_2, x_3, x_4, x_5, x_6); -return x_9; +x_9 = lean_alloc_closure((void*)(l_Lean_commitWhenSomeNoEx_x3f___at_Lean_MVarId_congr_x3f___spec__1), 6, 1); +lean_closure_set(x_9, 0, x_8); +x_10 = l_Lean_MVarId_withContext___at___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___spec__2___rarg(x_1, x_9, x_2, x_3, x_4, x_5, x_6); +return x_10; } } LEAN_EXPORT lean_object* l_Lean_MVarId_congr_x3f___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { @@ -1490,7 +1706,165 @@ x_3 = l_Lean_Name_str___override(x_1, x_2); return x_3; } } -LEAN_EXPORT lean_object* l_Lean_MVarId_hcongr_x3f___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +LEAN_EXPORT lean_object* l_Lean_MVarId_hcongr_x3f___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_7 = l_Lean_MVarId_getType_x27(x_1, x_2, x_3, x_4, x_5, x_6); +if (lean_obj_tag(x_7) == 0) +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_24; lean_object* x_25; uint8_t x_26; +x_8 = lean_ctor_get(x_7, 0); +lean_inc(x_8); +x_9 = lean_ctor_get(x_7, 1); +lean_inc(x_9); +if (lean_is_exclusive(x_7)) { + lean_ctor_release(x_7, 0); + lean_ctor_release(x_7, 1); + x_10 = x_7; +} else { + lean_dec_ref(x_7); + x_10 = lean_box(0); +} +x_24 = l_Lean_MVarId_hcongr_x3f___lambda__2___closed__2; +x_25 = lean_unsigned_to_nat(4u); +x_26 = l_Lean_Expr_isAppOfArity(x_8, x_24, x_25); +if (x_26 == 0) +{ +lean_object* x_27; +lean_dec(x_8); +x_27 = lean_box(0); +x_11 = x_27; +goto block_23; +} +else +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; +x_28 = l_Lean_Expr_appFn_x21(x_8); +x_29 = l_Lean_Expr_appFn_x21(x_28); +x_30 = l_Lean_Expr_appFn_x21(x_29); +x_31 = l_Lean_Expr_appArg_x21(x_30); +lean_dec(x_30); +x_32 = l_Lean_Expr_appArg_x21(x_29); +lean_dec(x_29); +x_33 = l_Lean_Expr_appArg_x21(x_28); +lean_dec(x_28); +x_34 = l_Lean_Expr_appArg_x21(x_8); +lean_dec(x_8); +x_35 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_35, 0, x_33); +lean_ctor_set(x_35, 1, x_34); +x_36 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_36, 0, x_32); +lean_ctor_set(x_36, 1, x_35); +x_37 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_37, 0, x_31); +lean_ctor_set(x_37, 1, x_36); +x_38 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_38, 0, x_37); +x_11 = x_38; +goto block_23; +} +block_23: +{ +if (lean_obj_tag(x_11) == 0) +{ +lean_object* x_12; lean_object* x_13; +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_12 = lean_box(0); +if (lean_is_scalar(x_10)) { + x_13 = lean_alloc_ctor(0, 2, 0); +} else { + x_13 = x_10; +} +lean_ctor_set(x_13, 0, x_12); +lean_ctor_set(x_13, 1, x_9); +return x_13; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; +x_14 = lean_ctor_get(x_11, 0); +lean_inc(x_14); +lean_dec(x_11); +x_15 = lean_ctor_get(x_14, 1); +lean_inc(x_15); +lean_dec(x_14); +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +lean_dec(x_15); +x_17 = l_Lean_Expr_cleanupAnnotations(x_16); +x_18 = l_Lean_Expr_isApp(x_17); +if (x_18 == 0) +{ +lean_object* x_19; lean_object* x_20; +lean_dec(x_17); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_19 = lean_box(0); +if (lean_is_scalar(x_10)) { + x_20 = lean_alloc_ctor(0, 2, 0); +} else { + x_20 = x_10; +} +lean_ctor_set(x_20, 0, x_19); +lean_ctor_set(x_20, 1, x_9); +return x_20; +} +else +{ +lean_object* x_21; lean_object* x_22; +lean_dec(x_10); +x_21 = lean_box(0); +x_22 = l_Lean_MVarId_hcongr_x3f___lambda__1(x_17, x_1, x_21, x_2, x_3, x_4, x_5, x_9); +lean_dec(x_17); +return x_22; +} +} +} +} +else +{ +uint8_t x_39; +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_39 = !lean_is_exclusive(x_7); +if (x_39 == 0) +{ +return x_7; +} +else +{ +lean_object* x_40; lean_object* x_41; lean_object* x_42; +x_40 = lean_ctor_get(x_7, 0); +x_41 = lean_ctor_get(x_7, 1); +lean_inc(x_41); +lean_inc(x_40); +lean_dec(x_7); +x_42 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_42, 0, x_40); +lean_ctor_set(x_42, 1, x_41); +return x_42; +} +} +} +} +LEAN_EXPORT lean_object* l_Lean_MVarId_hcongr_x3f___lambda__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { lean_object* x_8; @@ -1508,180 +1882,73 @@ lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); -lean_inc(x_1); -x_10 = l_Lean_MVarId_getType_x27(x_1, x_3, x_4, x_5, x_6, x_9); +x_10 = l_Lean_MVarId_eqOfHEq(x_1, x_3, x_4, x_5, x_6, x_9); if (lean_obj_tag(x_10) == 0) { -lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_27; lean_object* x_28; uint8_t x_29; +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; x_11 = lean_ctor_get(x_10, 0); lean_inc(x_11); x_12 = lean_ctor_get(x_10, 1); lean_inc(x_12); -if (lean_is_exclusive(x_10)) { - lean_ctor_release(x_10, 0); - lean_ctor_release(x_10, 1); - x_13 = x_10; -} else { - lean_dec_ref(x_10); - x_13 = lean_box(0); -} -x_27 = l_Lean_MVarId_hcongr_x3f___lambda__2___closed__2; -x_28 = lean_unsigned_to_nat(4u); -x_29 = l_Lean_Expr_isAppOfArity(x_11, x_27, x_28); -if (x_29 == 0) -{ -lean_object* x_30; -lean_dec(x_11); -x_30 = lean_box(0); -x_14 = x_30; -goto block_26; +lean_dec(x_10); +lean_inc(x_11); +x_13 = lean_alloc_closure((void*)(l_Lean_MVarId_hcongr_x3f___lambda__2), 6, 1); +lean_closure_set(x_13, 0, x_11); +x_14 = l_Lean_MVarId_withContext___at___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___spec__2___rarg(x_11, x_13, x_3, x_4, x_5, x_6, x_12); +return x_14; } else { -lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; -x_31 = l_Lean_Expr_appFn_x21(x_11); -x_32 = l_Lean_Expr_appFn_x21(x_31); -x_33 = l_Lean_Expr_appFn_x21(x_32); -x_34 = l_Lean_Expr_appArg_x21(x_33); -lean_dec(x_33); -x_35 = l_Lean_Expr_appArg_x21(x_32); -lean_dec(x_32); -x_36 = l_Lean_Expr_appArg_x21(x_31); -lean_dec(x_31); -x_37 = l_Lean_Expr_appArg_x21(x_11); -lean_dec(x_11); -x_38 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_38, 0, x_36); -lean_ctor_set(x_38, 1, x_37); -x_39 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_39, 0, x_35); -lean_ctor_set(x_39, 1, x_38); -x_40 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_40, 0, x_34); -lean_ctor_set(x_40, 1, x_39); -x_41 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_41, 0, x_40); -x_14 = x_41; -goto block_26; -} -block_26: -{ -if (lean_obj_tag(x_14) == 0) -{ -lean_object* x_15; lean_object* x_16; +uint8_t x_15; lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); -lean_dec(x_1); -x_15 = lean_box(0); -if (lean_is_scalar(x_13)) { - x_16 = lean_alloc_ctor(0, 2, 0); -} else { - x_16 = x_13; -} -lean_ctor_set(x_16, 0, x_15); -lean_ctor_set(x_16, 1, x_12); -return x_16; -} -else -{ -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; uint8_t x_21; -x_17 = lean_ctor_get(x_14, 0); -lean_inc(x_17); -lean_dec(x_14); -x_18 = lean_ctor_get(x_17, 1); -lean_inc(x_18); -lean_dec(x_17); -x_19 = lean_ctor_get(x_18, 0); -lean_inc(x_19); -lean_dec(x_18); -x_20 = l_Lean_Expr_cleanupAnnotations(x_19); -x_21 = l_Lean_Expr_isApp(x_20); -if (x_21 == 0) -{ -lean_object* x_22; lean_object* x_23; -lean_dec(x_20); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_1); -x_22 = lean_box(0); -if (lean_is_scalar(x_13)) { - x_23 = lean_alloc_ctor(0, 2, 0); -} else { - x_23 = x_13; -} -lean_ctor_set(x_23, 0, x_22); -lean_ctor_set(x_23, 1, x_12); -return x_23; -} -else -{ -lean_object* x_24; lean_object* x_25; -lean_dec(x_13); -x_24 = lean_box(0); -x_25 = l_Lean_MVarId_hcongr_x3f___lambda__1(x_20, x_1, x_24, x_3, x_4, x_5, x_6, x_12); -lean_dec(x_20); -return x_25; -} -} -} -} -else -{ -uint8_t x_42; -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_1); -x_42 = !lean_is_exclusive(x_10); -if (x_42 == 0) +x_15 = !lean_is_exclusive(x_10); +if (x_15 == 0) { return x_10; } else { -lean_object* x_43; lean_object* x_44; lean_object* x_45; -x_43 = lean_ctor_get(x_10, 0); -x_44 = lean_ctor_get(x_10, 1); -lean_inc(x_44); -lean_inc(x_43); +lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_16 = lean_ctor_get(x_10, 0); +x_17 = lean_ctor_get(x_10, 1); +lean_inc(x_17); +lean_inc(x_16); lean_dec(x_10); -x_45 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_45, 0, x_43); -lean_ctor_set(x_45, 1, x_44); -return x_45; +x_18 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_18, 0, x_16); +lean_ctor_set(x_18, 1, x_17); +return x_18; } } } else { -uint8_t x_46; +uint8_t x_19; lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_46 = !lean_is_exclusive(x_8); -if (x_46 == 0) +x_19 = !lean_is_exclusive(x_8); +if (x_19 == 0) { return x_8; } else { -lean_object* x_47; lean_object* x_48; lean_object* x_49; -x_47 = lean_ctor_get(x_8, 0); -x_48 = lean_ctor_get(x_8, 1); -lean_inc(x_48); -lean_inc(x_47); +lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_20 = lean_ctor_get(x_8, 0); +x_21 = lean_ctor_get(x_8, 1); +lean_inc(x_21); +lean_inc(x_20); lean_dec(x_8); -x_49 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_49, 0, x_47); -lean_ctor_set(x_49, 1, x_48); -return x_49; +x_22 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_22, 0, x_20); +lean_ctor_set(x_22, 1, x_21); +return x_22; } } } @@ -1691,11 +1958,10 @@ _start: { lean_object* x_7; lean_object* x_8; lean_object* x_9; x_7 = l_Lean_MVarId_congr_x3f___closed__2; -lean_inc(x_1); -x_8 = lean_alloc_closure((void*)(l_Lean_MVarId_hcongr_x3f___lambda__2), 7, 2); +x_8 = lean_alloc_closure((void*)(l_Lean_MVarId_hcongr_x3f___lambda__3), 7, 2); lean_closure_set(x_8, 0, x_1); lean_closure_set(x_8, 1, x_7); -x_9 = l_Lean_MVarId_withContext___at___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___spec__2___rarg(x_1, x_8, x_2, x_3, x_4, x_5, x_6); +x_9 = l_Lean_commitWhenSomeNoEx_x3f___at_Lean_MVarId_congr_x3f___spec__1(x_8, x_2, x_3, x_4, x_5, x_6); return x_9; } } @@ -2127,7 +2393,7 @@ x_9 = lean_ctor_get(x_8, 0); lean_inc(x_9); if (lean_obj_tag(x_9) == 0) { -lean_object* x_10; lean_object* x_11; +lean_object* x_10; lean_object* x_11; lean_object* x_12; x_10 = lean_ctor_get(x_8, 1); lean_inc(x_10); lean_dec(x_8); @@ -2137,9 +2403,6 @@ lean_inc(x_4); lean_inc(x_3); lean_inc(x_1); x_11 = l_Lean_MVarId_hcongr_x3f(x_1, x_3, x_4, x_5, x_6, x_10); -if (lean_obj_tag(x_11) == 0) -{ -lean_object* x_12; x_12 = lean_ctor_get(x_11, 0); lean_inc(x_12); if (lean_obj_tag(x_12) == 0) @@ -2216,71 +2479,43 @@ return x_29; } else { -uint8_t x_30; -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); +lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_dec(x_1); -x_30 = !lean_is_exclusive(x_11); -if (x_30 == 0) -{ -return x_11; -} -else -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; -x_31 = lean_ctor_get(x_11, 0); -x_32 = lean_ctor_get(x_11, 1); -lean_inc(x_32); -lean_inc(x_31); -lean_dec(x_11); -x_33 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_33, 0, x_31); -lean_ctor_set(x_33, 1, x_32); -return x_33; -} -} -} -else -{ -lean_object* x_34; lean_object* x_35; lean_object* x_36; -lean_dec(x_1); -x_34 = lean_ctor_get(x_8, 1); -lean_inc(x_34); +x_30 = lean_ctor_get(x_8, 1); +lean_inc(x_30); lean_dec(x_8); -x_35 = lean_ctor_get(x_9, 0); -lean_inc(x_35); +x_31 = lean_ctor_get(x_9, 0); +lean_inc(x_31); lean_dec(x_9); -x_36 = l_Lean_MVarId_congr___lambda__1(x_2, x_35, x_3, x_4, x_5, x_6, x_34); -return x_36; +x_32 = l_Lean_MVarId_congr___lambda__1(x_2, x_31, x_3, x_4, x_5, x_6, x_30); +return x_32; } } else { -uint8_t x_37; +uint8_t x_33; lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_37 = !lean_is_exclusive(x_8); -if (x_37 == 0) +x_33 = !lean_is_exclusive(x_8); +if (x_33 == 0) { return x_8; } else { -lean_object* x_38; lean_object* x_39; lean_object* x_40; -x_38 = lean_ctor_get(x_8, 0); -x_39 = lean_ctor_get(x_8, 1); -lean_inc(x_39); -lean_inc(x_38); +lean_object* x_34; lean_object* x_35; lean_object* x_36; +x_34 = lean_ctor_get(x_8, 0); +x_35 = lean_ctor_get(x_8, 1); +lean_inc(x_35); +lean_inc(x_34); lean_dec(x_8); -x_40 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_40, 0, x_38); -lean_ctor_set(x_40, 1, x_39); -return x_40; +x_36 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_36, 0, x_34); +lean_ctor_set(x_36, 1, x_35); +return x_36; } } } diff --git a/stage0/stdlib/Lean/Meta/Tactic/Contradiction.c b/stage0/stdlib/Lean/Meta/Tactic/Contradiction.c index 4fd399ff45..b889361f80 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Contradiction.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Contradiction.c @@ -13,6 +13,8 @@ #ifdef __cplusplus extern "C" { #endif +static lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__4; +LEAN_EXPORT lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__6(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_MVarId_contradictionCore___closed__2; LEAN_EXPORT lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); size_t lean_usize_add(size_t, size_t); @@ -21,18 +23,18 @@ lean_object* l_Lean_registerTraceClass(lean_object*, uint8_t, lean_object*); lean_object* l_Lean_stringToMessageData(lean_object*); lean_object* lean_mk_empty_array_with_capacity(lean_object*); lean_object* l_Lean_Name_str___override(lean_object*, lean_object*); +static lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__8; lean_object* lean_array_uget(lean_object*, size_t); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_contradictionCore___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_ReaderT_bind___at_Lean_Meta_ElimEmptyInductive_elim___spec__3(lean_object*, lean_object*); +static lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__6; LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_processGenDiseq___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__7; lean_object* l_Lean_hasAssignableMVar___at_Lean_Meta_SynthInstance_tryResolve___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_processGenDiseq___closed__3; LEAN_EXPORT uint8_t l_Lean_Meta_Contradiction_Config_genDiseq___default; lean_object* l_Lean_Meta_saveState___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_environment_find(lean_object*, lean_object*); lean_object* lean_st_ref_get(lean_object*, lean_object*); -static lean_object* l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__3; uint8_t lean_name_eq(lean_object*, lean_object*); static lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_contradictionCore___spec__4___lambda__3___closed__4; lean_object* l_Lean_Meta_saveState___boxed(lean_object*); @@ -47,13 +49,13 @@ static lean_object* l_Lean_Meta_ElimEmptyInductive_elim___closed__2; lean_object* l_Lean_Name_mkStr3(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MVarId_withContext___at___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_MVarId_contradiction___closed__2; +static lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__5; static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_ElimEmptyInductive_elim___spec__5___closed__2; lean_object* l_Lean_Expr_appArg_x21(lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_contradictionCore___spec__4___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_ElimEmptyInductive_elim___spec__5___boxed__const__1; LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_ElimEmptyInductive_elim___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__1___closed__1; uint8_t lean_usize_dec_lt(size_t, size_t); static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_ElimEmptyInductive_elim___spec__5___closed__1; LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_ElimEmptyInductive_elim___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -66,7 +68,6 @@ lean_object* l_Lean_Meta_mkDecide(lean_object*, lean_object*, lean_object*, lean LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_contradictionCore___spec__4___lambda__1(lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_MVarId_contradictionCore___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_matchNot_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__4; lean_object* l_Lean_Meta_mkEqRefl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_processGenDiseq___closed__6; uint8_t lean_expr_has_loose_bvar(lean_object*, lean_object*); @@ -76,16 +77,13 @@ lean_object* l_Lean_Expr_FindImpl_findUnsafe_x3f(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_PersistentArray_forInAux___at_Lean_MVarId_contradictionCore___spec__2___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_StateRefT_x27_lift___rarg___boxed(lean_object*, lean_object*); lean_object* l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__1; uint8_t l_Lean_Expr_isHEq(lean_object*); extern lean_object* l_Lean_inheritedTraceOptions; lean_object* lean_array_fget(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_ElimEmptyInductive_instMonadBacktrackSavedStateM___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_ElimEmptyInductive_instMonadBacktrackSavedStateM___closed__2; lean_object* lean_st_ref_take(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_contradictionCore___spec__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_contradictionCore___spec__4___lambda__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_isElimEmptyInductiveCandidate(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_ElimEmptyInductive_elim___closed__1; @@ -101,11 +99,12 @@ lean_object* l_Lean_Meta_FVarSubst_apply(lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_processGenDiseq___closed__5; static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_ElimEmptyInductive_elim___spec__5___lambda__2___closed__1; LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_processGenDiseq___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_ElimEmptyInductive_elim___spec__5___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_fvarId_x21(lean_object*); +LEAN_EXPORT lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__2; LEAN_EXPORT lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_nestedFalseElim(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MVarId_checkNotAssigned(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Expr_0__Lean_Expr_getAppNumArgsAux(lean_object*, lean_object*); @@ -113,13 +112,13 @@ LEAN_EXPORT lean_object* l_Lean_Meta_Contradiction_Config_searchFuel___default; lean_object* l_Nat_repr(lean_object*); LEAN_EXPORT lean_object* l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_elimEmptyInductive___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__1; lean_object* l_Lean_Meta_mkAbsurd(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_st_mk_ref(lean_object*, lean_object*); lean_object* l_Lean_Expr_sort___override(lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_ElimEmptyInductive_elim___spec__5___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_findLocalDeclWithType_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_ReaderT_instApplicativeReaderT___rarg(lean_object*); LEAN_EXPORT lean_object* l_Lean_PersistentArray_forInAux___at_Lean_MVarId_contradictionCore___spec__2___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_contradictionCore___spec__4___lambda__3___closed__3; @@ -130,6 +129,7 @@ lean_object* l___private_Init_Util_0__mkPanicMessageWithDecl(lean_object*, lean_ static lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_contradictionCore___spec__4___lambda__3___closed__5; LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_contradictionCore___spec__4___lambda__6(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_LocalDecl_toExpr(lean_object*); +static lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__7___closed__1; uint8_t l_Lean_Expr_isConstOf(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_contradictionCore___spec__4___lambda__3(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_addTrace___at_Lean_Meta_ElimEmptyInductive_elim___spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -167,9 +167,9 @@ lean_object* l_Lean_Meta_throwTacticEx___rarg(lean_object*, lean_object*, lean_o lean_object* l_Lean_Expr_fvar___override(lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_ElimEmptyInductive_instMonadBacktrackSavedStateM; lean_object* l_Lean_MVarId_getType(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__7(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_isGenDiseq___boxed(lean_object*); -LEAN_EXPORT lean_object* l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Cases_cases(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_const___override(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_MVarId_contradictionCore___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -187,7 +187,6 @@ uint8_t l___private_Lean_Util_Trace_0__Lean_checkTraceOption(lean_object*, lean_ static lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_contradictionCore___spec__4___lambda__3___closed__7; static lean_object* l_Lean_Meta_ElimEmptyInductive_instMonadBacktrackSavedStateM___closed__4; LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_elimEmptyInductive___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__2; LEAN_EXPORT lean_object* l_Lean_commitWhen___at___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_elimEmptyInductive___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_isTracingEnabledFor___at_Lean_Meta_ElimEmptyInductive_elim___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_contradictionCore___spec__4___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -224,17 +223,18 @@ static lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_contradictionCore_ lean_object* lean_mk_array(lean_object*, lean_object*); lean_object* l_panic___at_Lean_Meta_ACLt_lt_lexSameCtor___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_mkGenDiseqMask___boxed(lean_object*); -LEAN_EXPORT lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_forallMetaTelescope(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_ElimEmptyInductive_instMonadBacktrackSavedStateM___closed__3; -LEAN_EXPORT lean_object* l_Lean_commitWhen___at___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_elimEmptyInductive___spec__1___at___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_elimEmptyInductive___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__7; lean_object* l_ReaderT_instMonadReaderT___rarg(lean_object*); +static lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__5___closed__1; lean_object* l_List_lengthTRAux___rarg(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_contradictionCore___spec__4___lambda__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_ElimEmptyInductive_elim(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_whnfD(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Array_forInUnsafe_loop___at_Lean_MVarId_contradictionCore___spec__4___lambda__3___closed__1; -static lean_object* l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__6; +static lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__3; lean_object* l_Lean_Expr_getAppFn(lean_object*); LEAN_EXPORT lean_object* l_Lean_MVarId_contradictionCore___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_isTracingEnabledFor___at_Lean_Meta_ElimEmptyInductive_elim___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -256,7 +256,6 @@ static lean_object* l___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_nest lean_object* l_Lean_Meta_matchHEq_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Exception_toMessageData(lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); -static lean_object* l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__5; static uint8_t _init_l_Lean_Meta_Contradiction_Config_useDecide___default() { _start: { @@ -2051,354 +2050,6 @@ return x_38; } } } -static lean_object* _init_l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__1___closed__1() { -_start: -{ -uint8_t x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = 0; -x_2 = lean_box(0); -x_3 = lean_box(x_1); -x_4 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_4, 0, x_3); -lean_ctor_set(x_4, 1, x_2); -return x_4; -} -} -LEAN_EXPORT lean_object* l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { -_start: -{ -lean_object* x_8; lean_object* x_9; -x_8 = l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__1___closed__1; -x_9 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_9, 0, x_8); -lean_ctor_set(x_9, 1, x_7); -return x_9; -} -} -static lean_object* _init_l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string_from_bytes("Meta", 4); -return x_1; -} -} -static lean_object* _init_l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__2() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string_from_bytes("Tactic", 6); -return x_1; -} -} -static lean_object* _init_l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__3() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string_from_bytes("contradiction", 13); -return x_1; -} -} -static lean_object* _init_l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__4() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__1; -x_2 = l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__2; -x_3 = l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__3; -x_4 = l_Lean_Name_mkStr3(x_1, x_2, x_3); -return x_4; -} -} -static lean_object* _init_l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__5() { -_start: -{ -lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__1___boxed), 7, 0); -return x_1; -} -} -static lean_object* _init_l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__6() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string_from_bytes("", 0); -return x_1; -} -} -static lean_object* _init_l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__7() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__6; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -LEAN_EXPORT lean_object* l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { -_start: -{ -lean_object* x_10; -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -x_10 = l_Lean_Meta_Cases_cases(x_1, x_2, x_3, x_5, x_6, x_7, x_8, x_9); -if (lean_obj_tag(x_10) == 0) -{ -uint8_t x_11; -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -x_11 = !lean_is_exclusive(x_10); -if (x_11 == 0) -{ -lean_object* x_12; lean_object* x_13; lean_object* x_14; -x_12 = lean_ctor_get(x_10, 0); -x_13 = lean_box(0); -x_14 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_14, 0, x_12); -lean_ctor_set(x_14, 1, x_13); -lean_ctor_set(x_10, 0, x_14); -return x_10; -} -else -{ -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_15 = lean_ctor_get(x_10, 0); -x_16 = lean_ctor_get(x_10, 1); -lean_inc(x_16); -lean_inc(x_15); -lean_dec(x_10); -x_17 = lean_box(0); -x_18 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_18, 0, x_15); -lean_ctor_set(x_18, 1, x_17); -x_19 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_19, 0, x_18); -lean_ctor_set(x_19, 1, x_16); -return x_19; -} -} -else -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; -x_20 = lean_ctor_get(x_10, 0); -lean_inc(x_20); -x_21 = lean_ctor_get(x_10, 1); -lean_inc(x_21); -lean_dec(x_10); -x_22 = l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__4; -x_23 = l_Lean_isTracingEnabledFor___at_Lean_Meta_ElimEmptyInductive_elim___spec__1(x_22, x_4, x_5, x_6, x_7, x_8, x_21); -x_24 = lean_ctor_get(x_23, 0); -lean_inc(x_24); -x_25 = lean_ctor_get(x_23, 1); -lean_inc(x_25); -lean_dec(x_23); -x_26 = l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__5; -x_27 = lean_unbox(x_24); -lean_dec(x_24); -if (x_27 == 0) -{ -lean_object* x_28; lean_object* x_29; -lean_dec(x_20); -x_28 = lean_box(0); -x_29 = lean_apply_7(x_26, x_28, x_4, x_5, x_6, x_7, x_8, x_25); -return x_29; -} -else -{ -lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; -x_30 = l_Lean_Exception_toMessageData(x_20); -x_31 = l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__7; -x_32 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_32, 0, x_31); -lean_ctor_set(x_32, 1, x_30); -x_33 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_33, 0, x_32); -lean_ctor_set(x_33, 1, x_31); -x_34 = l_Lean_addTrace___at_Lean_Meta_ElimEmptyInductive_elim___spec__6(x_22, x_33, x_4, x_5, x_6, x_7, x_8, x_25); -x_35 = lean_ctor_get(x_34, 0); -lean_inc(x_35); -x_36 = lean_ctor_get(x_34, 1); -lean_inc(x_36); -lean_dec(x_34); -x_37 = lean_apply_7(x_26, x_35, x_4, x_5, x_6, x_7, x_8, x_36); -return x_37; -} -} -} -} -LEAN_EXPORT lean_object* l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { -_start: -{ -if (lean_obj_tag(x_2) == 0) -{ -lean_object* x_9; lean_object* x_10; -x_9 = lean_ctor_get(x_2, 0); -lean_inc(x_9); -lean_dec(x_2); -x_10 = lean_apply_7(x_1, x_9, x_3, x_4, x_5, x_6, x_7, x_8); -return x_10; -} -else -{ -lean_object* x_11; lean_object* x_12; -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_1); -x_11 = lean_ctor_get(x_2, 0); -lean_inc(x_11); -lean_dec(x_2); -x_12 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_12, 0, x_11); -lean_ctor_set(x_12, 1, x_8); -return x_12; -} -} -} -LEAN_EXPORT lean_object* l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { -_start: -{ -lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_11 = lean_alloc_closure((void*)(l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2), 9, 3); -lean_closure_set(x_11, 0, x_1); -lean_closure_set(x_11, 1, x_2); -lean_closure_set(x_11, 2, x_4); -x_12 = lean_alloc_closure((void*)(l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__3), 8, 1); -lean_closure_set(x_12, 0, x_3); -x_13 = l_Lean_Meta_saveState___rarg(x_7, x_8, x_9, x_10); -x_14 = lean_ctor_get(x_13, 0); -lean_inc(x_14); -x_15 = lean_ctor_get(x_13, 1); -lean_inc(x_15); -lean_dec(x_13); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -x_16 = l_ReaderT_bind___at_Lean_Meta_ElimEmptyInductive_elim___spec__3___rarg(x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_15); -if (lean_obj_tag(x_16) == 0) -{ -lean_object* x_17; uint8_t x_18; -x_17 = lean_ctor_get(x_16, 0); -lean_inc(x_17); -x_18 = lean_unbox(x_17); -lean_dec(x_17); -if (x_18 == 0) -{ -lean_object* x_19; lean_object* x_20; uint8_t x_21; -x_19 = lean_ctor_get(x_16, 1); -lean_inc(x_19); -lean_dec(x_16); -x_20 = l_Lean_Meta_SavedState_restore(x_14, x_6, x_7, x_8, x_9, x_19); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_14); -x_21 = !lean_is_exclusive(x_20); -if (x_21 == 0) -{ -lean_object* x_22; uint8_t x_23; lean_object* x_24; -x_22 = lean_ctor_get(x_20, 0); -lean_dec(x_22); -x_23 = 0; -x_24 = lean_box(x_23); -lean_ctor_set(x_20, 0, x_24); -return x_20; -} -else -{ -lean_object* x_25; uint8_t x_26; lean_object* x_27; lean_object* x_28; -x_25 = lean_ctor_get(x_20, 1); -lean_inc(x_25); -lean_dec(x_20); -x_26 = 0; -x_27 = lean_box(x_26); -x_28 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_28, 0, x_27); -lean_ctor_set(x_28, 1, x_25); -return x_28; -} -} -else -{ -uint8_t x_29; -lean_dec(x_14); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -x_29 = !lean_is_exclusive(x_16); -if (x_29 == 0) -{ -lean_object* x_30; uint8_t x_31; lean_object* x_32; -x_30 = lean_ctor_get(x_16, 0); -lean_dec(x_30); -x_31 = 1; -x_32 = lean_box(x_31); -lean_ctor_set(x_16, 0, x_32); -return x_16; -} -else -{ -lean_object* x_33; uint8_t x_34; lean_object* x_35; lean_object* x_36; -x_33 = lean_ctor_get(x_16, 1); -lean_inc(x_33); -lean_dec(x_16); -x_34 = 1; -x_35 = lean_box(x_34); -x_36 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_36, 0, x_35); -lean_ctor_set(x_36, 1, x_33); -return x_36; -} -} -} -else -{ -lean_object* x_37; lean_object* x_38; lean_object* x_39; uint8_t x_40; -x_37 = lean_ctor_get(x_16, 0); -lean_inc(x_37); -x_38 = lean_ctor_get(x_16, 1); -lean_inc(x_38); -lean_dec(x_16); -x_39 = l_Lean_Meta_SavedState_restore(x_14, x_6, x_7, x_8, x_9, x_38); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_14); -x_40 = !lean_is_exclusive(x_39); -if (x_40 == 0) -{ -lean_object* x_41; -x_41 = lean_ctor_get(x_39, 0); -lean_dec(x_41); -lean_ctor_set_tag(x_39, 1); -lean_ctor_set(x_39, 0, x_37); -return x_39; -} -else -{ -lean_object* x_42; lean_object* x_43; -x_42 = lean_ctor_get(x_39, 1); -lean_inc(x_42); -lean_dec(x_39); -x_43 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_43, 0, x_37); -lean_ctor_set(x_43, 1, x_42); -return x_43; -} -} -} -} LEAN_EXPORT lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { @@ -2534,15 +2185,67 @@ static lean_object* _init_l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___clos _start: { lean_object* x_1; -x_1 = lean_mk_string_from_bytes("elimEmptyInductive, number subgoals: ", 37); +x_1 = lean_mk_string_from_bytes("Meta", 4); return x_1; } } static lean_object* _init_l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__2() { _start: { -lean_object* x_1; lean_object* x_2; +lean_object* x_1; +x_1 = lean_mk_string_from_bytes("Tactic", 6); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string_from_bytes("contradiction", 13); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__1; +x_2 = l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__2; +x_3 = l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__3; +x_4 = l_Lean_Name_mkStr3(x_1, x_2, x_3); +return x_4; +} +} +static lean_object* _init_l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string_from_bytes("elimEmptyInductive, number subgoals: ", 37); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__5; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__7() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string_from_bytes("", 0); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__7; x_2 = l_Lean_stringToMessageData(x_1); return x_2; } @@ -2551,7 +2254,7 @@ LEAN_EXPORT lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__3(lean_ob _start: { lean_object* x_8; lean_object* x_9; lean_object* x_10; uint8_t x_11; -x_8 = l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__4; +x_8 = l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__4; x_9 = l_Lean_isTracingEnabledFor___at_Lean_Meta_ElimEmptyInductive_elim___spec__1(x_8, x_2, x_3, x_4, x_5, x_6, x_7); x_10 = lean_ctor_get(x_9, 0); lean_inc(x_10); @@ -2579,11 +2282,11 @@ x_18 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_18, 0, x_17); x_19 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_19, 0, x_18); -x_20 = l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__2; +x_20 = l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__6; x_21 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_21, 0, x_20); lean_ctor_set(x_21, 1, x_19); -x_22 = l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__7; +x_22 = l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__8; x_23 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_23, 0, x_21); lean_ctor_set(x_23, 1, x_22); @@ -2602,15 +2305,174 @@ return x_27; static lean_object* _init_l_Lean_Meta_ElimEmptyInductive_elim___lambda__4___closed__1() { _start: { +uint8_t x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_1 = 0; +x_2 = lean_box(0); +x_3 = lean_box(x_1); +x_4 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_4, 0, x_3); +lean_ctor_set(x_4, 1, x_2); +return x_4; +} +} +LEAN_EXPORT lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__4(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; lean_object* x_9; +x_8 = l_Lean_Meta_ElimEmptyInductive_elim___lambda__4___closed__1; +x_9 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_9, 0, x_8); +lean_ctor_set(x_9, 1, x_7); +return x_9; +} +} +static lean_object* _init_l_Lean_Meta_ElimEmptyInductive_elim___lambda__5___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Meta_ElimEmptyInductive_elim___lambda__4___boxed), 7, 0); +return x_1; +} +} +LEAN_EXPORT lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__5(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +_start: +{ +lean_object* x_10; +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +x_10 = l_Lean_Meta_Cases_cases(x_1, x_2, x_3, x_5, x_6, x_7, x_8, x_9); +if (lean_obj_tag(x_10) == 0) +{ +uint8_t x_11; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +x_11 = !lean_is_exclusive(x_10); +if (x_11 == 0) +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_12 = lean_ctor_get(x_10, 0); +x_13 = lean_box(0); +x_14 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_14, 0, x_12); +lean_ctor_set(x_14, 1, x_13); +lean_ctor_set(x_10, 0, x_14); +return x_10; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_15 = lean_ctor_get(x_10, 0); +x_16 = lean_ctor_get(x_10, 1); +lean_inc(x_16); +lean_inc(x_15); +lean_dec(x_10); +x_17 = lean_box(0); +x_18 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_18, 0, x_15); +lean_ctor_set(x_18, 1, x_17); +x_19 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_19, 0, x_18); +lean_ctor_set(x_19, 1, x_16); +return x_19; +} +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; +x_20 = lean_ctor_get(x_10, 0); +lean_inc(x_20); +x_21 = lean_ctor_get(x_10, 1); +lean_inc(x_21); +lean_dec(x_10); +x_22 = l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__4; +x_23 = l_Lean_isTracingEnabledFor___at_Lean_Meta_ElimEmptyInductive_elim___spec__1(x_22, x_4, x_5, x_6, x_7, x_8, x_21); +x_24 = lean_ctor_get(x_23, 0); +lean_inc(x_24); +x_25 = lean_ctor_get(x_23, 1); +lean_inc(x_25); +lean_dec(x_23); +x_26 = l_Lean_Meta_ElimEmptyInductive_elim___lambda__5___closed__1; +x_27 = lean_unbox(x_24); +lean_dec(x_24); +if (x_27 == 0) +{ +lean_object* x_28; lean_object* x_29; +lean_dec(x_20); +x_28 = lean_box(0); +x_29 = lean_apply_7(x_26, x_28, x_4, x_5, x_6, x_7, x_8, x_25); +return x_29; +} +else +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_30 = l_Lean_Exception_toMessageData(x_20); +x_31 = l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__8; +x_32 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_32, 0, x_31); +lean_ctor_set(x_32, 1, x_30); +x_33 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_33, 0, x_32); +lean_ctor_set(x_33, 1, x_31); +x_34 = l_Lean_addTrace___at_Lean_Meta_ElimEmptyInductive_elim___spec__6(x_22, x_33, x_4, x_5, x_6, x_7, x_8, x_25); +x_35 = lean_ctor_get(x_34, 0); +lean_inc(x_35); +x_36 = lean_ctor_get(x_34, 1); +lean_inc(x_36); +lean_dec(x_34); +x_37 = lean_apply_7(x_26, x_35, x_4, x_5, x_6, x_7, x_8, x_36); +return x_37; +} +} +} +} +LEAN_EXPORT lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__6(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +_start: +{ +if (lean_obj_tag(x_2) == 0) +{ +lean_object* x_9; lean_object* x_10; +x_9 = lean_ctor_get(x_2, 0); +lean_inc(x_9); +lean_dec(x_2); +x_10 = lean_apply_7(x_1, x_9, x_3, x_4, x_5, x_6, x_7, x_8); +return x_10; +} +else +{ +lean_object* x_11; lean_object* x_12; +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_11 = lean_ctor_get(x_2, 0); +lean_inc(x_11); +lean_dec(x_2); +x_12 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_12, 0, x_11); +lean_ctor_set(x_12, 1, x_8); +return x_12; +} +} +} +static lean_object* _init_l_Lean_Meta_ElimEmptyInductive_elim___lambda__7___closed__1() { +_start: +{ lean_object* x_1; x_1 = lean_alloc_closure((void*)(l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___boxed), 7, 0); return x_1; } } -LEAN_EXPORT lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__4(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +LEAN_EXPORT lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__7(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { _start: { -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_dec(x_3); x_10 = lean_st_ref_get(x_8, x_9); x_11 = lean_ctor_get(x_10, 1); @@ -2629,10 +2491,19 @@ x_17 = lean_st_ref_set(x_4, x_16, x_14); x_18 = lean_ctor_get(x_17, 1); lean_inc(x_18); lean_dec(x_17); -x_19 = l_Lean_Meta_ElimEmptyInductive_elim___lambda__4___closed__1; +x_19 = l_Lean_Meta_ElimEmptyInductive_elim___lambda__7___closed__1; x_20 = l_Lean_addTrace___at_Lean_Meta_ElimEmptyInductive_elim___spec__6___closed__1; -x_21 = l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8(x_1, x_2, x_19, x_20, x_4, x_5, x_6, x_7, x_8, x_18); -return x_21; +x_21 = lean_alloc_closure((void*)(l_Lean_Meta_ElimEmptyInductive_elim___lambda__5), 9, 3); +lean_closure_set(x_21, 0, x_1); +lean_closure_set(x_21, 1, x_2); +lean_closure_set(x_21, 2, x_20); +x_22 = lean_alloc_closure((void*)(l_Lean_Meta_ElimEmptyInductive_elim___lambda__6), 8, 1); +lean_closure_set(x_22, 0, x_19); +x_23 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Meta_ElimEmptyInductive_elim___spec__3___rarg), 8, 2); +lean_closure_set(x_23, 0, x_21); +lean_closure_set(x_23, 1, x_22); +x_24 = l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7(x_23, x_4, x_5, x_6, x_7, x_8, x_18); +return x_24; } } static lean_object* _init_l_Lean_Meta_ElimEmptyInductive_elim___closed__1() { @@ -2673,7 +2544,7 @@ if (x_15 == 0) { lean_object* x_16; lean_object* x_17; x_16 = lean_box(0); -x_17 = l_Lean_Meta_ElimEmptyInductive_elim___lambda__4(x_1, x_2, x_16, x_3, x_4, x_5, x_6, x_7, x_13); +x_17 = l_Lean_Meta_ElimEmptyInductive_elim___lambda__7(x_1, x_2, x_16, x_3, x_4, x_5, x_6, x_7, x_13); return x_17; } else @@ -2681,7 +2552,7 @@ else lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; uint8_t x_23; lean_dec(x_2); lean_dec(x_1); -x_18 = l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__4; +x_18 = l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__4; x_19 = l_Lean_isTracingEnabledFor___at_Lean_Meta_ElimEmptyInductive_elim___spec__1(x_18, x_3, x_4, x_5, x_6, x_7, x_13); x_20 = lean_ctor_get(x_19, 0); lean_inc(x_20); @@ -2790,20 +2661,6 @@ lean_dec(x_3); return x_9; } } -LEAN_EXPORT lean_object* l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { -_start: -{ -lean_object* x_8; -x_8 = l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -return x_8; -} -} LEAN_EXPORT lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { @@ -2837,6 +2694,20 @@ lean_dec(x_1); return x_8; } } +LEAN_EXPORT lean_object* l_Lean_Meta_ElimEmptyInductive_elim___lambda__4___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; +x_8 = l_Lean_Meta_ElimEmptyInductive_elim___lambda__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_8; +} +} LEAN_EXPORT lean_object* l_Lean_commitWhen___at___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_elimEmptyInductive___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { @@ -2968,194 +2839,128 @@ return x_37; } } } -LEAN_EXPORT lean_object* l_Lean_commitWhen___at___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_elimEmptyInductive___spec__1___at___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_elimEmptyInductive___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_elimEmptyInductive___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_20; -x_9 = l_Lean_Meta_saveState___rarg(x_5, x_6, x_7, x_8); +lean_object* x_9; +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +x_9 = l_Lean_MVarId_exfalso(x_1, x_4, x_5, x_6, x_7, x_8); +if (lean_obj_tag(x_9) == 0) +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; x_10 = lean_ctor_get(x_9, 0); lean_inc(x_10); x_11 = lean_ctor_get(x_9, 1); lean_inc(x_11); lean_dec(x_9); +x_12 = lean_st_ref_get(x_7, x_11); +x_13 = lean_ctor_get(x_12, 1); +lean_inc(x_13); +lean_dec(x_12); +x_14 = lean_st_mk_ref(x_2, x_13); +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_14, 1); +lean_inc(x_16); +lean_dec(x_14); lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -x_20 = l_Lean_MVarId_exfalso(x_1, x_4, x_5, x_6, x_7, x_11); -if (lean_obj_tag(x_20) == 0) +lean_inc(x_15); +x_17 = l_Lean_Meta_ElimEmptyInductive_elim(x_10, x_3, x_15, x_4, x_5, x_6, x_7, x_16); +if (lean_obj_tag(x_17) == 0) { -lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; -x_21 = lean_ctor_get(x_20, 0); +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; uint8_t x_23; +x_18 = lean_ctor_get(x_17, 0); +lean_inc(x_18); +x_19 = lean_ctor_get(x_17, 1); +lean_inc(x_19); +lean_dec(x_17); +x_20 = lean_st_ref_get(x_7, x_19); +lean_dec(x_7); +x_21 = lean_ctor_get(x_20, 1); lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); lean_dec(x_20); -x_23 = lean_st_ref_get(x_7, x_22); -x_24 = lean_ctor_get(x_23, 1); -lean_inc(x_24); -lean_dec(x_23); -x_25 = lean_st_mk_ref(x_3, x_24); -x_26 = lean_ctor_get(x_25, 0); -lean_inc(x_26); -x_27 = lean_ctor_get(x_25, 1); -lean_inc(x_27); -lean_dec(x_25); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_26); -x_28 = l_Lean_Meta_ElimEmptyInductive_elim(x_21, x_2, x_26, x_4, x_5, x_6, x_7, x_27); -if (lean_obj_tag(x_28) == 0) +x_22 = lean_st_ref_get(x_15, x_21); +lean_dec(x_15); +x_23 = !lean_is_exclusive(x_22); +if (x_23 == 0) { -lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; uint8_t x_34; -x_29 = lean_ctor_get(x_28, 0); +lean_object* x_24; +x_24 = lean_ctor_get(x_22, 0); +lean_dec(x_24); +lean_ctor_set(x_22, 0, x_18); +return x_22; +} +else +{ +lean_object* x_25; lean_object* x_26; +x_25 = lean_ctor_get(x_22, 1); +lean_inc(x_25); +lean_dec(x_22); +x_26 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_26, 0, x_18); +lean_ctor_set(x_26, 1, x_25); +return x_26; +} +} +else +{ +uint8_t x_27; +lean_dec(x_15); +lean_dec(x_7); +x_27 = !lean_is_exclusive(x_17); +if (x_27 == 0) +{ +return x_17; +} +else +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_28 = lean_ctor_get(x_17, 0); +x_29 = lean_ctor_get(x_17, 1); lean_inc(x_29); -x_30 = lean_ctor_get(x_28, 1); -lean_inc(x_30); -lean_dec(x_28); -x_31 = lean_st_ref_get(x_7, x_30); -x_32 = lean_ctor_get(x_31, 1); -lean_inc(x_32); -lean_dec(x_31); -x_33 = lean_st_ref_get(x_26, x_32); -lean_dec(x_26); -x_34 = lean_unbox(x_29); -lean_dec(x_29); -if (x_34 == 0) +lean_inc(x_28); +lean_dec(x_17); +x_30 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_30, 0, x_28); +lean_ctor_set(x_30, 1, x_29); +return x_30; +} +} +} +else { -lean_object* x_35; lean_object* x_36; uint8_t x_37; -x_35 = lean_ctor_get(x_33, 1); -lean_inc(x_35); -lean_dec(x_33); -x_36 = l_Lean_Meta_SavedState_restore(x_10, x_4, x_5, x_6, x_7, x_35); +uint8_t x_31; lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -lean_dec(x_10); -x_37 = !lean_is_exclusive(x_36); -if (x_37 == 0) -{ -lean_object* x_38; uint8_t x_39; lean_object* x_40; -x_38 = lean_ctor_get(x_36, 0); -lean_dec(x_38); -x_39 = 0; -x_40 = lean_box(x_39); -lean_ctor_set(x_36, 0, x_40); -return x_36; -} -else -{ -lean_object* x_41; uint8_t x_42; lean_object* x_43; lean_object* x_44; -x_41 = lean_ctor_get(x_36, 1); -lean_inc(x_41); -lean_dec(x_36); -x_42 = 0; -x_43 = lean_box(x_42); -x_44 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_44, 0, x_43); -lean_ctor_set(x_44, 1, x_41); -return x_44; -} -} -else -{ -uint8_t x_45; -lean_dec(x_10); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -x_45 = !lean_is_exclusive(x_33); -if (x_45 == 0) -{ -lean_object* x_46; uint8_t x_47; lean_object* x_48; -x_46 = lean_ctor_get(x_33, 0); -lean_dec(x_46); -x_47 = 1; -x_48 = lean_box(x_47); -lean_ctor_set(x_33, 0, x_48); -return x_33; -} -else -{ -lean_object* x_49; uint8_t x_50; lean_object* x_51; lean_object* x_52; -x_49 = lean_ctor_get(x_33, 1); -lean_inc(x_49); -lean_dec(x_33); -x_50 = 1; -x_51 = lean_box(x_50); -x_52 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_52, 0, x_51); -lean_ctor_set(x_52, 1, x_49); -return x_52; -} -} -} -else -{ -lean_object* x_53; lean_object* x_54; -lean_dec(x_26); -x_53 = lean_ctor_get(x_28, 0); -lean_inc(x_53); -x_54 = lean_ctor_get(x_28, 1); -lean_inc(x_54); -lean_dec(x_28); -x_12 = x_53; -x_13 = x_54; -goto block_19; -} -} -else -{ -lean_object* x_55; lean_object* x_56; lean_dec(x_3); lean_dec(x_2); -x_55 = lean_ctor_get(x_20, 0); -lean_inc(x_55); -x_56 = lean_ctor_get(x_20, 1); -lean_inc(x_56); -lean_dec(x_20); -x_12 = x_55; -x_13 = x_56; -goto block_19; -} -block_19: +x_31 = !lean_is_exclusive(x_9); +if (x_31 == 0) { -lean_object* x_14; uint8_t x_15; -x_14 = l_Lean_Meta_SavedState_restore(x_10, x_4, x_5, x_6, x_7, x_13); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_10); -x_15 = !lean_is_exclusive(x_14); -if (x_15 == 0) -{ -lean_object* x_16; -x_16 = lean_ctor_get(x_14, 0); -lean_dec(x_16); -lean_ctor_set_tag(x_14, 1); -lean_ctor_set(x_14, 0, x_12); -return x_14; +return x_9; } else { -lean_object* x_17; lean_object* x_18; -x_17 = lean_ctor_get(x_14, 1); -lean_inc(x_17); -lean_dec(x_14); -x_18 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_18, 0, x_12); -lean_ctor_set(x_18, 1, x_17); -return x_18; +lean_object* x_32; lean_object* x_33; lean_object* x_34; +x_32 = lean_ctor_get(x_9, 0); +x_33 = lean_ctor_get(x_9, 1); +lean_inc(x_33); +lean_inc(x_32); +lean_dec(x_9); +x_34 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_34, 0, x_32); +lean_ctor_set(x_34, 1, x_33); +return x_34; } } } } -LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_elimEmptyInductive___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_elimEmptyInductive___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { lean_object* x_9; @@ -3209,17 +3014,21 @@ return x_19; } else { -lean_object* x_20; lean_object* x_21; +lean_object* x_20; lean_object* x_21; lean_object* x_22; x_20 = lean_ctor_get(x_9, 1); lean_inc(x_20); lean_dec(x_9); -x_21 = l_Lean_commitWhen___at___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_elimEmptyInductive___spec__1___at___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_elimEmptyInductive___spec__2(x_2, x_1, x_3, x_4, x_5, x_6, x_7, x_20); -return x_21; +x_21 = lean_alloc_closure((void*)(l___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_elimEmptyInductive___lambda__1), 8, 3); +lean_closure_set(x_21, 0, x_2); +lean_closure_set(x_21, 1, x_3); +lean_closure_set(x_21, 2, x_1); +x_22 = l_Lean_commitWhen___at___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_elimEmptyInductive___spec__1(x_21, x_4, x_5, x_6, x_7, x_20); +return x_22; } } else { -uint8_t x_22; +uint8_t x_23; lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); @@ -3227,23 +3036,23 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_22 = !lean_is_exclusive(x_9); -if (x_22 == 0) +x_23 = !lean_is_exclusive(x_9); +if (x_23 == 0) { return x_9; } else { -lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_23 = lean_ctor_get(x_9, 0); -x_24 = lean_ctor_get(x_9, 1); +lean_object* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_9, 0); +x_25 = lean_ctor_get(x_9, 1); +lean_inc(x_25); lean_inc(x_24); -lean_inc(x_23); lean_dec(x_9); -x_25 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_25, 0, x_23); -lean_ctor_set(x_25, 1, x_24); -return x_25; +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +return x_26; } } } @@ -3253,7 +3062,7 @@ _start: { lean_object* x_9; lean_object* x_10; lean_inc(x_1); -x_9 = lean_alloc_closure((void*)(l___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_elimEmptyInductive___lambda__1), 8, 3); +x_9 = lean_alloc_closure((void*)(l___private_Lean_Meta_Tactic_Contradiction_0__Lean_Meta_elimEmptyInductive___lambda__2), 8, 3); lean_closure_set(x_9, 0, x_2); lean_closure_set(x_9, 1, x_1); lean_closure_set(x_9, 2, x_3); @@ -9392,7 +9201,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__3; +x_2 = l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__3; x_3 = l_Lean_Name_str___override(x_1, x_2); return x_3; } @@ -9554,7 +9363,7 @@ static lean_object* _init_l_Lean_MVarId_contradiction___closed__1() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__6; +x_1 = l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__7; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; @@ -9673,7 +9482,7 @@ LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Contradictio _start: { lean_object* x_2; uint8_t x_3; lean_object* x_4; -x_2 = l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__4; +x_2 = l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__4; x_3 = 0; x_4 = l_Lean_registerTraceClass(x_2, x_3, x_1); return x_4; @@ -9747,22 +9556,6 @@ l_Array_forInUnsafe_loop___at_Lean_Meta_ElimEmptyInductive_elim___spec__5___boxe lean_mark_persistent(l_Array_forInUnsafe_loop___at_Lean_Meta_ElimEmptyInductive_elim___spec__5___boxed__const__1); l_Lean_addTrace___at_Lean_Meta_ElimEmptyInductive_elim___spec__6___closed__1 = _init_l_Lean_addTrace___at_Lean_Meta_ElimEmptyInductive_elim___spec__6___closed__1(); lean_mark_persistent(l_Lean_addTrace___at_Lean_Meta_ElimEmptyInductive_elim___spec__6___closed__1); -l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__1___closed__1 = _init_l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__1___closed__1(); -lean_mark_persistent(l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__1___closed__1); -l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__1 = _init_l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__1(); -lean_mark_persistent(l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__1); -l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__2 = _init_l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__2(); -lean_mark_persistent(l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__2); -l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__3 = _init_l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__3(); -lean_mark_persistent(l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__3); -l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__4 = _init_l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__4(); -lean_mark_persistent(l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__4); -l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__5 = _init_l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__5(); -lean_mark_persistent(l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__5); -l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__6 = _init_l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__6(); -lean_mark_persistent(l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__6); -l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__7 = _init_l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__7(); -lean_mark_persistent(l_Lean_commitWhen___at_Lean_Meta_ElimEmptyInductive_elim___spec__7___at_Lean_Meta_ElimEmptyInductive_elim___spec__8___lambda__2___closed__7); l_Lean_Meta_ElimEmptyInductive_elim___lambda__2___closed__1 = _init_l_Lean_Meta_ElimEmptyInductive_elim___lambda__2___closed__1(); lean_mark_persistent(l_Lean_Meta_ElimEmptyInductive_elim___lambda__2___closed__1); l_Lean_Meta_ElimEmptyInductive_elim___lambda__2___closed__2 = _init_l_Lean_Meta_ElimEmptyInductive_elim___lambda__2___closed__2(); @@ -9771,8 +9564,24 @@ l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__1 = _init_l_Lean_Meta_ lean_mark_persistent(l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__1); l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__2 = _init_l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__2(); lean_mark_persistent(l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__2); +l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__3 = _init_l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__3(); +lean_mark_persistent(l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__3); +l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__4 = _init_l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__4(); +lean_mark_persistent(l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__4); +l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__5 = _init_l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__5(); +lean_mark_persistent(l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__5); +l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__6 = _init_l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__6(); +lean_mark_persistent(l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__6); +l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__7 = _init_l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__7(); +lean_mark_persistent(l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__7); +l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__8 = _init_l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__8(); +lean_mark_persistent(l_Lean_Meta_ElimEmptyInductive_elim___lambda__3___closed__8); l_Lean_Meta_ElimEmptyInductive_elim___lambda__4___closed__1 = _init_l_Lean_Meta_ElimEmptyInductive_elim___lambda__4___closed__1(); lean_mark_persistent(l_Lean_Meta_ElimEmptyInductive_elim___lambda__4___closed__1); +l_Lean_Meta_ElimEmptyInductive_elim___lambda__5___closed__1 = _init_l_Lean_Meta_ElimEmptyInductive_elim___lambda__5___closed__1(); +lean_mark_persistent(l_Lean_Meta_ElimEmptyInductive_elim___lambda__5___closed__1); +l_Lean_Meta_ElimEmptyInductive_elim___lambda__7___closed__1 = _init_l_Lean_Meta_ElimEmptyInductive_elim___lambda__7___closed__1(); +lean_mark_persistent(l_Lean_Meta_ElimEmptyInductive_elim___lambda__7___closed__1); l_Lean_Meta_ElimEmptyInductive_elim___closed__1 = _init_l_Lean_Meta_ElimEmptyInductive_elim___closed__1(); lean_mark_persistent(l_Lean_Meta_ElimEmptyInductive_elim___closed__1); l_Lean_Meta_ElimEmptyInductive_elim___closed__2 = _init_l_Lean_Meta_ElimEmptyInductive_elim___closed__2(); diff --git a/stage0/stdlib/Lean/Meta/Tactic/Refl.c b/stage0/stdlib/Lean/Meta/Tactic/Refl.c index 3dc0dcd1cc..121bd623f3 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Refl.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Refl.c @@ -13,6 +13,7 @@ #ifdef __cplusplus extern "C" { #endif +static lean_object* l_Lean_MVarId_heqOfEq___lambda__1___closed__2; LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_MVarId_refl___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_ofExceptKernelException___at_Lean_MVarId_refl___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkFreshLevelMVar(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -28,24 +29,27 @@ LEAN_EXPORT lean_object* l_Lean_throwKernelException___at_Lean_MVarId_refl___spe lean_object* lean_st_ref_get(lean_object*, lean_object*); lean_object* l_Lean_Expr_appFn_x21(lean_object*); lean_object* l_Lean_Name_mkStr2(lean_object*, lean_object*); -static lean_object* l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1___at_Lean_MVarId_heqOfEq___spec__2___closed__2; LEAN_EXPORT lean_object* l_Lean_MVarId_refl___lambda__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MVarId_withContext___at___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_appArg_x21(lean_object*); +static lean_object* l_Lean_MVarId_heqOfEq___lambda__1___closed__1; static lean_object* l_Lean_MVarId_hrefl___lambda__1___closed__2; -static lean_object* l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1___at_Lean_MVarId_heqOfEq___spec__2___closed__1; +static lean_object* l_Lean_MVarId_heqOfEq___lambda__1___closed__3; LEAN_EXPORT lean_object* l_Lean_Meta_refl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_MVarId_refl___lambda__2___closed__5; static lean_object* l_Lean_MVarId_refl___lambda__3___closed__6; LEAN_EXPORT lean_object* l_Lean_MVarId_heqOfEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_MVarId_eqOfHEq___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_constLevels_x21(lean_object*); static lean_object* l_Lean_MVarId_hrefl___lambda__2___closed__4; LEAN_EXPORT lean_object* l_Lean_throwKernelException___at_Lean_MVarId_refl___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_MVarId_eqOfHEq___lambda__1___closed__2; lean_object* l_Lean_MVarId_assign___at_Lean_Meta_getLevel___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_MVarId_refl___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_KernelException_toMessageData(lean_object*, lean_object*); static lean_object* l_Lean_MVarId_refl___lambda__3___closed__5; static lean_object* l_Lean_MVarId_refl___lambda__2___closed__7; +LEAN_EXPORT lean_object* l_Lean_MVarId_heqOfEq___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MVarId_checkNotAssigned(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_MVarId_refl___lambda__2___closed__3; LEAN_EXPORT lean_object* l_Lean_MVarId_applyRefl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -55,7 +59,6 @@ uint8_t l_Lean_Expr_isAppOfArity(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_MVarId_refl___lambda__1___closed__3; static lean_object* l_Lean_MVarId_refl___closed__1; static lean_object* l_Lean_MVarId_refl___lambda__4___closed__2; -static lean_object* l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1___at_Lean_MVarId_heqOfEq___spec__2___closed__3; lean_object* lean_kernel_is_def_eq(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_SavedState_restore(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_MVarId_refl___lambda__2___closed__4; @@ -76,6 +79,7 @@ LEAN_EXPORT lean_object* l_Lean_MVarId_refl___lambda__1(lean_object*, lean_objec LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Refl_0__Lean_Meta_useKernel___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_MVarId_refl___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_MVarId_refl___lambda__1___closed__1; +static lean_object* l_Lean_MVarId_eqOfHEq___lambda__1___closed__1; static lean_object* l_Lean_MVarId_refl___lambda__2___closed__1; lean_object* l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_MVarId_refl___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -87,11 +91,11 @@ lean_object* l_Lean_MVarId_getType_x27(lean_object*, lean_object*, lean_object*, lean_object* l_Lean_Meta_getTransparency(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_ofExceptKernelException___at_Lean_MVarId_refl___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1___at_Lean_MVarId_heqOfEq___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_getAppFn(lean_object*); lean_object* l_Lean_mkAppB(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_indentExpr(lean_object*); uint8_t l_Lean_Expr_hasFVar(lean_object*); +LEAN_EXPORT lean_object* l_Lean_MVarId_eqOfHEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Refl_0__Lean_Meta_useKernel(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_MVarId_hrefl___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_MVarId_refl___lambda__3___closed__2; @@ -1126,7 +1130,7 @@ return x_25; } } } -static lean_object* _init_l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1___at_Lean_MVarId_heqOfEq___spec__2___closed__1() { +static lean_object* _init_l_Lean_MVarId_heqOfEq___lambda__1___closed__1() { _start: { lean_object* x_1; @@ -1134,17 +1138,17 @@ x_1 = lean_mk_string_from_bytes("heq_of_eq", 9); return x_1; } } -static lean_object* _init_l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1___at_Lean_MVarId_heqOfEq___spec__2___closed__2() { +static lean_object* _init_l_Lean_MVarId_heqOfEq___lambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1___at_Lean_MVarId_heqOfEq___spec__2___closed__1; +x_2 = l_Lean_MVarId_heqOfEq___lambda__1___closed__1; x_3 = l_Lean_Name_str___override(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1___at_Lean_MVarId_heqOfEq___spec__2___closed__3() { +static lean_object* _init_l_Lean_MVarId_heqOfEq___lambda__1___closed__3() { _start: { uint8_t x_1; uint8_t x_2; lean_object* x_3; @@ -1156,62 +1160,118 @@ lean_ctor_set_uint8(x_3, 1, x_2); return x_3; } } -LEAN_EXPORT lean_object* l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1___at_Lean_MVarId_heqOfEq___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +LEAN_EXPORT lean_object* l_Lean_MVarId_heqOfEq___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_7 = l_Lean_Meta_saveState___rarg(x_3, x_4, x_5, x_6); +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_7 = l_Lean_Meta_mkFreshLevelMVar(x_2, x_3, x_4, x_5, x_6); x_8 = lean_ctor_get(x_7, 0); lean_inc(x_8); x_9 = lean_ctor_get(x_7, 1); lean_inc(x_9); lean_dec(x_7); -x_10 = l_Lean_Meta_mkFreshLevelMVar(x_2, x_3, x_4, x_5, x_9); -x_11 = lean_ctor_get(x_10, 0); -lean_inc(x_11); -x_12 = lean_ctor_get(x_10, 1); -lean_inc(x_12); -lean_dec(x_10); -x_13 = lean_box(0); -x_14 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_14, 0, x_11); -lean_ctor_set(x_14, 1, x_13); -x_15 = l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1___at_Lean_MVarId_heqOfEq___spec__2___closed__2; -x_16 = l_Lean_Expr_const___override(x_15, x_14); -x_17 = l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1___at_Lean_MVarId_heqOfEq___spec__2___closed__3; -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_2); -x_18 = l_Lean_MVarId_apply(x_1, x_16, x_17, x_2, x_3, x_4, x_5, x_12); -if (lean_obj_tag(x_18) == 0) +x_10 = lean_box(0); +x_11 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_11, 0, x_8); +lean_ctor_set(x_11, 1, x_10); +x_12 = l_Lean_MVarId_heqOfEq___lambda__1___closed__2; +x_13 = l_Lean_Expr_const___override(x_12, x_11); +x_14 = l_Lean_MVarId_heqOfEq___lambda__1___closed__3; +x_15 = l_Lean_MVarId_apply(x_1, x_13, x_14, x_2, x_3, x_4, x_5, x_9); +return x_15; +} +} +LEAN_EXPORT lean_object* l_Lean_MVarId_heqOfEq___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: { -uint8_t x_19; -lean_dec(x_8); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_19 = !lean_is_exclusive(x_18); -if (x_19 == 0) +lean_object* x_8; lean_object* x_9; +x_8 = l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1(x_1, x_3, x_4, x_5, x_6, x_7); +x_9 = lean_ctor_get(x_8, 0); +lean_inc(x_9); +if (lean_obj_tag(x_9) == 0) { -lean_object* x_20; lean_object* x_21; -x_20 = lean_ctor_get(x_18, 0); -x_21 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_21, 0, x_20); -lean_ctor_set(x_18, 0, x_21); -return x_18; +uint8_t x_10; +x_10 = !lean_is_exclusive(x_8); +if (x_10 == 0) +{ +lean_object* x_11; +x_11 = lean_ctor_get(x_8, 0); +lean_dec(x_11); +lean_ctor_set(x_8, 0, x_2); +return x_8; } else { -lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_22 = lean_ctor_get(x_18, 0); -x_23 = lean_ctor_get(x_18, 1); -lean_inc(x_23); +lean_object* x_12; lean_object* x_13; +x_12 = lean_ctor_get(x_8, 1); +lean_inc(x_12); +lean_dec(x_8); +x_13 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_13, 0, x_2); +lean_ctor_set(x_13, 1, x_12); +return x_13; +} +} +else +{ +lean_object* x_14; +x_14 = lean_ctor_get(x_9, 0); +lean_inc(x_14); +lean_dec(x_9); +if (lean_obj_tag(x_14) == 0) +{ +uint8_t x_15; +x_15 = !lean_is_exclusive(x_8); +if (x_15 == 0) +{ +lean_object* x_16; +x_16 = lean_ctor_get(x_8, 0); +lean_dec(x_16); +lean_ctor_set(x_8, 0, x_2); +return x_8; +} +else +{ +lean_object* x_17; lean_object* x_18; +x_17 = lean_ctor_get(x_8, 1); +lean_inc(x_17); +lean_dec(x_8); +x_18 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_18, 0, x_2); +lean_ctor_set(x_18, 1, x_17); +return x_18; +} +} +else +{ +lean_object* x_19; +x_19 = lean_ctor_get(x_14, 1); +lean_inc(x_19); +if (lean_obj_tag(x_19) == 0) +{ +uint8_t x_20; +lean_dec(x_2); +x_20 = !lean_is_exclusive(x_8); +if (x_20 == 0) +{ +lean_object* x_21; lean_object* x_22; +x_21 = lean_ctor_get(x_8, 0); +lean_dec(x_21); +x_22 = lean_ctor_get(x_14, 0); lean_inc(x_22); -lean_dec(x_18); -x_24 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_24, 0, x_22); +lean_dec(x_14); +lean_ctor_set(x_8, 0, x_22); +return x_8; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_23 = lean_ctor_get(x_8, 1); +lean_inc(x_23); +lean_dec(x_8); +x_24 = lean_ctor_get(x_14, 0); +lean_inc(x_24); +lean_dec(x_14); x_25 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_25, 0, x_24); lean_ctor_set(x_25, 1, x_23); @@ -1220,163 +1280,28 @@ return x_25; } else { -lean_object* x_26; lean_object* x_27; uint8_t x_28; -x_26 = lean_ctor_get(x_18, 1); -lean_inc(x_26); -lean_dec(x_18); -x_27 = l_Lean_Meta_SavedState_restore(x_8, x_2, x_3, x_4, x_5, x_26); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_8); -x_28 = !lean_is_exclusive(x_27); -if (x_28 == 0) +uint8_t x_26; +lean_dec(x_19); +lean_dec(x_14); +x_26 = !lean_is_exclusive(x_8); +if (x_26 == 0) { -lean_object* x_29; lean_object* x_30; -x_29 = lean_ctor_get(x_27, 0); -lean_dec(x_29); -x_30 = lean_box(0); -lean_ctor_set(x_27, 0, x_30); -return x_27; -} -else -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; -x_31 = lean_ctor_get(x_27, 1); -lean_inc(x_31); +lean_object* x_27; +x_27 = lean_ctor_get(x_8, 0); lean_dec(x_27); -x_32 = lean_box(0); -x_33 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_33, 0, x_32); -lean_ctor_set(x_33, 1, x_31); -return x_33; -} -} -} -} -LEAN_EXPORT lean_object* l_Lean_MVarId_heqOfEq___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { -_start: -{ -lean_object* x_7; lean_object* x_8; -lean_inc(x_1); -x_7 = l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1___at_Lean_MVarId_heqOfEq___spec__2(x_1, x_2, x_3, x_4, x_5, x_6); -x_8 = lean_ctor_get(x_7, 0); -lean_inc(x_8); -if (lean_obj_tag(x_8) == 0) -{ -uint8_t x_9; -x_9 = !lean_is_exclusive(x_7); -if (x_9 == 0) -{ -lean_object* x_10; -x_10 = lean_ctor_get(x_7, 0); -lean_dec(x_10); -lean_ctor_set(x_7, 0, x_1); -return x_7; +lean_ctor_set(x_8, 0, x_2); +return x_8; } else { -lean_object* x_11; lean_object* x_12; -x_11 = lean_ctor_get(x_7, 1); -lean_inc(x_11); -lean_dec(x_7); -x_12 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_12, 0, x_1); -lean_ctor_set(x_12, 1, x_11); -return x_12; -} -} -else -{ -lean_object* x_13; -x_13 = lean_ctor_get(x_8, 0); -lean_inc(x_13); +lean_object* x_28; lean_object* x_29; +x_28 = lean_ctor_get(x_8, 1); +lean_inc(x_28); lean_dec(x_8); -if (lean_obj_tag(x_13) == 0) -{ -uint8_t x_14; -x_14 = !lean_is_exclusive(x_7); -if (x_14 == 0) -{ -lean_object* x_15; -x_15 = lean_ctor_get(x_7, 0); -lean_dec(x_15); -lean_ctor_set(x_7, 0, x_1); -return x_7; -} -else -{ -lean_object* x_16; lean_object* x_17; -x_16 = lean_ctor_get(x_7, 1); -lean_inc(x_16); -lean_dec(x_7); -x_17 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_17, 0, x_1); -lean_ctor_set(x_17, 1, x_16); -return x_17; -} -} -else -{ -lean_object* x_18; -x_18 = lean_ctor_get(x_13, 1); -lean_inc(x_18); -if (lean_obj_tag(x_18) == 0) -{ -uint8_t x_19; -lean_dec(x_1); -x_19 = !lean_is_exclusive(x_7); -if (x_19 == 0) -{ -lean_object* x_20; lean_object* x_21; -x_20 = lean_ctor_get(x_7, 0); -lean_dec(x_20); -x_21 = lean_ctor_get(x_13, 0); -lean_inc(x_21); -lean_dec(x_13); -lean_ctor_set(x_7, 0, x_21); -return x_7; -} -else -{ -lean_object* x_22; lean_object* x_23; lean_object* x_24; -x_22 = lean_ctor_get(x_7, 1); -lean_inc(x_22); -lean_dec(x_7); -x_23 = lean_ctor_get(x_13, 0); -lean_inc(x_23); -lean_dec(x_13); -x_24 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_24, 0, x_23); -lean_ctor_set(x_24, 1, x_22); -return x_24; -} -} -else -{ -uint8_t x_25; -lean_dec(x_18); -lean_dec(x_13); -x_25 = !lean_is_exclusive(x_7); -if (x_25 == 0) -{ -lean_object* x_26; -x_26 = lean_ctor_get(x_7, 0); -lean_dec(x_26); -lean_ctor_set(x_7, 0, x_1); -return x_7; -} -else -{ -lean_object* x_27; lean_object* x_28; -x_27 = lean_ctor_get(x_7, 1); -lean_inc(x_27); -lean_dec(x_7); -x_28 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_28, 0, x_1); -lean_ctor_set(x_28, 1, x_27); -return x_28; +x_29 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_29, 0, x_2); +lean_ctor_set(x_29, 1, x_28); +return x_29; } } } @@ -1386,12 +1311,70 @@ return x_28; LEAN_EXPORT lean_object* l_Lean_MVarId_heqOfEq(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_7; lean_object* x_8; +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_inc(x_1); x_7 = lean_alloc_closure((void*)(l_Lean_MVarId_heqOfEq___lambda__1), 6, 1); lean_closure_set(x_7, 0, x_1); -x_8 = l_Lean_MVarId_withContext___at___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___spec__2___rarg(x_1, x_7, x_2, x_3, x_4, x_5, x_6); -return x_8; +lean_inc(x_1); +x_8 = lean_alloc_closure((void*)(l_Lean_MVarId_heqOfEq___lambda__2), 7, 2); +lean_closure_set(x_8, 0, x_7); +lean_closure_set(x_8, 1, x_1); +x_9 = l_Lean_MVarId_withContext___at___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___spec__2___rarg(x_1, x_8, x_2, x_3, x_4, x_5, x_6); +return x_9; +} +} +static lean_object* _init_l_Lean_MVarId_eqOfHEq___lambda__1___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string_from_bytes("eq_of_heq", 9); +return x_1; +} +} +static lean_object* _init_l_Lean_MVarId_eqOfHEq___lambda__1___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_MVarId_eqOfHEq___lambda__1___closed__1; +x_3 = l_Lean_Name_str___override(x_1, x_2); +return x_3; +} +} +LEAN_EXPORT lean_object* l_Lean_MVarId_eqOfHEq___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_7 = l_Lean_Meta_mkFreshLevelMVar(x_2, x_3, x_4, x_5, x_6); +x_8 = lean_ctor_get(x_7, 0); +lean_inc(x_8); +x_9 = lean_ctor_get(x_7, 1); +lean_inc(x_9); +lean_dec(x_7); +x_10 = lean_box(0); +x_11 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_11, 0, x_8); +lean_ctor_set(x_11, 1, x_10); +x_12 = l_Lean_MVarId_eqOfHEq___lambda__1___closed__2; +x_13 = l_Lean_Expr_const___override(x_12, x_11); +x_14 = l_Lean_MVarId_heqOfEq___lambda__1___closed__3; +x_15 = l_Lean_MVarId_apply(x_1, x_13, x_14, x_2, x_3, x_4, x_5, x_9); +return x_15; +} +} +LEAN_EXPORT lean_object* l_Lean_MVarId_eqOfHEq(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; +lean_inc(x_1); +x_7 = lean_alloc_closure((void*)(l_Lean_MVarId_eqOfHEq___lambda__1), 6, 1); +lean_closure_set(x_7, 0, x_1); +lean_inc(x_1); +x_8 = lean_alloc_closure((void*)(l_Lean_MVarId_heqOfEq___lambda__2), 7, 2); +lean_closure_set(x_8, 0, x_7); +lean_closure_set(x_8, 1, x_1); +x_9 = l_Lean_MVarId_withContext___at___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___spec__2___rarg(x_1, x_8, x_2, x_3, x_4, x_5, x_6); +return x_9; } } static lean_object* _init_l_Lean_MVarId_hrefl___lambda__1___closed__1() { @@ -1428,7 +1411,7 @@ lean_ctor_set(x_11, 0, x_8); lean_ctor_set(x_11, 1, x_10); x_12 = l_Lean_MVarId_hrefl___lambda__1___closed__2; x_13 = l_Lean_Expr_const___override(x_12, x_11); -x_14 = l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1___at_Lean_MVarId_heqOfEq___spec__2___closed__3; +x_14 = l_Lean_MVarId_heqOfEq___lambda__1___closed__3; x_15 = l_Lean_MVarId_apply(x_1, x_13, x_14, x_2, x_3, x_4, x_5, x_9); return x_15; } @@ -1629,12 +1612,16 @@ l_Lean_MVarId_refl___lambda__4___closed__3 = _init_l_Lean_MVarId_refl___lambda__ lean_mark_persistent(l_Lean_MVarId_refl___lambda__4___closed__3); l_Lean_MVarId_refl___closed__1 = _init_l_Lean_MVarId_refl___closed__1(); lean_mark_persistent(l_Lean_MVarId_refl___closed__1); -l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1___at_Lean_MVarId_heqOfEq___spec__2___closed__1 = _init_l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1___at_Lean_MVarId_heqOfEq___spec__2___closed__1(); -lean_mark_persistent(l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1___at_Lean_MVarId_heqOfEq___spec__2___closed__1); -l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1___at_Lean_MVarId_heqOfEq___spec__2___closed__2 = _init_l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1___at_Lean_MVarId_heqOfEq___spec__2___closed__2(); -lean_mark_persistent(l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1___at_Lean_MVarId_heqOfEq___spec__2___closed__2); -l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1___at_Lean_MVarId_heqOfEq___spec__2___closed__3 = _init_l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1___at_Lean_MVarId_heqOfEq___spec__2___closed__3(); -lean_mark_persistent(l_Lean_observing_x3f___at_Lean_MVarId_heqOfEq___spec__1___at_Lean_MVarId_heqOfEq___spec__2___closed__3); +l_Lean_MVarId_heqOfEq___lambda__1___closed__1 = _init_l_Lean_MVarId_heqOfEq___lambda__1___closed__1(); +lean_mark_persistent(l_Lean_MVarId_heqOfEq___lambda__1___closed__1); +l_Lean_MVarId_heqOfEq___lambda__1___closed__2 = _init_l_Lean_MVarId_heqOfEq___lambda__1___closed__2(); +lean_mark_persistent(l_Lean_MVarId_heqOfEq___lambda__1___closed__2); +l_Lean_MVarId_heqOfEq___lambda__1___closed__3 = _init_l_Lean_MVarId_heqOfEq___lambda__1___closed__3(); +lean_mark_persistent(l_Lean_MVarId_heqOfEq___lambda__1___closed__3); +l_Lean_MVarId_eqOfHEq___lambda__1___closed__1 = _init_l_Lean_MVarId_eqOfHEq___lambda__1___closed__1(); +lean_mark_persistent(l_Lean_MVarId_eqOfHEq___lambda__1___closed__1); +l_Lean_MVarId_eqOfHEq___lambda__1___closed__2 = _init_l_Lean_MVarId_eqOfHEq___lambda__1___closed__2(); +lean_mark_persistent(l_Lean_MVarId_eqOfHEq___lambda__1___closed__2); l_Lean_MVarId_hrefl___lambda__1___closed__1 = _init_l_Lean_MVarId_hrefl___lambda__1___closed__1(); lean_mark_persistent(l_Lean_MVarId_hrefl___lambda__1___closed__1); l_Lean_MVarId_hrefl___lambda__1___closed__2 = _init_l_Lean_MVarId_hrefl___lambda__1___closed__2(); diff --git a/stage0/stdlib/Lean/Meta/Tactic/Split.c b/stage0/stdlib/Lean/Meta/Tactic/Split.c index f151fcc0e3..b0a9e3a53b 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Split.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Split.c @@ -41,6 +41,7 @@ LEAN_EXPORT lean_object* l_Lean_Meta_splitTarget_x3f_go(lean_object*, uint8_t, l lean_object* lean_array_uget(lean_object*, size_t); static lean_object* l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__1; static lean_object* l_Lean_Meta_Split_applyMatchSplitter___closed__1; +LEAN_EXPORT lean_object* l_Lean_Meta_splitTarget_x3f___lambda__1(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_throwError___at_Lean_Meta_mkSimpCongrTheorem___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_simpMatchCore_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_generalizeMatchDiscrs___lambda__6___closed__2; @@ -80,7 +81,6 @@ extern lean_object* l_instInhabitedNat; uint8_t l_Lean_Expr_isAppOf(lean_object*, lean_object*); static lean_object* l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__4; lean_object* l_Lean_Meta_Match_MatcherInfo_getFirstDiscrPos(lean_object*); -static lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__1; lean_object* l_Array_toSubarray___rarg(lean_object*, lean_object*, lean_object*); lean_object* lean_array_push(lean_object*, lean_object*); lean_object* lean_array_get_size(lean_object*); @@ -99,6 +99,7 @@ LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_Split_applyMatchSplitt LEAN_EXPORT lean_object* l_Lean_Meta_splitTarget_x3f_go___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_List_mapM_loop___at_Lean_Meta_splitLocalDecl_x3f___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_List_foldlM___at_Lean_Meta_Split_applyMatchSplitter___spec__2___lambda__2___closed__1; +lean_object* l_Lean_Meta_splitIfTarget_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_appArg_x21(lean_object*); static lean_object* l_Std_Range_forIn_loop___at___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_generalizeMatchDiscrs_mkNewTarget___spec__2___lambda__3___closed__1; static lean_object* l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_generalizeMatchDiscrs___lambda__6___closed__6; @@ -130,12 +131,13 @@ lean_object* l_Array_zip___rarg(lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_generalizeMatchDiscrs_mkNewTarget___lambda__1___closed__2; lean_object* l_Lean_mkAppN(lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_simpMatchCore_pre___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_Meta_splitTarget_x3f___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MVarId_replaceTargetDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_FindImpl_findUnsafe_x3f(lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_generalizeMatchDiscrs_withNewAltEqs___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_ReaderT_instMonadLiftReaderT(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Split_findSplit_x3f_isCandidate___lambda__1___boxed(lean_object*); -LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Meta_splitTarget_x3f___lambda__1___closed__1; uint8_t l_Lean_HashSetImp_contains___at_Lean_CollectFVars_visit___spec__1(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_foldlMUnsafe_fold___at___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_generalizeMatchDiscrs_withNewAltEqs___spec__2(lean_object*, size_t, size_t, lean_object*); lean_object* l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(lean_object*, lean_object*, lean_object*); @@ -208,7 +210,6 @@ lean_object* l_Lean_Meta_introNCore(lean_object*, lean_object*, lean_object*, ui LEAN_EXPORT lean_object* l_Lean_Meta_Split_applyMatchSplitter___lambda__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_splitTarget_x3f(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_generalizeMatchDiscrs_mkNewTarget___spec__1___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_observing_x3f___at_Lean_Meta_substCore_x3f___spec__1___at_Lean_Meta_substCore_x3f___spec__2(lean_object*, lean_object*, uint8_t, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_generalizeMatchDiscrs_mkNewTarget___spec__1(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_splitIfLocalDecl_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Split_simpMatch___closed__3; @@ -264,7 +265,6 @@ lean_object* l_Lean_Meta_mkEqTrans(lean_object*, lean_object*, lean_object*, lea LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_withEqs_go___rarg___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Split_applyMatchSplitter___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Split_findSplit_x3f(lean_object*, lean_object*, uint8_t, lean_object*); -lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfTarget_x3f___spec__1___at_Lean_Meta_splitIfTarget_x3f___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Split_findSplit_x3f_go___boxed(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Split_applyMatchSplitter___lambda__1(lean_object*, lean_object*, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkHEqTrans(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -276,6 +276,7 @@ uint8_t lean_nat_dec_eq(lean_object*, lean_object*); lean_object* l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_instInhabitedName; lean_object* l_Lean_Expr_app___override(lean_object*, lean_object*); +lean_object* l_Lean_Meta_substCore_x3f(lean_object*, lean_object*, uint8_t, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_List_foldlM___at_Lean_Meta_Split_applyMatchSplitter___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_get_match_equations_for(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_splitTarget_x3f_go___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -302,7 +303,6 @@ lean_object* l_Lean_Meta_mkEqHEq(lean_object*, lean_object*, lean_object*, lean_ static lean_object* l_List_foldlM___at_Lean_Meta_Split_applyMatchSplitter___spec__2___closed__2; LEAN_EXPORT lean_object* l_Lean_Meta_Split_applyMatchSplitter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withLocalDecl___at_Lean_Meta_GeneralizeTelescope_generalizeTelescopeAux___spec__1___rarg(lean_object*, uint8_t, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_generalizeMatchDiscrs_mkNewTarget___lambda__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Std_Range_forIn_loop___at_Lean_Meta_Split_findSplit_x3f_isCandidate___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Level_isZero(lean_object*); @@ -5795,7 +5795,7 @@ lean_inc(x_5); lean_inc(x_20); lean_inc(x_29); lean_inc(x_30); -x_32 = l_Lean_observing_x3f___at_Lean_Meta_substCore_x3f___spec__1___at_Lean_Meta_substCore_x3f___spec__2(x_30, x_29, x_31, x_20, x_25, x_31, x_5, x_6, x_7, x_8, x_28); +x_32 = l_Lean_Meta_substCore_x3f(x_30, x_29, x_31, x_20, x_25, x_31, x_5, x_6, x_7, x_8, x_28); x_33 = lean_ctor_get(x_32, 0); lean_inc(x_33); if (lean_obj_tag(x_33) == 0) @@ -5810,7 +5810,7 @@ lean_inc(x_6); lean_inc(x_5); lean_inc(x_20); lean_inc(x_30); -x_35 = l_Lean_observing_x3f___at_Lean_Meta_substCore_x3f___spec__1___at_Lean_Meta_substCore_x3f___spec__2(x_30, x_29, x_25, x_20, x_25, x_31, x_5, x_6, x_7, x_8, x_34); +x_35 = l_Lean_Meta_substCore_x3f(x_30, x_29, x_25, x_20, x_25, x_31, x_5, x_6, x_7, x_8, x_34); x_36 = lean_ctor_get(x_35, 0); lean_inc(x_36); if (lean_obj_tag(x_36) == 0) @@ -9732,7 +9732,7 @@ lean_dec(x_33); lean_dec(x_4); lean_dec(x_3); x_45 = lean_box(0); -x_46 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfTarget_x3f___spec__1___at_Lean_Meta_splitIfTarget_x3f___spec__2(x_1, x_45, x_5, x_6, x_7, x_8, x_12); +x_46 = l_Lean_Meta_splitIfTarget_x3f(x_1, x_45, x_5, x_6, x_7, x_8, x_12); if (lean_obj_tag(x_46) == 0) { lean_object* x_47; @@ -9902,7 +9902,7 @@ lean_dec(x_33); lean_dec(x_4); lean_dec(x_3); x_86 = lean_box(0); -x_87 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfTarget_x3f___spec__1___at_Lean_Meta_splitIfTarget_x3f___spec__2(x_1, x_86, x_5, x_6, x_7, x_8, x_12); +x_87 = l_Lean_Meta_splitIfTarget_x3f(x_1, x_86, x_5, x_6, x_7, x_8, x_12); if (lean_obj_tag(x_87) == 0) { lean_object* x_88; @@ -10138,7 +10138,7 @@ lean_dec(x_127); lean_dec(x_4); lean_dec(x_3); x_139 = lean_box(0); -x_140 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfTarget_x3f___spec__1___at_Lean_Meta_splitIfTarget_x3f___spec__2(x_1, x_139, x_5, x_6, x_7, x_8, x_12); +x_140 = l_Lean_Meta_splitIfTarget_x3f(x_1, x_139, x_5, x_6, x_7, x_8, x_12); if (lean_obj_tag(x_140) == 0) { lean_object* x_141; @@ -10255,7 +10255,7 @@ lean_dec(x_127); lean_dec(x_4); lean_dec(x_3); x_162 = lean_box(0); -x_163 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfTarget_x3f___spec__1___at_Lean_Meta_splitIfTarget_x3f___spec__2(x_1, x_162, x_5, x_6, x_7, x_8, x_12); +x_163 = l_Lean_Meta_splitIfTarget_x3f(x_1, x_162, x_5, x_6, x_7, x_8, x_12); if (lean_obj_tag(x_163) == 0) { lean_object* x_164; @@ -10543,7 +10543,7 @@ return x_36; } } } -static lean_object* _init_l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__1() { +static lean_object* _init_l_Lean_Meta_splitTarget_x3f___lambda__1___closed__1() { _start: { lean_object* x_1; lean_object* x_2; @@ -10552,209 +10552,55 @@ x_2 = l_Lean_mkHashSetImp___rarg(x_1); return x_2; } } -LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2(lean_object* x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +LEAN_EXPORT lean_object* l_Lean_Meta_splitTarget_x3f___lambda__1(lean_object* x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; -x_8 = l_Lean_Meta_saveState___rarg(x_4, x_5, x_6, x_7); +lean_object* x_8; +lean_inc(x_1); +x_8 = l_Lean_MVarId_getType(x_1, x_3, x_4, x_5, x_6, x_7); +if (lean_obj_tag(x_8) == 0) +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; x_9 = lean_ctor_get(x_8, 0); lean_inc(x_9); x_10 = lean_ctor_get(x_8, 1); lean_inc(x_10); lean_dec(x_8); -lean_inc(x_1); -x_11 = l_Lean_MVarId_getType(x_1, x_3, x_4, x_5, x_6, x_10); -if (lean_obj_tag(x_11) == 0) -{ -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_11 = l_Lean_instantiateMVars___at___private_Lean_Meta_Basic_0__Lean_Meta_mkLeveErrorMessageCore___spec__2(x_9, x_3, x_4, x_5, x_6, x_10); x_12 = lean_ctor_get(x_11, 0); lean_inc(x_12); x_13 = lean_ctor_get(x_11, 1); lean_inc(x_13); lean_dec(x_11); -x_14 = l_Lean_instantiateMVars___at___private_Lean_Meta_Basic_0__Lean_Meta_mkLeveErrorMessageCore___spec__2(x_12, x_3, x_4, x_5, x_6, x_13); -x_15 = lean_ctor_get(x_14, 0); -lean_inc(x_15); -x_16 = lean_ctor_get(x_14, 1); -lean_inc(x_16); -lean_dec(x_14); -x_17 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__1; -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -x_18 = l_Lean_Meta_splitTarget_x3f_go(x_1, x_2, x_15, x_17, x_3, x_4, x_5, x_6, x_16); -if (lean_obj_tag(x_18) == 0) +x_14 = l_Lean_Meta_splitTarget_x3f___lambda__1___closed__1; +x_15 = l_Lean_Meta_splitTarget_x3f_go(x_1, x_2, x_12, x_14, x_3, x_4, x_5, x_6, x_13); +return x_15; +} +else { -lean_object* x_19; -x_19 = lean_ctor_get(x_18, 0); -lean_inc(x_19); -if (lean_obj_tag(x_19) == 0) -{ -lean_object* x_20; lean_object* x_21; uint8_t x_22; -x_20 = lean_ctor_get(x_18, 1); -lean_inc(x_20); -lean_dec(x_18); -x_21 = l_Lean_Meta_SavedState_restore(x_9, x_3, x_4, x_5, x_6, x_20); +uint8_t x_16; lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); -lean_dec(x_9); -x_22 = !lean_is_exclusive(x_21); -if (x_22 == 0) -{ -lean_object* x_23; lean_object* x_24; -x_23 = lean_ctor_get(x_21, 0); -lean_dec(x_23); -x_24 = lean_box(0); -lean_ctor_set(x_21, 0, x_24); -return x_21; -} -else -{ -lean_object* x_25; lean_object* x_26; lean_object* x_27; -x_25 = lean_ctor_get(x_21, 1); -lean_inc(x_25); -lean_dec(x_21); -x_26 = lean_box(0); -x_27 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_27, 0, x_26); -lean_ctor_set(x_27, 1, x_25); -return x_27; -} -} -else -{ -uint8_t x_28; -lean_dec(x_9); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -x_28 = !lean_is_exclusive(x_18); -if (x_28 == 0) -{ -lean_object* x_29; uint8_t x_30; -x_29 = lean_ctor_get(x_18, 0); -lean_dec(x_29); -x_30 = !lean_is_exclusive(x_19); -if (x_30 == 0) -{ -return x_18; -} -else -{ -lean_object* x_31; lean_object* x_32; -x_31 = lean_ctor_get(x_19, 0); -lean_inc(x_31); -lean_dec(x_19); -x_32 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_32, 0, x_31); -lean_ctor_set(x_18, 0, x_32); -return x_18; -} -} -else -{ -lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; -x_33 = lean_ctor_get(x_18, 1); -lean_inc(x_33); -lean_dec(x_18); -x_34 = lean_ctor_get(x_19, 0); -lean_inc(x_34); -if (lean_is_exclusive(x_19)) { - lean_ctor_release(x_19, 0); - x_35 = x_19; -} else { - lean_dec_ref(x_19); - x_35 = lean_box(0); -} -if (lean_is_scalar(x_35)) { - x_36 = lean_alloc_ctor(1, 1, 0); -} else { - x_36 = x_35; -} -lean_ctor_set(x_36, 0, x_34); -x_37 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_37, 0, x_36); -lean_ctor_set(x_37, 1, x_33); -return x_37; -} -} -} -else -{ -lean_object* x_38; lean_object* x_39; lean_object* x_40; uint8_t x_41; -x_38 = lean_ctor_get(x_18, 0); -lean_inc(x_38); -x_39 = lean_ctor_get(x_18, 1); -lean_inc(x_39); -lean_dec(x_18); -x_40 = l_Lean_Meta_SavedState_restore(x_9, x_3, x_4, x_5, x_6, x_39); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_9); -x_41 = !lean_is_exclusive(x_40); -if (x_41 == 0) -{ -lean_object* x_42; -x_42 = lean_ctor_get(x_40, 0); -lean_dec(x_42); -lean_ctor_set_tag(x_40, 1); -lean_ctor_set(x_40, 0, x_38); -return x_40; -} -else -{ -lean_object* x_43; lean_object* x_44; -x_43 = lean_ctor_get(x_40, 1); -lean_inc(x_43); -lean_dec(x_40); -x_44 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_44, 0, x_38); -lean_ctor_set(x_44, 1, x_43); -return x_44; -} -} -} -else -{ -lean_object* x_45; lean_object* x_46; lean_object* x_47; uint8_t x_48; lean_dec(x_1); -x_45 = lean_ctor_get(x_11, 0); -lean_inc(x_45); -x_46 = lean_ctor_get(x_11, 1); -lean_inc(x_46); -lean_dec(x_11); -x_47 = l_Lean_Meta_SavedState_restore(x_9, x_3, x_4, x_5, x_6, x_46); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_9); -x_48 = !lean_is_exclusive(x_47); -if (x_48 == 0) +x_16 = !lean_is_exclusive(x_8); +if (x_16 == 0) { -lean_object* x_49; -x_49 = lean_ctor_get(x_47, 0); -lean_dec(x_49); -lean_ctor_set_tag(x_47, 1); -lean_ctor_set(x_47, 0, x_45); -return x_47; +return x_8; } else { -lean_object* x_50; lean_object* x_51; -x_50 = lean_ctor_get(x_47, 1); -lean_inc(x_50); -lean_dec(x_47); -x_51 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_51, 0, x_45); -lean_ctor_set(x_51, 1, x_50); -return x_51; +lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_17 = lean_ctor_get(x_8, 0); +x_18 = lean_ctor_get(x_8, 1); +lean_inc(x_18); +lean_inc(x_17); +lean_dec(x_8); +x_19 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_19, 0, x_17); +lean_ctor_set(x_19, 1, x_18); +return x_19; } } } @@ -10762,18 +10608,22 @@ return x_51; LEAN_EXPORT lean_object* l_Lean_Meta_splitTarget_x3f(lean_object* x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { -lean_object* x_8; -x_8 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -return x_8; +lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_8 = lean_box(x_2); +x_9 = lean_alloc_closure((void*)(l_Lean_Meta_splitTarget_x3f___lambda__1___boxed), 7, 2); +lean_closure_set(x_9, 0, x_1); +lean_closure_set(x_9, 1, x_8); +x_10 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1(x_9, x_3, x_4, x_5, x_6, x_7); +return x_10; } } -LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +LEAN_EXPORT lean_object* l_Lean_Meta_splitTarget_x3f___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { uint8_t x_8; lean_object* x_9; x_8 = lean_unbox(x_2); lean_dec(x_2); -x_9 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2(x_1, x_8, x_3, x_4, x_5, x_6, x_7); +x_9 = l_Lean_Meta_splitTarget_x3f___lambda__1(x_1, x_8, x_3, x_4, x_5, x_6, x_7); return x_9; } } @@ -10992,7 +10842,7 @@ lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; lean_obje x_18 = lean_ctor_get(x_16, 0); x_19 = lean_ctor_get(x_16, 1); x_20 = 1; -x_21 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__1; +x_21 = l_Lean_Meta_splitTarget_x3f___lambda__1___closed__1; x_22 = l_Lean_Meta_Split_findSplit_x3f_go(x_11, x_20, x_21, x_18); if (lean_obj_tag(x_22) == 0) { @@ -11875,7 +11725,7 @@ lean_inc(x_212); lean_inc(x_211); lean_dec(x_16); x_213 = 1; -x_214 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__1; +x_214 = l_Lean_Meta_splitTarget_x3f___lambda__1___closed__1; x_215 = l_Lean_Meta_Split_findSplit_x3f_go(x_11, x_213, x_214, x_211); if (lean_obj_tag(x_215) == 0) { @@ -12541,8 +12391,8 @@ l_Lean_Meta_splitTarget_x3f_go___closed__2 = _init_l_Lean_Meta_splitTarget_x3f_g lean_mark_persistent(l_Lean_Meta_splitTarget_x3f_go___closed__2); l_Lean_Meta_splitTarget_x3f_go___closed__3 = _init_l_Lean_Meta_splitTarget_x3f_go___closed__3(); lean_mark_persistent(l_Lean_Meta_splitTarget_x3f_go___closed__3); -l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__1 = _init_l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__1(); -lean_mark_persistent(l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__1); +l_Lean_Meta_splitTarget_x3f___lambda__1___closed__1 = _init_l_Lean_Meta_splitTarget_x3f___lambda__1___closed__1(); +lean_mark_persistent(l_Lean_Meta_splitTarget_x3f___lambda__1___closed__1); l_Lean_Meta_splitLocalDecl_x3f___lambda__1___closed__1 = _init_l_Lean_Meta_splitLocalDecl_x3f___lambda__1___closed__1(); lean_mark_persistent(l_Lean_Meta_splitLocalDecl_x3f___lambda__1___closed__1); res = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Split___hyg_7123_(lean_io_mk_world()); diff --git a/stage0/stdlib/Lean/Meta/Tactic/SplitIf.c b/stage0/stdlib/Lean/Meta/Tactic/SplitIf.c index 67b0d3468c..b2716acc10 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/SplitIf.c +++ b/stage0/stdlib/Lean/Meta/Tactic/SplitIf.c @@ -102,15 +102,13 @@ lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstan lean_object* l___private_Init_Util_0__mkPanicMessageWithDecl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_LocalDecl_toExpr(lean_object*); uint8_t l_Lean_Expr_isConstOf(lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfLocalDecl_x3f___spec__1___at_Lean_Meta_splitIfLocalDecl_x3f___spec__2___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_LazyInitExtension_get___at_Lean_Meta_SplitIf_getSimpContext___spec__1___closed__4; -LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_SplitIf___hyg_1871_(lean_object*); +LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_SplitIf___hyg_1881_(lean_object*); static lean_object* l_Lean_Meta_SplitIf_discharge_x3f___lambda__2___closed__7; static lean_object* l_Lean_Meta_SplitIf_initFn____x40_Lean_Meta_Tactic_SplitIf___hyg_5____closed__1; static lean_object* l_Lean_Meta_simpIfTarget___closed__5; LEAN_EXPORT lean_object* l_Lean_Meta_splitIfLocalDecl_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_LazyInitExtension_get___at_Lean_Meta_SplitIf_getSimpContext___spec__1___closed__2; -LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfLocalDecl_x3f___spec__1___at_Lean_Meta_splitIfLocalDecl_x3f___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_whnf(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_simpIfTarget___closed__3; static lean_object* l_Lean_Meta_SplitIf_discharge_x3f___closed__12; @@ -143,11 +141,12 @@ static lean_object* l_Lean_Meta_SplitIf_discharge_x3f___closed__10; static lean_object* l_Lean_LazyInitExtension_get___at_Lean_Meta_SplitIf_getSimpContext___spec__1___closed__9; lean_object* l_Lean_Meta_simpLocalDecl(lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_simpIfTarget(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfTarget_x3f___spec__1___at_Lean_Meta_splitIfTarget_x3f___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_Meta_splitIfTarget_x3f___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_simpIfTarget___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Array_findSomeRevM_x3f_find___at_Lean_Meta_SplitIf_discharge_x3f___spec__3___closed__5; lean_object* lean_st_ref_set(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_SplitIf_discharge_x3f___closed__3; +LEAN_EXPORT lean_object* l_Lean_Meta_splitIfLocalDecl_x3f___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_infer_type(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_simpIfLocalDecl___closed__2; lean_object* l_Lean_instantiateMVars___at___private_Lean_Meta_Basic_0__Lean_Meta_mkLeveErrorMessageCore___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -4225,971 +4224,1137 @@ return x_36; } } } -LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfTarget_x3f___spec__1___at_Lean_Meta_splitIfTarget_x3f___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +LEAN_EXPORT lean_object* l_Lean_Meta_splitIfTarget_x3f___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_27; lean_object* x_28; lean_object* x_35; -x_8 = l_Lean_Meta_saveState___rarg(x_4, x_5, x_6, x_7); +lean_object* x_8; +lean_inc(x_1); +x_8 = l_Lean_MVarId_getType(x_1, x_3, x_4, x_5, x_6, x_7); +if (lean_obj_tag(x_8) == 0) +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; x_9 = lean_ctor_get(x_8, 0); lean_inc(x_9); x_10 = lean_ctor_get(x_8, 1); lean_inc(x_10); -if (lean_is_exclusive(x_8)) { - lean_ctor_release(x_8, 0); - lean_ctor_release(x_8, 1); - x_11 = x_8; -} else { - lean_dec_ref(x_8); - x_11 = lean_box(0); -} -lean_inc(x_1); -x_35 = l_Lean_MVarId_getType(x_1, x_3, x_4, x_5, x_6, x_10); -if (lean_obj_tag(x_35) == 0) -{ -lean_object* x_36; lean_object* x_37; lean_object* x_38; -x_36 = lean_ctor_get(x_35, 0); -lean_inc(x_36); -x_37 = lean_ctor_get(x_35, 1); -lean_inc(x_37); -lean_dec(x_35); +lean_dec(x_8); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); -x_38 = l_Lean_Meta_SplitIf_splitIfAt_x3f(x_1, x_36, x_2, x_3, x_4, x_5, x_6, x_37); -if (lean_obj_tag(x_38) == 0) +x_11 = l_Lean_Meta_SplitIf_splitIfAt_x3f(x_1, x_9, x_2, x_3, x_4, x_5, x_6, x_10); +if (lean_obj_tag(x_11) == 0) { -lean_object* x_39; -x_39 = lean_ctor_get(x_38, 0); -lean_inc(x_39); -if (lean_obj_tag(x_39) == 0) +lean_object* x_12; +x_12 = lean_ctor_get(x_11, 0); +lean_inc(x_12); +if (lean_obj_tag(x_12) == 0) { -lean_object* x_40; lean_object* x_41; -x_40 = lean_ctor_get(x_38, 1); -lean_inc(x_40); -lean_dec(x_38); -x_41 = lean_box(0); -x_12 = x_41; -x_13 = x_40; -goto block_26; +uint8_t x_13; +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_13 = !lean_is_exclusive(x_11); +if (x_13 == 0) +{ +lean_object* x_14; lean_object* x_15; +x_14 = lean_ctor_get(x_11, 0); +lean_dec(x_14); +x_15 = lean_box(0); +lean_ctor_set(x_11, 0, x_15); +return x_11; } else { -uint8_t x_42; -x_42 = !lean_is_exclusive(x_39); -if (x_42 == 0) +lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_16 = lean_ctor_get(x_11, 1); +lean_inc(x_16); +lean_dec(x_11); +x_17 = lean_box(0); +x_18 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_18, 0, x_17); +lean_ctor_set(x_18, 1, x_16); +return x_18; +} +} +else { -lean_object* x_43; lean_object* x_44; lean_object* x_45; uint8_t x_46; -x_43 = lean_ctor_get(x_39, 0); -x_44 = lean_ctor_get(x_43, 0); -lean_inc(x_44); -x_45 = lean_ctor_get(x_38, 1); -lean_inc(x_45); +uint8_t x_19; +x_19 = !lean_is_exclusive(x_12); +if (x_19 == 0) +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; uint8_t x_23; +x_20 = lean_ctor_get(x_12, 0); +x_21 = lean_ctor_get(x_20, 0); +lean_inc(x_21); +x_22 = lean_ctor_get(x_11, 1); +lean_inc(x_22); +lean_dec(x_11); +x_23 = !lean_is_exclusive(x_20); +if (x_23 == 0) +{ +lean_object* x_24; lean_object* x_25; uint8_t x_26; +x_24 = lean_ctor_get(x_20, 1); +x_25 = lean_ctor_get(x_20, 0); +lean_dec(x_25); +x_26 = !lean_is_exclusive(x_21); +if (x_26 == 0) +{ +lean_object* x_27; lean_object* x_28; uint8_t x_29; lean_object* x_30; +x_27 = lean_ctor_get(x_21, 0); +x_28 = lean_ctor_get(x_21, 1); +x_29 = 0; +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_27); +x_30 = l_Lean_Meta_simpIfTarget(x_27, x_29, x_3, x_4, x_5, x_6, x_22); +if (lean_obj_tag(x_30) == 0) +{ +lean_object* x_31; lean_object* x_32; uint8_t x_33; +x_31 = lean_ctor_get(x_30, 0); +lean_inc(x_31); +x_32 = lean_ctor_get(x_30, 1); +lean_inc(x_32); +lean_dec(x_30); +x_33 = !lean_is_exclusive(x_24); +if (x_33 == 0) +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; +x_34 = lean_ctor_get(x_24, 0); +x_35 = lean_ctor_get(x_24, 1); +lean_inc(x_34); +x_36 = l_Lean_Meta_simpIfTarget(x_34, x_29, x_3, x_4, x_5, x_6, x_32); +if (lean_obj_tag(x_36) == 0) +{ +uint8_t x_37; +x_37 = !lean_is_exclusive(x_36); +if (x_37 == 0) +{ +lean_object* x_38; uint8_t x_39; +x_38 = lean_ctor_get(x_36, 0); +x_39 = lean_name_eq(x_27, x_31); +lean_dec(x_27); +if (x_39 == 0) +{ +lean_dec(x_34); +lean_ctor_set(x_24, 1, x_28); +lean_ctor_set(x_24, 0, x_31); +lean_ctor_set(x_21, 1, x_35); +lean_ctor_set(x_21, 0, x_38); +lean_ctor_set(x_20, 1, x_21); +lean_ctor_set(x_20, 0, x_24); +lean_ctor_set(x_36, 0, x_12); +return x_36; +} +else +{ +uint8_t x_40; +x_40 = lean_name_eq(x_34, x_38); +lean_dec(x_34); +if (x_40 == 0) +{ +lean_ctor_set(x_24, 1, x_28); +lean_ctor_set(x_24, 0, x_31); +lean_ctor_set(x_21, 1, x_35); +lean_ctor_set(x_21, 0, x_38); +lean_ctor_set(x_20, 1, x_21); +lean_ctor_set(x_20, 0, x_24); +lean_ctor_set(x_36, 0, x_12); +return x_36; +} +else +{ +lean_object* x_41; lean_dec(x_38); -x_46 = !lean_is_exclusive(x_43); +lean_free_object(x_24); +lean_dec(x_35); +lean_dec(x_31); +lean_free_object(x_21); +lean_dec(x_28); +lean_free_object(x_20); +lean_free_object(x_12); +x_41 = lean_box(0); +lean_ctor_set(x_36, 0, x_41); +return x_36; +} +} +} +else +{ +lean_object* x_42; lean_object* x_43; uint8_t x_44; +x_42 = lean_ctor_get(x_36, 0); +x_43 = lean_ctor_get(x_36, 1); +lean_inc(x_43); +lean_inc(x_42); +lean_dec(x_36); +x_44 = lean_name_eq(x_27, x_31); +lean_dec(x_27); +if (x_44 == 0) +{ +lean_object* x_45; +lean_dec(x_34); +lean_ctor_set(x_24, 1, x_28); +lean_ctor_set(x_24, 0, x_31); +lean_ctor_set(x_21, 1, x_35); +lean_ctor_set(x_21, 0, x_42); +lean_ctor_set(x_20, 1, x_21); +lean_ctor_set(x_20, 0, x_24); +x_45 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_45, 0, x_12); +lean_ctor_set(x_45, 1, x_43); +return x_45; +} +else +{ +uint8_t x_46; +x_46 = lean_name_eq(x_34, x_42); +lean_dec(x_34); if (x_46 == 0) { -lean_object* x_47; lean_object* x_48; uint8_t x_49; -x_47 = lean_ctor_get(x_43, 1); -x_48 = lean_ctor_get(x_43, 0); -lean_dec(x_48); -x_49 = !lean_is_exclusive(x_44); -if (x_49 == 0) +lean_object* x_47; +lean_ctor_set(x_24, 1, x_28); +lean_ctor_set(x_24, 0, x_31); +lean_ctor_set(x_21, 1, x_35); +lean_ctor_set(x_21, 0, x_42); +lean_ctor_set(x_20, 1, x_21); +lean_ctor_set(x_20, 0, x_24); +x_47 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_47, 0, x_12); +lean_ctor_set(x_47, 1, x_43); +return x_47; +} +else { -lean_object* x_50; lean_object* x_51; uint8_t x_52; lean_object* x_53; -x_50 = lean_ctor_get(x_44, 0); -x_51 = lean_ctor_get(x_44, 1); -x_52 = 0; -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_50); -x_53 = l_Lean_Meta_simpIfTarget(x_50, x_52, x_3, x_4, x_5, x_6, x_45); -if (lean_obj_tag(x_53) == 0) +lean_object* x_48; lean_object* x_49; +lean_dec(x_42); +lean_free_object(x_24); +lean_dec(x_35); +lean_dec(x_31); +lean_free_object(x_21); +lean_dec(x_28); +lean_free_object(x_20); +lean_free_object(x_12); +x_48 = lean_box(0); +x_49 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_49, 0, x_48); +lean_ctor_set(x_49, 1, x_43); +return x_49; +} +} +} +} +else { -lean_object* x_54; lean_object* x_55; uint8_t x_56; -x_54 = lean_ctor_get(x_53, 0); -lean_inc(x_54); -x_55 = lean_ctor_get(x_53, 1); +uint8_t x_50; +lean_free_object(x_24); +lean_dec(x_35); +lean_dec(x_34); +lean_dec(x_31); +lean_free_object(x_21); +lean_dec(x_28); +lean_dec(x_27); +lean_free_object(x_20); +lean_free_object(x_12); +x_50 = !lean_is_exclusive(x_36); +if (x_50 == 0) +{ +return x_36; +} +else +{ +lean_object* x_51; lean_object* x_52; lean_object* x_53; +x_51 = lean_ctor_get(x_36, 0); +x_52 = lean_ctor_get(x_36, 1); +lean_inc(x_52); +lean_inc(x_51); +lean_dec(x_36); +x_53 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_53, 0, x_51); +lean_ctor_set(x_53, 1, x_52); +return x_53; +} +} +} +else +{ +lean_object* x_54; lean_object* x_55; lean_object* x_56; +x_54 = lean_ctor_get(x_24, 0); +x_55 = lean_ctor_get(x_24, 1); lean_inc(x_55); -lean_dec(x_53); -x_56 = !lean_is_exclusive(x_47); -if (x_56 == 0) +lean_inc(x_54); +lean_dec(x_24); +lean_inc(x_54); +x_56 = l_Lean_Meta_simpIfTarget(x_54, x_29, x_3, x_4, x_5, x_6, x_32); +if (lean_obj_tag(x_56) == 0) { -lean_object* x_57; lean_object* x_58; lean_object* x_59; -x_57 = lean_ctor_get(x_47, 0); -x_58 = lean_ctor_get(x_47, 1); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); +lean_object* x_57; lean_object* x_58; lean_object* x_59; uint8_t x_60; +x_57 = lean_ctor_get(x_56, 0); lean_inc(x_57); -x_59 = l_Lean_Meta_simpIfTarget(x_57, x_52, x_3, x_4, x_5, x_6, x_55); -if (lean_obj_tag(x_59) == 0) +x_58 = lean_ctor_get(x_56, 1); +lean_inc(x_58); +if (lean_is_exclusive(x_56)) { + lean_ctor_release(x_56, 0); + lean_ctor_release(x_56, 1); + x_59 = x_56; +} else { + lean_dec_ref(x_56); + x_59 = lean_box(0); +} +x_60 = lean_name_eq(x_27, x_31); +lean_dec(x_27); +if (x_60 == 0) { -lean_object* x_60; lean_object* x_61; uint8_t x_62; -x_60 = lean_ctor_get(x_59, 0); -lean_inc(x_60); -x_61 = lean_ctor_get(x_59, 1); -lean_inc(x_61); -lean_dec(x_59); -x_62 = lean_name_eq(x_50, x_54); -lean_dec(x_50); -if (x_62 == 0) -{ -lean_dec(x_57); -lean_ctor_set(x_47, 1, x_51); -lean_ctor_set(x_47, 0, x_54); -lean_ctor_set(x_44, 1, x_58); -lean_ctor_set(x_44, 0, x_60); -lean_ctor_set(x_43, 1, x_44); -lean_ctor_set(x_43, 0, x_47); -x_12 = x_39; -x_13 = x_61; -goto block_26; +lean_object* x_61; lean_object* x_62; +lean_dec(x_54); +x_61 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_61, 0, x_31); +lean_ctor_set(x_61, 1, x_28); +lean_ctor_set(x_21, 1, x_55); +lean_ctor_set(x_21, 0, x_57); +lean_ctor_set(x_20, 1, x_21); +lean_ctor_set(x_20, 0, x_61); +if (lean_is_scalar(x_59)) { + x_62 = lean_alloc_ctor(0, 2, 0); +} else { + x_62 = x_59; +} +lean_ctor_set(x_62, 0, x_12); +lean_ctor_set(x_62, 1, x_58); +return x_62; } else { uint8_t x_63; -x_63 = lean_name_eq(x_57, x_60); -lean_dec(x_57); +x_63 = lean_name_eq(x_54, x_57); +lean_dec(x_54); if (x_63 == 0) { -lean_ctor_set(x_47, 1, x_51); -lean_ctor_set(x_47, 0, x_54); -lean_ctor_set(x_44, 1, x_58); -lean_ctor_set(x_44, 0, x_60); -lean_ctor_set(x_43, 1, x_44); -lean_ctor_set(x_43, 0, x_47); -x_12 = x_39; -x_13 = x_61; -goto block_26; +lean_object* x_64; lean_object* x_65; +x_64 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_64, 0, x_31); +lean_ctor_set(x_64, 1, x_28); +lean_ctor_set(x_21, 1, x_55); +lean_ctor_set(x_21, 0, x_57); +lean_ctor_set(x_20, 1, x_21); +lean_ctor_set(x_20, 0, x_64); +if (lean_is_scalar(x_59)) { + x_65 = lean_alloc_ctor(0, 2, 0); +} else { + x_65 = x_59; +} +lean_ctor_set(x_65, 0, x_12); +lean_ctor_set(x_65, 1, x_58); +return x_65; } else { -lean_object* x_64; -lean_dec(x_60); -lean_free_object(x_47); -lean_dec(x_58); -lean_dec(x_54); -lean_free_object(x_44); -lean_dec(x_51); -lean_free_object(x_43); -lean_free_object(x_39); -x_64 = lean_box(0); -x_12 = x_64; -x_13 = x_61; -goto block_26; -} -} -} -else -{ -lean_object* x_65; lean_object* x_66; -lean_free_object(x_47); -lean_dec(x_58); +lean_object* x_66; lean_object* x_67; lean_dec(x_57); -lean_dec(x_54); -lean_free_object(x_44); -lean_dec(x_51); -lean_dec(x_50); -lean_free_object(x_43); -lean_free_object(x_39); -lean_dec(x_11); -x_65 = lean_ctor_get(x_59, 0); -lean_inc(x_65); -x_66 = lean_ctor_get(x_59, 1); -lean_inc(x_66); -lean_dec(x_59); -x_27 = x_65; -x_28 = x_66; -goto block_34; +lean_dec(x_55); +lean_dec(x_31); +lean_free_object(x_21); +lean_dec(x_28); +lean_free_object(x_20); +lean_free_object(x_12); +x_66 = lean_box(0); +if (lean_is_scalar(x_59)) { + x_67 = lean_alloc_ctor(0, 2, 0); +} else { + x_67 = x_59; +} +lean_ctor_set(x_67, 0, x_66); +lean_ctor_set(x_67, 1, x_58); +return x_67; +} } } else { -lean_object* x_67; lean_object* x_68; lean_object* x_69; -x_67 = lean_ctor_get(x_47, 0); -x_68 = lean_ctor_get(x_47, 1); +lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; +lean_dec(x_55); +lean_dec(x_54); +lean_dec(x_31); +lean_free_object(x_21); +lean_dec(x_28); +lean_dec(x_27); +lean_free_object(x_20); +lean_free_object(x_12); +x_68 = lean_ctor_get(x_56, 0); lean_inc(x_68); -lean_inc(x_67); -lean_dec(x_47); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_67); -x_69 = l_Lean_Meta_simpIfTarget(x_67, x_52, x_3, x_4, x_5, x_6, x_55); -if (lean_obj_tag(x_69) == 0) +x_69 = lean_ctor_get(x_56, 1); +lean_inc(x_69); +if (lean_is_exclusive(x_56)) { + lean_ctor_release(x_56, 0); + lean_ctor_release(x_56, 1); + x_70 = x_56; +} else { + lean_dec_ref(x_56); + x_70 = lean_box(0); +} +if (lean_is_scalar(x_70)) { + x_71 = lean_alloc_ctor(1, 2, 0); +} else { + x_71 = x_70; +} +lean_ctor_set(x_71, 0, x_68); +lean_ctor_set(x_71, 1, x_69); +return x_71; +} +} +} +else { -lean_object* x_70; lean_object* x_71; uint8_t x_72; -x_70 = lean_ctor_get(x_69, 0); -lean_inc(x_70); -x_71 = lean_ctor_get(x_69, 1); -lean_inc(x_71); -lean_dec(x_69); -x_72 = lean_name_eq(x_50, x_54); -lean_dec(x_50); +uint8_t x_72; +lean_free_object(x_21); +lean_dec(x_28); +lean_dec(x_27); +lean_free_object(x_20); +lean_dec(x_24); +lean_free_object(x_12); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_72 = !lean_is_exclusive(x_30); if (x_72 == 0) { -lean_object* x_73; -lean_dec(x_67); -x_73 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_73, 0, x_54); -lean_ctor_set(x_73, 1, x_51); -lean_ctor_set(x_44, 1, x_68); -lean_ctor_set(x_44, 0, x_70); -lean_ctor_set(x_43, 1, x_44); -lean_ctor_set(x_43, 0, x_73); -x_12 = x_39; -x_13 = x_71; -goto block_26; +return x_30; } else { -uint8_t x_74; -x_74 = lean_name_eq(x_67, x_70); -lean_dec(x_67); -if (x_74 == 0) -{ -lean_object* x_75; -x_75 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_75, 0, x_54); -lean_ctor_set(x_75, 1, x_51); -lean_ctor_set(x_44, 1, x_68); -lean_ctor_set(x_44, 0, x_70); -lean_ctor_set(x_43, 1, x_44); -lean_ctor_set(x_43, 0, x_75); -x_12 = x_39; -x_13 = x_71; -goto block_26; -} -else -{ -lean_object* x_76; -lean_dec(x_70); -lean_dec(x_68); -lean_dec(x_54); -lean_free_object(x_44); -lean_dec(x_51); -lean_free_object(x_43); -lean_free_object(x_39); -x_76 = lean_box(0); -x_12 = x_76; -x_13 = x_71; -goto block_26; +lean_object* x_73; lean_object* x_74; lean_object* x_75; +x_73 = lean_ctor_get(x_30, 0); +x_74 = lean_ctor_get(x_30, 1); +lean_inc(x_74); +lean_inc(x_73); +lean_dec(x_30); +x_75 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_75, 0, x_73); +lean_ctor_set(x_75, 1, x_74); +return x_75; } } } else { -lean_object* x_77; lean_object* x_78; -lean_dec(x_68); -lean_dec(x_67); -lean_dec(x_54); -lean_free_object(x_44); -lean_dec(x_51); -lean_dec(x_50); -lean_free_object(x_43); -lean_free_object(x_39); -lean_dec(x_11); -x_77 = lean_ctor_get(x_69, 0); +lean_object* x_76; lean_object* x_77; uint8_t x_78; lean_object* x_79; +x_76 = lean_ctor_get(x_21, 0); +x_77 = lean_ctor_get(x_21, 1); lean_inc(x_77); -x_78 = lean_ctor_get(x_69, 1); -lean_inc(x_78); -lean_dec(x_69); -x_27 = x_77; -x_28 = x_78; -goto block_34; -} -} -} -else +lean_inc(x_76); +lean_dec(x_21); +x_78 = 0; +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_76); +x_79 = l_Lean_Meta_simpIfTarget(x_76, x_78, x_3, x_4, x_5, x_6, x_22); +if (lean_obj_tag(x_79) == 0) { -lean_object* x_79; lean_object* x_80; -lean_free_object(x_44); -lean_dec(x_51); -lean_dec(x_50); -lean_free_object(x_43); -lean_dec(x_47); -lean_free_object(x_39); -lean_dec(x_11); -x_79 = lean_ctor_get(x_53, 0); -lean_inc(x_79); -x_80 = lean_ctor_get(x_53, 1); +lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; +x_80 = lean_ctor_get(x_79, 0); lean_inc(x_80); -lean_dec(x_53); -x_27 = x_79; -x_28 = x_80; -goto block_34; +x_81 = lean_ctor_get(x_79, 1); +lean_inc(x_81); +lean_dec(x_79); +x_82 = lean_ctor_get(x_24, 0); +lean_inc(x_82); +x_83 = lean_ctor_get(x_24, 1); +lean_inc(x_83); +if (lean_is_exclusive(x_24)) { + lean_ctor_release(x_24, 0); + lean_ctor_release(x_24, 1); + x_84 = x_24; +} else { + lean_dec_ref(x_24); + x_84 = lean_box(0); } +lean_inc(x_82); +x_85 = l_Lean_Meta_simpIfTarget(x_82, x_78, x_3, x_4, x_5, x_6, x_81); +if (lean_obj_tag(x_85) == 0) +{ +lean_object* x_86; lean_object* x_87; lean_object* x_88; uint8_t x_89; +x_86 = lean_ctor_get(x_85, 0); +lean_inc(x_86); +x_87 = lean_ctor_get(x_85, 1); +lean_inc(x_87); +if (lean_is_exclusive(x_85)) { + lean_ctor_release(x_85, 0); + lean_ctor_release(x_85, 1); + x_88 = x_85; +} else { + lean_dec_ref(x_85); + x_88 = lean_box(0); +} +x_89 = lean_name_eq(x_76, x_80); +lean_dec(x_76); +if (x_89 == 0) +{ +lean_object* x_90; lean_object* x_91; lean_object* x_92; +lean_dec(x_82); +if (lean_is_scalar(x_84)) { + x_90 = lean_alloc_ctor(0, 2, 0); +} else { + x_90 = x_84; +} +lean_ctor_set(x_90, 0, x_80); +lean_ctor_set(x_90, 1, x_77); +x_91 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_91, 0, x_86); +lean_ctor_set(x_91, 1, x_83); +lean_ctor_set(x_20, 1, x_91); +lean_ctor_set(x_20, 0, x_90); +if (lean_is_scalar(x_88)) { + x_92 = lean_alloc_ctor(0, 2, 0); +} else { + x_92 = x_88; +} +lean_ctor_set(x_92, 0, x_12); +lean_ctor_set(x_92, 1, x_87); +return x_92; } else { -lean_object* x_81; lean_object* x_82; uint8_t x_83; lean_object* x_84; -x_81 = lean_ctor_get(x_44, 0); -x_82 = lean_ctor_get(x_44, 1); -lean_inc(x_82); -lean_inc(x_81); -lean_dec(x_44); -x_83 = 0; -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_81); -x_84 = l_Lean_Meta_simpIfTarget(x_81, x_83, x_3, x_4, x_5, x_6, x_45); -if (lean_obj_tag(x_84) == 0) -{ -lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; -x_85 = lean_ctor_get(x_84, 0); -lean_inc(x_85); -x_86 = lean_ctor_get(x_84, 1); -lean_inc(x_86); -lean_dec(x_84); -x_87 = lean_ctor_get(x_47, 0); -lean_inc(x_87); -x_88 = lean_ctor_get(x_47, 1); -lean_inc(x_88); -if (lean_is_exclusive(x_47)) { - lean_ctor_release(x_47, 0); - lean_ctor_release(x_47, 1); - x_89 = x_47; -} else { - lean_dec_ref(x_47); - x_89 = lean_box(0); -} -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_87); -x_90 = l_Lean_Meta_simpIfTarget(x_87, x_83, x_3, x_4, x_5, x_6, x_86); -if (lean_obj_tag(x_90) == 0) -{ -lean_object* x_91; lean_object* x_92; uint8_t x_93; -x_91 = lean_ctor_get(x_90, 0); -lean_inc(x_91); -x_92 = lean_ctor_get(x_90, 1); -lean_inc(x_92); -lean_dec(x_90); -x_93 = lean_name_eq(x_81, x_85); -lean_dec(x_81); +uint8_t x_93; +x_93 = lean_name_eq(x_82, x_86); +lean_dec(x_82); if (x_93 == 0) { -lean_object* x_94; lean_object* x_95; -lean_dec(x_87); -if (lean_is_scalar(x_89)) { +lean_object* x_94; lean_object* x_95; lean_object* x_96; +if (lean_is_scalar(x_84)) { x_94 = lean_alloc_ctor(0, 2, 0); } else { - x_94 = x_89; + x_94 = x_84; } -lean_ctor_set(x_94, 0, x_85); -lean_ctor_set(x_94, 1, x_82); +lean_ctor_set(x_94, 0, x_80); +lean_ctor_set(x_94, 1, x_77); x_95 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_95, 0, x_91); -lean_ctor_set(x_95, 1, x_88); -lean_ctor_set(x_43, 1, x_95); -lean_ctor_set(x_43, 0, x_94); -x_12 = x_39; -x_13 = x_92; -goto block_26; +lean_ctor_set(x_95, 0, x_86); +lean_ctor_set(x_95, 1, x_83); +lean_ctor_set(x_20, 1, x_95); +lean_ctor_set(x_20, 0, x_94); +if (lean_is_scalar(x_88)) { + x_96 = lean_alloc_ctor(0, 2, 0); +} else { + x_96 = x_88; +} +lean_ctor_set(x_96, 0, x_12); +lean_ctor_set(x_96, 1, x_87); +return x_96; } else { -uint8_t x_96; -x_96 = lean_name_eq(x_87, x_91); -lean_dec(x_87); -if (x_96 == 0) -{ lean_object* x_97; lean_object* x_98; -if (lean_is_scalar(x_89)) { - x_97 = lean_alloc_ctor(0, 2, 0); -} else { - x_97 = x_89; -} -lean_ctor_set(x_97, 0, x_85); -lean_ctor_set(x_97, 1, x_82); -x_98 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_98, 0, x_91); -lean_ctor_set(x_98, 1, x_88); -lean_ctor_set(x_43, 1, x_98); -lean_ctor_set(x_43, 0, x_97); -x_12 = x_39; -x_13 = x_92; -goto block_26; -} -else -{ -lean_object* x_99; -lean_dec(x_91); -lean_dec(x_89); -lean_dec(x_88); -lean_dec(x_85); -lean_dec(x_82); -lean_free_object(x_43); -lean_free_object(x_39); -x_99 = lean_box(0); -x_12 = x_99; -x_13 = x_92; -goto block_26; -} -} -} -else -{ -lean_object* x_100; lean_object* x_101; -lean_dec(x_89); -lean_dec(x_88); -lean_dec(x_87); -lean_dec(x_85); -lean_dec(x_82); -lean_dec(x_81); -lean_free_object(x_43); -lean_free_object(x_39); -lean_dec(x_11); -x_100 = lean_ctor_get(x_90, 0); -lean_inc(x_100); -x_101 = lean_ctor_get(x_90, 1); -lean_inc(x_101); -lean_dec(x_90); -x_27 = x_100; -x_28 = x_101; -goto block_34; -} -} -else -{ -lean_object* x_102; lean_object* x_103; -lean_dec(x_82); -lean_dec(x_81); -lean_free_object(x_43); -lean_dec(x_47); -lean_free_object(x_39); -lean_dec(x_11); -x_102 = lean_ctor_get(x_84, 0); -lean_inc(x_102); -x_103 = lean_ctor_get(x_84, 1); -lean_inc(x_103); +lean_dec(x_86); lean_dec(x_84); -x_27 = x_102; -x_28 = x_103; -goto block_34; +lean_dec(x_83); +lean_dec(x_80); +lean_dec(x_77); +lean_free_object(x_20); +lean_free_object(x_12); +x_97 = lean_box(0); +if (lean_is_scalar(x_88)) { + x_98 = lean_alloc_ctor(0, 2, 0); +} else { + x_98 = x_88; +} +lean_ctor_set(x_98, 0, x_97); +lean_ctor_set(x_98, 1, x_87); +return x_98; } } } else { -lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; uint8_t x_108; lean_object* x_109; -x_104 = lean_ctor_get(x_43, 1); +lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; +lean_dec(x_84); +lean_dec(x_83); +lean_dec(x_82); +lean_dec(x_80); +lean_dec(x_77); +lean_dec(x_76); +lean_free_object(x_20); +lean_free_object(x_12); +x_99 = lean_ctor_get(x_85, 0); +lean_inc(x_99); +x_100 = lean_ctor_get(x_85, 1); +lean_inc(x_100); +if (lean_is_exclusive(x_85)) { + lean_ctor_release(x_85, 0); + lean_ctor_release(x_85, 1); + x_101 = x_85; +} else { + lean_dec_ref(x_85); + x_101 = lean_box(0); +} +if (lean_is_scalar(x_101)) { + x_102 = lean_alloc_ctor(1, 2, 0); +} else { + x_102 = x_101; +} +lean_ctor_set(x_102, 0, x_99); +lean_ctor_set(x_102, 1, x_100); +return x_102; +} +} +else +{ +lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; +lean_dec(x_77); +lean_dec(x_76); +lean_free_object(x_20); +lean_dec(x_24); +lean_free_object(x_12); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_103 = lean_ctor_get(x_79, 0); +lean_inc(x_103); +x_104 = lean_ctor_get(x_79, 1); lean_inc(x_104); -lean_dec(x_43); -x_105 = lean_ctor_get(x_44, 0); -lean_inc(x_105); -x_106 = lean_ctor_get(x_44, 1); -lean_inc(x_106); -if (lean_is_exclusive(x_44)) { - lean_ctor_release(x_44, 0); - lean_ctor_release(x_44, 1); - x_107 = x_44; +if (lean_is_exclusive(x_79)) { + lean_ctor_release(x_79, 0); + lean_ctor_release(x_79, 1); + x_105 = x_79; } else { - lean_dec_ref(x_44); - x_107 = lean_box(0); + lean_dec_ref(x_79); + x_105 = lean_box(0); } -x_108 = 0; -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_105); -x_109 = l_Lean_Meta_simpIfTarget(x_105, x_108, x_3, x_4, x_5, x_6, x_45); -if (lean_obj_tag(x_109) == 0) -{ -lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; -x_110 = lean_ctor_get(x_109, 0); -lean_inc(x_110); -x_111 = lean_ctor_get(x_109, 1); -lean_inc(x_111); -lean_dec(x_109); -x_112 = lean_ctor_get(x_104, 0); -lean_inc(x_112); -x_113 = lean_ctor_get(x_104, 1); -lean_inc(x_113); -if (lean_is_exclusive(x_104)) { - lean_ctor_release(x_104, 0); - lean_ctor_release(x_104, 1); - x_114 = x_104; +if (lean_is_scalar(x_105)) { + x_106 = lean_alloc_ctor(1, 2, 0); } else { - lean_dec_ref(x_104); - x_114 = lean_box(0); + x_106 = x_105; } -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_112); -x_115 = l_Lean_Meta_simpIfTarget(x_112, x_108, x_3, x_4, x_5, x_6, x_111); -if (lean_obj_tag(x_115) == 0) -{ -lean_object* x_116; lean_object* x_117; uint8_t x_118; -x_116 = lean_ctor_get(x_115, 0); -lean_inc(x_116); -x_117 = lean_ctor_get(x_115, 1); -lean_inc(x_117); -lean_dec(x_115); -x_118 = lean_name_eq(x_105, x_110); -lean_dec(x_105); -if (x_118 == 0) -{ -lean_object* x_119; lean_object* x_120; lean_object* x_121; -lean_dec(x_112); -if (lean_is_scalar(x_114)) { - x_119 = lean_alloc_ctor(0, 2, 0); -} else { - x_119 = x_114; +lean_ctor_set(x_106, 0, x_103); +lean_ctor_set(x_106, 1, x_104); +return x_106; } -lean_ctor_set(x_119, 0, x_110); -lean_ctor_set(x_119, 1, x_106); -if (lean_is_scalar(x_107)) { - x_120 = lean_alloc_ctor(0, 2, 0); -} else { - x_120 = x_107; } -lean_ctor_set(x_120, 0, x_116); -lean_ctor_set(x_120, 1, x_113); -x_121 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_121, 0, x_119); -lean_ctor_set(x_121, 1, x_120); -lean_ctor_set(x_39, 0, x_121); -x_12 = x_39; -x_13 = x_117; -goto block_26; } else { -uint8_t x_122; -x_122 = lean_name_eq(x_112, x_116); +lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; uint8_t x_111; lean_object* x_112; +x_107 = lean_ctor_get(x_20, 1); +lean_inc(x_107); +lean_dec(x_20); +x_108 = lean_ctor_get(x_21, 0); +lean_inc(x_108); +x_109 = lean_ctor_get(x_21, 1); +lean_inc(x_109); +if (lean_is_exclusive(x_21)) { + lean_ctor_release(x_21, 0); + lean_ctor_release(x_21, 1); + x_110 = x_21; +} else { + lean_dec_ref(x_21); + x_110 = lean_box(0); +} +x_111 = 0; +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_108); +x_112 = l_Lean_Meta_simpIfTarget(x_108, x_111, x_3, x_4, x_5, x_6, x_22); +if (lean_obj_tag(x_112) == 0) +{ +lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; +x_113 = lean_ctor_get(x_112, 0); +lean_inc(x_113); +x_114 = lean_ctor_get(x_112, 1); +lean_inc(x_114); lean_dec(x_112); +x_115 = lean_ctor_get(x_107, 0); +lean_inc(x_115); +x_116 = lean_ctor_get(x_107, 1); +lean_inc(x_116); +if (lean_is_exclusive(x_107)) { + lean_ctor_release(x_107, 0); + lean_ctor_release(x_107, 1); + x_117 = x_107; +} else { + lean_dec_ref(x_107); + x_117 = lean_box(0); +} +lean_inc(x_115); +x_118 = l_Lean_Meta_simpIfTarget(x_115, x_111, x_3, x_4, x_5, x_6, x_114); +if (lean_obj_tag(x_118) == 0) +{ +lean_object* x_119; lean_object* x_120; lean_object* x_121; uint8_t x_122; +x_119 = lean_ctor_get(x_118, 0); +lean_inc(x_119); +x_120 = lean_ctor_get(x_118, 1); +lean_inc(x_120); +if (lean_is_exclusive(x_118)) { + lean_ctor_release(x_118, 0); + lean_ctor_release(x_118, 1); + x_121 = x_118; +} else { + lean_dec_ref(x_118); + x_121 = lean_box(0); +} +x_122 = lean_name_eq(x_108, x_113); +lean_dec(x_108); if (x_122 == 0) { -lean_object* x_123; lean_object* x_124; lean_object* x_125; -if (lean_is_scalar(x_114)) { +lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; +lean_dec(x_115); +if (lean_is_scalar(x_117)) { x_123 = lean_alloc_ctor(0, 2, 0); } else { - x_123 = x_114; + x_123 = x_117; } -lean_ctor_set(x_123, 0, x_110); -lean_ctor_set(x_123, 1, x_106); -if (lean_is_scalar(x_107)) { +lean_ctor_set(x_123, 0, x_113); +lean_ctor_set(x_123, 1, x_109); +if (lean_is_scalar(x_110)) { x_124 = lean_alloc_ctor(0, 2, 0); } else { - x_124 = x_107; + x_124 = x_110; } -lean_ctor_set(x_124, 0, x_116); -lean_ctor_set(x_124, 1, x_113); +lean_ctor_set(x_124, 0, x_119); +lean_ctor_set(x_124, 1, x_116); x_125 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_125, 0, x_123); lean_ctor_set(x_125, 1, x_124); -lean_ctor_set(x_39, 0, x_125); -x_12 = x_39; -x_13 = x_117; -goto block_26; +lean_ctor_set(x_12, 0, x_125); +if (lean_is_scalar(x_121)) { + x_126 = lean_alloc_ctor(0, 2, 0); +} else { + x_126 = x_121; +} +lean_ctor_set(x_126, 0, x_12); +lean_ctor_set(x_126, 1, x_120); +return x_126; } else { -lean_object* x_126; -lean_dec(x_116); -lean_dec(x_114); -lean_dec(x_113); -lean_dec(x_110); -lean_dec(x_107); -lean_dec(x_106); -lean_free_object(x_39); -x_126 = lean_box(0); -x_12 = x_126; -x_13 = x_117; -goto block_26; -} -} -} -else -{ -lean_object* x_127; lean_object* x_128; -lean_dec(x_114); -lean_dec(x_113); -lean_dec(x_112); -lean_dec(x_110); -lean_dec(x_107); -lean_dec(x_106); -lean_dec(x_105); -lean_free_object(x_39); -lean_dec(x_11); -x_127 = lean_ctor_get(x_115, 0); -lean_inc(x_127); -x_128 = lean_ctor_get(x_115, 1); -lean_inc(x_128); +uint8_t x_127; +x_127 = lean_name_eq(x_115, x_119); lean_dec(x_115); -x_27 = x_127; -x_28 = x_128; -goto block_34; +if (x_127 == 0) +{ +lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; +if (lean_is_scalar(x_117)) { + x_128 = lean_alloc_ctor(0, 2, 0); +} else { + x_128 = x_117; } +lean_ctor_set(x_128, 0, x_113); +lean_ctor_set(x_128, 1, x_109); +if (lean_is_scalar(x_110)) { + x_129 = lean_alloc_ctor(0, 2, 0); +} else { + x_129 = x_110; +} +lean_ctor_set(x_129, 0, x_119); +lean_ctor_set(x_129, 1, x_116); +x_130 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_130, 0, x_128); +lean_ctor_set(x_130, 1, x_129); +lean_ctor_set(x_12, 0, x_130); +if (lean_is_scalar(x_121)) { + x_131 = lean_alloc_ctor(0, 2, 0); +} else { + x_131 = x_121; +} +lean_ctor_set(x_131, 0, x_12); +lean_ctor_set(x_131, 1, x_120); +return x_131; } else { -lean_object* x_129; lean_object* x_130; -lean_dec(x_107); -lean_dec(x_106); -lean_dec(x_105); -lean_dec(x_104); -lean_free_object(x_39); -lean_dec(x_11); -x_129 = lean_ctor_get(x_109, 0); -lean_inc(x_129); -x_130 = lean_ctor_get(x_109, 1); -lean_inc(x_130); +lean_object* x_132; lean_object* x_133; +lean_dec(x_119); +lean_dec(x_117); +lean_dec(x_116); +lean_dec(x_113); +lean_dec(x_110); lean_dec(x_109); -x_27 = x_129; -x_28 = x_130; -goto block_34; +lean_free_object(x_12); +x_132 = lean_box(0); +if (lean_is_scalar(x_121)) { + x_133 = lean_alloc_ctor(0, 2, 0); +} else { + x_133 = x_121; +} +lean_ctor_set(x_133, 0, x_132); +lean_ctor_set(x_133, 1, x_120); +return x_133; } } } else { -lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; uint8_t x_139; lean_object* x_140; -x_131 = lean_ctor_get(x_39, 0); -lean_inc(x_131); -lean_dec(x_39); -x_132 = lean_ctor_get(x_131, 0); -lean_inc(x_132); -x_133 = lean_ctor_get(x_38, 1); -lean_inc(x_133); -lean_dec(x_38); -x_134 = lean_ctor_get(x_131, 1); +lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; +lean_dec(x_117); +lean_dec(x_116); +lean_dec(x_115); +lean_dec(x_113); +lean_dec(x_110); +lean_dec(x_109); +lean_dec(x_108); +lean_free_object(x_12); +x_134 = lean_ctor_get(x_118, 0); lean_inc(x_134); -if (lean_is_exclusive(x_131)) { - lean_ctor_release(x_131, 0); - lean_ctor_release(x_131, 1); - x_135 = x_131; +x_135 = lean_ctor_get(x_118, 1); +lean_inc(x_135); +if (lean_is_exclusive(x_118)) { + lean_ctor_release(x_118, 0); + lean_ctor_release(x_118, 1); + x_136 = x_118; } else { - lean_dec_ref(x_131); - x_135 = lean_box(0); + lean_dec_ref(x_118); + x_136 = lean_box(0); } -x_136 = lean_ctor_get(x_132, 0); -lean_inc(x_136); -x_137 = lean_ctor_get(x_132, 1); -lean_inc(x_137); -if (lean_is_exclusive(x_132)) { - lean_ctor_release(x_132, 0); - lean_ctor_release(x_132, 1); - x_138 = x_132; +if (lean_is_scalar(x_136)) { + x_137 = lean_alloc_ctor(1, 2, 0); } else { - lean_dec_ref(x_132); - x_138 = lean_box(0); + x_137 = x_136; } -x_139 = 0; -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_136); -x_140 = l_Lean_Meta_simpIfTarget(x_136, x_139, x_3, x_4, x_5, x_6, x_133); -if (lean_obj_tag(x_140) == 0) +lean_ctor_set(x_137, 0, x_134); +lean_ctor_set(x_137, 1, x_135); +return x_137; +} +} +else { -lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; -x_141 = lean_ctor_get(x_140, 0); -lean_inc(x_141); -x_142 = lean_ctor_get(x_140, 1); +lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; +lean_dec(x_110); +lean_dec(x_109); +lean_dec(x_108); +lean_dec(x_107); +lean_free_object(x_12); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_138 = lean_ctor_get(x_112, 0); +lean_inc(x_138); +x_139 = lean_ctor_get(x_112, 1); +lean_inc(x_139); +if (lean_is_exclusive(x_112)) { + lean_ctor_release(x_112, 0); + lean_ctor_release(x_112, 1); + x_140 = x_112; +} else { + lean_dec_ref(x_112); + x_140 = lean_box(0); +} +if (lean_is_scalar(x_140)) { + x_141 = lean_alloc_ctor(1, 2, 0); +} else { + x_141 = x_140; +} +lean_ctor_set(x_141, 0, x_138); +lean_ctor_set(x_141, 1, x_139); +return x_141; +} +} +} +else +{ +lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; uint8_t x_150; lean_object* x_151; +x_142 = lean_ctor_get(x_12, 0); lean_inc(x_142); -lean_dec(x_140); -x_143 = lean_ctor_get(x_134, 0); +lean_dec(x_12); +x_143 = lean_ctor_get(x_142, 0); lean_inc(x_143); -x_144 = lean_ctor_get(x_134, 1); +x_144 = lean_ctor_get(x_11, 1); lean_inc(x_144); -if (lean_is_exclusive(x_134)) { - lean_ctor_release(x_134, 0); - lean_ctor_release(x_134, 1); - x_145 = x_134; +lean_dec(x_11); +x_145 = lean_ctor_get(x_142, 1); +lean_inc(x_145); +if (lean_is_exclusive(x_142)) { + lean_ctor_release(x_142, 0); + lean_ctor_release(x_142, 1); + x_146 = x_142; } else { - lean_dec_ref(x_134); - x_145 = lean_box(0); + lean_dec_ref(x_142); + x_146 = lean_box(0); } +x_147 = lean_ctor_get(x_143, 0); +lean_inc(x_147); +x_148 = lean_ctor_get(x_143, 1); +lean_inc(x_148); +if (lean_is_exclusive(x_143)) { + lean_ctor_release(x_143, 0); + lean_ctor_release(x_143, 1); + x_149 = x_143; +} else { + lean_dec_ref(x_143); + x_149 = lean_box(0); +} +x_150 = 0; lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); -lean_inc(x_143); -x_146 = l_Lean_Meta_simpIfTarget(x_143, x_139, x_3, x_4, x_5, x_6, x_142); -if (lean_obj_tag(x_146) == 0) -{ -lean_object* x_147; lean_object* x_148; uint8_t x_149; -x_147 = lean_ctor_get(x_146, 0); lean_inc(x_147); -x_148 = lean_ctor_get(x_146, 1); -lean_inc(x_148); -lean_dec(x_146); -x_149 = lean_name_eq(x_136, x_141); -lean_dec(x_136); -if (x_149 == 0) +x_151 = l_Lean_Meta_simpIfTarget(x_147, x_150, x_3, x_4, x_5, x_6, x_144); +if (lean_obj_tag(x_151) == 0) { -lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; -lean_dec(x_143); -if (lean_is_scalar(x_145)) { - x_150 = lean_alloc_ctor(0, 2, 0); +lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; +x_152 = lean_ctor_get(x_151, 0); +lean_inc(x_152); +x_153 = lean_ctor_get(x_151, 1); +lean_inc(x_153); +lean_dec(x_151); +x_154 = lean_ctor_get(x_145, 0); +lean_inc(x_154); +x_155 = lean_ctor_get(x_145, 1); +lean_inc(x_155); +if (lean_is_exclusive(x_145)) { + lean_ctor_release(x_145, 0); + lean_ctor_release(x_145, 1); + x_156 = x_145; } else { - x_150 = x_145; + lean_dec_ref(x_145); + x_156 = lean_box(0); } -lean_ctor_set(x_150, 0, x_141); -lean_ctor_set(x_150, 1, x_137); -if (lean_is_scalar(x_138)) { - x_151 = lean_alloc_ctor(0, 2, 0); -} else { - x_151 = x_138; -} -lean_ctor_set(x_151, 0, x_147); -lean_ctor_set(x_151, 1, x_144); -if (lean_is_scalar(x_135)) { - x_152 = lean_alloc_ctor(0, 2, 0); -} else { - x_152 = x_135; -} -lean_ctor_set(x_152, 0, x_150); -lean_ctor_set(x_152, 1, x_151); -x_153 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_153, 0, x_152); -x_12 = x_153; -x_13 = x_148; -goto block_26; -} -else +lean_inc(x_154); +x_157 = l_Lean_Meta_simpIfTarget(x_154, x_150, x_3, x_4, x_5, x_6, x_153); +if (lean_obj_tag(x_157) == 0) { -uint8_t x_154; -x_154 = lean_name_eq(x_143, x_147); -lean_dec(x_143); -if (x_154 == 0) -{ -lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; -if (lean_is_scalar(x_145)) { - x_155 = lean_alloc_ctor(0, 2, 0); +lean_object* x_158; lean_object* x_159; lean_object* x_160; uint8_t x_161; +x_158 = lean_ctor_get(x_157, 0); +lean_inc(x_158); +x_159 = lean_ctor_get(x_157, 1); +lean_inc(x_159); +if (lean_is_exclusive(x_157)) { + lean_ctor_release(x_157, 0); + lean_ctor_release(x_157, 1); + x_160 = x_157; } else { - x_155 = x_145; + lean_dec_ref(x_157); + x_160 = lean_box(0); } -lean_ctor_set(x_155, 0, x_141); -lean_ctor_set(x_155, 1, x_137); -if (lean_is_scalar(x_138)) { - x_156 = lean_alloc_ctor(0, 2, 0); -} else { - x_156 = x_138; -} -lean_ctor_set(x_156, 0, x_147); -lean_ctor_set(x_156, 1, x_144); -if (lean_is_scalar(x_135)) { - x_157 = lean_alloc_ctor(0, 2, 0); -} else { - x_157 = x_135; -} -lean_ctor_set(x_157, 0, x_155); -lean_ctor_set(x_157, 1, x_156); -x_158 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_158, 0, x_157); -x_12 = x_158; -x_13 = x_148; -goto block_26; -} -else -{ -lean_object* x_159; +x_161 = lean_name_eq(x_147, x_152); lean_dec(x_147); -lean_dec(x_145); -lean_dec(x_144); -lean_dec(x_141); -lean_dec(x_138); -lean_dec(x_137); -lean_dec(x_135); -x_159 = lean_box(0); -x_12 = x_159; -x_13 = x_148; -goto block_26; +if (x_161 == 0) +{ +lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_object* x_166; +lean_dec(x_154); +if (lean_is_scalar(x_156)) { + x_162 = lean_alloc_ctor(0, 2, 0); +} else { + x_162 = x_156; } +lean_ctor_set(x_162, 0, x_152); +lean_ctor_set(x_162, 1, x_148); +if (lean_is_scalar(x_149)) { + x_163 = lean_alloc_ctor(0, 2, 0); +} else { + x_163 = x_149; } +lean_ctor_set(x_163, 0, x_158); +lean_ctor_set(x_163, 1, x_155); +if (lean_is_scalar(x_146)) { + x_164 = lean_alloc_ctor(0, 2, 0); +} else { + x_164 = x_146; +} +lean_ctor_set(x_164, 0, x_162); +lean_ctor_set(x_164, 1, x_163); +x_165 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_165, 0, x_164); +if (lean_is_scalar(x_160)) { + x_166 = lean_alloc_ctor(0, 2, 0); +} else { + x_166 = x_160; +} +lean_ctor_set(x_166, 0, x_165); +lean_ctor_set(x_166, 1, x_159); +return x_166; } else { -lean_object* x_160; lean_object* x_161; -lean_dec(x_145); -lean_dec(x_144); -lean_dec(x_143); -lean_dec(x_141); -lean_dec(x_138); -lean_dec(x_137); -lean_dec(x_136); -lean_dec(x_135); -lean_dec(x_11); -x_160 = lean_ctor_get(x_146, 0); -lean_inc(x_160); -x_161 = lean_ctor_get(x_146, 1); -lean_inc(x_161); +uint8_t x_167; +x_167 = lean_name_eq(x_154, x_158); +lean_dec(x_154); +if (x_167 == 0) +{ +lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; lean_object* x_172; +if (lean_is_scalar(x_156)) { + x_168 = lean_alloc_ctor(0, 2, 0); +} else { + x_168 = x_156; +} +lean_ctor_set(x_168, 0, x_152); +lean_ctor_set(x_168, 1, x_148); +if (lean_is_scalar(x_149)) { + x_169 = lean_alloc_ctor(0, 2, 0); +} else { + x_169 = x_149; +} +lean_ctor_set(x_169, 0, x_158); +lean_ctor_set(x_169, 1, x_155); +if (lean_is_scalar(x_146)) { + x_170 = lean_alloc_ctor(0, 2, 0); +} else { + x_170 = x_146; +} +lean_ctor_set(x_170, 0, x_168); +lean_ctor_set(x_170, 1, x_169); +x_171 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_171, 0, x_170); +if (lean_is_scalar(x_160)) { + x_172 = lean_alloc_ctor(0, 2, 0); +} else { + x_172 = x_160; +} +lean_ctor_set(x_172, 0, x_171); +lean_ctor_set(x_172, 1, x_159); +return x_172; +} +else +{ +lean_object* x_173; lean_object* x_174; +lean_dec(x_158); +lean_dec(x_156); +lean_dec(x_155); +lean_dec(x_152); +lean_dec(x_149); +lean_dec(x_148); lean_dec(x_146); -x_27 = x_160; -x_28 = x_161; -goto block_34; +x_173 = lean_box(0); +if (lean_is_scalar(x_160)) { + x_174 = lean_alloc_ctor(0, 2, 0); +} else { + x_174 = x_160; +} +lean_ctor_set(x_174, 0, x_173); +lean_ctor_set(x_174, 1, x_159); +return x_174; +} } } else { -lean_object* x_162; lean_object* x_163; -lean_dec(x_138); -lean_dec(x_137); -lean_dec(x_136); -lean_dec(x_135); -lean_dec(x_134); -lean_dec(x_11); -x_162 = lean_ctor_get(x_140, 0); -lean_inc(x_162); -x_163 = lean_ctor_get(x_140, 1); -lean_inc(x_163); -lean_dec(x_140); -x_27 = x_162; -x_28 = x_163; -goto block_34; +lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; +lean_dec(x_156); +lean_dec(x_155); +lean_dec(x_154); +lean_dec(x_152); +lean_dec(x_149); +lean_dec(x_148); +lean_dec(x_147); +lean_dec(x_146); +x_175 = lean_ctor_get(x_157, 0); +lean_inc(x_175); +x_176 = lean_ctor_get(x_157, 1); +lean_inc(x_176); +if (lean_is_exclusive(x_157)) { + lean_ctor_release(x_157, 0); + lean_ctor_release(x_157, 1); + x_177 = x_157; +} else { + lean_dec_ref(x_157); + x_177 = lean_box(0); +} +if (lean_is_scalar(x_177)) { + x_178 = lean_alloc_ctor(1, 2, 0); +} else { + x_178 = x_177; +} +lean_ctor_set(x_178, 0, x_175); +lean_ctor_set(x_178, 1, x_176); +return x_178; +} +} +else +{ +lean_object* x_179; lean_object* x_180; lean_object* x_181; lean_object* x_182; +lean_dec(x_149); +lean_dec(x_148); +lean_dec(x_147); +lean_dec(x_146); +lean_dec(x_145); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_179 = lean_ctor_get(x_151, 0); +lean_inc(x_179); +x_180 = lean_ctor_get(x_151, 1); +lean_inc(x_180); +if (lean_is_exclusive(x_151)) { + lean_ctor_release(x_151, 0); + lean_ctor_release(x_151, 1); + x_181 = x_151; +} else { + lean_dec_ref(x_151); + x_181 = lean_box(0); +} +if (lean_is_scalar(x_181)) { + x_182 = lean_alloc_ctor(1, 2, 0); +} else { + x_182 = x_181; +} +lean_ctor_set(x_182, 0, x_179); +lean_ctor_set(x_182, 1, x_180); +return x_182; } } } } else { -lean_object* x_164; lean_object* x_165; +uint8_t x_183; +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_183 = !lean_is_exclusive(x_11); +if (x_183 == 0) +{ +return x_11; +} +else +{ +lean_object* x_184; lean_object* x_185; lean_object* x_186; +x_184 = lean_ctor_get(x_11, 0); +x_185 = lean_ctor_get(x_11, 1); +lean_inc(x_185); +lean_inc(x_184); lean_dec(x_11); -x_164 = lean_ctor_get(x_38, 0); -lean_inc(x_164); -x_165 = lean_ctor_get(x_38, 1); -lean_inc(x_165); -lean_dec(x_38); -x_27 = x_164; -x_28 = x_165; -goto block_34; +x_186 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_186, 0, x_184); +lean_ctor_set(x_186, 1, x_185); +return x_186; +} } } else { -lean_object* x_166; lean_object* x_167; -lean_dec(x_11); +uint8_t x_187; +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_166 = lean_ctor_get(x_35, 0); -lean_inc(x_166); -x_167 = lean_ctor_get(x_35, 1); -lean_inc(x_167); -lean_dec(x_35); -x_27 = x_166; -x_28 = x_167; -goto block_34; -} -block_26: +x_187 = !lean_is_exclusive(x_8); +if (x_187 == 0) { -if (lean_obj_tag(x_12) == 0) -{ -lean_object* x_14; uint8_t x_15; -lean_dec(x_11); -x_14 = l_Lean_Meta_SavedState_restore(x_9, x_3, x_4, x_5, x_6, x_13); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_9); -x_15 = !lean_is_exclusive(x_14); -if (x_15 == 0) -{ -lean_object* x_16; lean_object* x_17; -x_16 = lean_ctor_get(x_14, 0); -lean_dec(x_16); -x_17 = lean_box(0); -lean_ctor_set(x_14, 0, x_17); -return x_14; +return x_8; } else { -lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_18 = lean_ctor_get(x_14, 1); -lean_inc(x_18); -lean_dec(x_14); -x_19 = lean_box(0); -x_20 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_20, 0, x_19); -lean_ctor_set(x_20, 1, x_18); -return x_20; -} -} -else -{ -uint8_t x_21; -lean_dec(x_9); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -x_21 = !lean_is_exclusive(x_12); -if (x_21 == 0) -{ -lean_object* x_22; -if (lean_is_scalar(x_11)) { - x_22 = lean_alloc_ctor(0, 2, 0); -} else { - x_22 = x_11; -} -lean_ctor_set(x_22, 0, x_12); -lean_ctor_set(x_22, 1, x_13); -return x_22; -} -else -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_23 = lean_ctor_get(x_12, 0); -lean_inc(x_23); -lean_dec(x_12); -x_24 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_24, 0, x_23); -if (lean_is_scalar(x_11)) { - x_25 = lean_alloc_ctor(0, 2, 0); -} else { - x_25 = x_11; -} -lean_ctor_set(x_25, 0, x_24); -lean_ctor_set(x_25, 1, x_13); -return x_25; -} -} -} -block_34: -{ -lean_object* x_29; uint8_t x_30; -x_29 = l_Lean_Meta_SavedState_restore(x_9, x_3, x_4, x_5, x_6, x_28); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_9); -x_30 = !lean_is_exclusive(x_29); -if (x_30 == 0) -{ -lean_object* x_31; -x_31 = lean_ctor_get(x_29, 0); -lean_dec(x_31); -lean_ctor_set_tag(x_29, 1); -lean_ctor_set(x_29, 0, x_27); -return x_29; -} -else -{ -lean_object* x_32; lean_object* x_33; -x_32 = lean_ctor_get(x_29, 1); -lean_inc(x_32); -lean_dec(x_29); -x_33 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_33, 0, x_27); -lean_ctor_set(x_33, 1, x_32); -return x_33; +lean_object* x_188; lean_object* x_189; lean_object* x_190; +x_188 = lean_ctor_get(x_8, 0); +x_189 = lean_ctor_get(x_8, 1); +lean_inc(x_189); +lean_inc(x_188); +lean_dec(x_8); +x_190 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_190, 0, x_188); +lean_ctor_set(x_190, 1, x_189); +return x_190; } } } @@ -5197,9 +5362,12 @@ return x_33; LEAN_EXPORT lean_object* l_Lean_Meta_splitIfTarget_x3f(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { -lean_object* x_8; -x_8 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfTarget_x3f___spec__1___at_Lean_Meta_splitIfTarget_x3f___spec__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -return x_8; +lean_object* x_8; lean_object* x_9; +x_8 = lean_alloc_closure((void*)(l_Lean_Meta_splitIfTarget_x3f___lambda__1), 7, 2); +lean_closure_set(x_8, 0, x_1); +lean_closure_set(x_8, 1, x_2); +x_9 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfTarget_x3f___spec__1(x_8, x_3, x_4, x_5, x_6, x_7); +return x_9; } } LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfLocalDecl_x3f___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { @@ -5354,7 +5522,7 @@ return x_36; } } } -LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfLocalDecl_x3f___spec__1___at_Lean_Meta_splitIfLocalDecl_x3f___spec__2___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +LEAN_EXPORT lean_object* l_Lean_Meta_splitIfLocalDecl_x3f___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { _start: { lean_object* x_10; @@ -6024,175 +6192,26 @@ return x_120; } } } -LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfLocalDecl_x3f___spec__1___at_Lean_Meta_splitIfLocalDecl_x3f___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { -_start: -{ -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; -lean_inc(x_1); -x_10 = lean_alloc_closure((void*)(l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfLocalDecl_x3f___spec__1___at_Lean_Meta_splitIfLocalDecl_x3f___spec__2___lambda__1), 9, 4); -lean_closure_set(x_10, 0, x_4); -lean_closure_set(x_10, 1, x_1); -lean_closure_set(x_10, 2, x_3); -lean_closure_set(x_10, 3, x_2); -x_11 = l_Lean_Meta_saveState___rarg(x_6, x_7, x_8, x_9); -x_12 = lean_ctor_get(x_11, 0); -lean_inc(x_12); -x_13 = lean_ctor_get(x_11, 1); -lean_inc(x_13); -lean_dec(x_11); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -x_14 = l_Lean_MVarId_withContext___at___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___spec__2___rarg(x_1, x_10, x_5, x_6, x_7, x_8, x_13); -if (lean_obj_tag(x_14) == 0) -{ -lean_object* x_15; -x_15 = lean_ctor_get(x_14, 0); -lean_inc(x_15); -if (lean_obj_tag(x_15) == 0) -{ -lean_object* x_16; lean_object* x_17; uint8_t x_18; -x_16 = lean_ctor_get(x_14, 1); -lean_inc(x_16); -lean_dec(x_14); -x_17 = l_Lean_Meta_SavedState_restore(x_12, x_5, x_6, x_7, x_8, x_16); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_12); -x_18 = !lean_is_exclusive(x_17); -if (x_18 == 0) -{ -lean_object* x_19; lean_object* x_20; -x_19 = lean_ctor_get(x_17, 0); -lean_dec(x_19); -x_20 = lean_box(0); -lean_ctor_set(x_17, 0, x_20); -return x_17; -} -else -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_21 = lean_ctor_get(x_17, 1); -lean_inc(x_21); -lean_dec(x_17); -x_22 = lean_box(0); -x_23 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_23, 0, x_22); -lean_ctor_set(x_23, 1, x_21); -return x_23; -} -} -else -{ -uint8_t x_24; -lean_dec(x_12); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -x_24 = !lean_is_exclusive(x_14); -if (x_24 == 0) -{ -lean_object* x_25; uint8_t x_26; -x_25 = lean_ctor_get(x_14, 0); -lean_dec(x_25); -x_26 = !lean_is_exclusive(x_15); -if (x_26 == 0) -{ -return x_14; -} -else -{ -lean_object* x_27; lean_object* x_28; -x_27 = lean_ctor_get(x_15, 0); -lean_inc(x_27); -lean_dec(x_15); -x_28 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_28, 0, x_27); -lean_ctor_set(x_14, 0, x_28); -return x_14; -} -} -else -{ -lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; -x_29 = lean_ctor_get(x_14, 1); -lean_inc(x_29); -lean_dec(x_14); -x_30 = lean_ctor_get(x_15, 0); -lean_inc(x_30); -if (lean_is_exclusive(x_15)) { - lean_ctor_release(x_15, 0); - x_31 = x_15; -} else { - lean_dec_ref(x_15); - x_31 = lean_box(0); -} -if (lean_is_scalar(x_31)) { - x_32 = lean_alloc_ctor(1, 1, 0); -} else { - x_32 = x_31; -} -lean_ctor_set(x_32, 0, x_30); -x_33 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_33, 0, x_32); -lean_ctor_set(x_33, 1, x_29); -return x_33; -} -} -} -else -{ -lean_object* x_34; lean_object* x_35; lean_object* x_36; uint8_t x_37; -x_34 = lean_ctor_get(x_14, 0); -lean_inc(x_34); -x_35 = lean_ctor_get(x_14, 1); -lean_inc(x_35); -lean_dec(x_14); -x_36 = l_Lean_Meta_SavedState_restore(x_12, x_5, x_6, x_7, x_8, x_35); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_12); -x_37 = !lean_is_exclusive(x_36); -if (x_37 == 0) -{ -lean_object* x_38; -x_38 = lean_ctor_get(x_36, 0); -lean_dec(x_38); -lean_ctor_set_tag(x_36, 1); -lean_ctor_set(x_36, 0, x_34); -return x_36; -} -else -{ -lean_object* x_39; lean_object* x_40; -x_39 = lean_ctor_get(x_36, 1); -lean_inc(x_39); -lean_dec(x_36); -x_40 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_40, 0, x_34); -lean_ctor_set(x_40, 1, x_39); -return x_40; -} -} -} -} LEAN_EXPORT lean_object* l_Lean_Meta_splitIfLocalDecl_x3f(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_9; lean_object* x_10; +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_inc(x_2); x_9 = l_Lean_Expr_fvar___override(x_2); -x_10 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfLocalDecl_x3f___spec__1___at_Lean_Meta_splitIfLocalDecl_x3f___spec__2(x_1, x_2, x_3, x_9, x_4, x_5, x_6, x_7, x_8); -return x_10; +lean_inc(x_1); +x_10 = lean_alloc_closure((void*)(l_Lean_Meta_splitIfLocalDecl_x3f___lambda__1), 9, 4); +lean_closure_set(x_10, 0, x_9); +lean_closure_set(x_10, 1, x_1); +lean_closure_set(x_10, 2, x_3); +lean_closure_set(x_10, 3, x_2); +x_11 = lean_alloc_closure((void*)(l_Lean_MVarId_withContext___at___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___spec__2___rarg), 7, 2); +lean_closure_set(x_11, 0, x_1); +lean_closure_set(x_11, 1, x_10); +x_12 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfLocalDecl_x3f___spec__1(x_11, x_4, x_5, x_6, x_7, x_8); +return x_12; } } -LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_SplitIf___hyg_1871_(lean_object* x_1) { +LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_SplitIf___hyg_1881_(lean_object* x_1) { _start: { lean_object* x_2; uint8_t x_3; lean_object* x_4; @@ -6360,7 +6379,7 @@ l_Lean_Meta_simpIfLocalDecl___closed__3 = _init_l_Lean_Meta_simpIfLocalDecl___cl lean_mark_persistent(l_Lean_Meta_simpIfLocalDecl___closed__3); l_Lean_Meta_simpIfLocalDecl___closed__4 = _init_l_Lean_Meta_simpIfLocalDecl___closed__4(); lean_mark_persistent(l_Lean_Meta_simpIfLocalDecl___closed__4); -res = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_SplitIf___hyg_1871_(lean_io_mk_world()); +res = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_SplitIf___hyg_1881_(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); return lean_io_result_mk_ok(lean_box(0)); diff --git a/stage0/stdlib/Lean/Meta/Tactic/Subst.c b/stage0/stdlib/Lean/Meta/Tactic/Subst.c index a694a1cd8e..52e58cf126 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Subst.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Subst.c @@ -73,7 +73,6 @@ LEAN_EXPORT lean_object* l_Lean_Meta_substCore___lambda__16(lean_object*, lean_o LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_substSomeVar_x3f___spec__5(lean_object*, lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_substCore___lambda__8___boxed(lean_object**); LEAN_EXPORT lean_object* l_Lean_Meta_subst_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_observing_x3f___at_Lean_Meta_subst_x3f___spec__1___at_Lean_Meta_subst_x3f___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Name_mkStr3(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MessageData_ofList(lean_object*); lean_object* l_Lean_MVarId_withContext___at___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -152,10 +151,8 @@ lean_object* l_Lean_Meta_introNCore(lean_object*, lean_object*, lean_object*, ui static lean_object* l_Lean_Meta_substCore___lambda__19___closed__1; LEAN_EXPORT lean_object* l_List_mapTRAux___at_Lean_Meta_substCore___spec__6(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_subst_findEq___spec__5___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_observing_x3f___at_Lean_Meta_substCore_x3f___spec__1___at_Lean_Meta_substCore_x3f___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_substCore___lambda__11(lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_substCore___lambda__13___boxed(lean_object**); -LEAN_EXPORT lean_object* l_Lean_observing_x3f___at_Lean_Meta_substCore_x3f___spec__1___at_Lean_Meta_substCore_x3f___spec__2(lean_object*, lean_object*, uint8_t, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_whnf(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_heqToEq___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_subst_findEq___lambda__1___closed__2; @@ -9845,98 +9842,15 @@ return x_25; } } } -LEAN_EXPORT lean_object* l_Lean_observing_x3f___at_Lean_Meta_subst_x3f___spec__1___at_Lean_Meta_subst_x3f___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { -_start: -{ -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; -x_8 = l_Lean_Meta_saveState___rarg(x_4, x_5, x_6, x_7); -x_9 = lean_ctor_get(x_8, 0); -lean_inc(x_9); -x_10 = lean_ctor_get(x_8, 1); -lean_inc(x_10); -lean_dec(x_8); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -x_11 = l_Lean_Meta_subst(x_1, x_2, x_3, x_4, x_5, x_6, x_10); -if (lean_obj_tag(x_11) == 0) -{ -uint8_t x_12; -lean_dec(x_9); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -x_12 = !lean_is_exclusive(x_11); -if (x_12 == 0) -{ -lean_object* x_13; lean_object* x_14; -x_13 = lean_ctor_get(x_11, 0); -x_14 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_14, 0, x_13); -lean_ctor_set(x_11, 0, x_14); -return x_11; -} -else -{ -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_15 = lean_ctor_get(x_11, 0); -x_16 = lean_ctor_get(x_11, 1); -lean_inc(x_16); -lean_inc(x_15); -lean_dec(x_11); -x_17 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_17, 0, x_15); -x_18 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_18, 0, x_17); -lean_ctor_set(x_18, 1, x_16); -return x_18; -} -} -else -{ -lean_object* x_19; lean_object* x_20; uint8_t x_21; -x_19 = lean_ctor_get(x_11, 1); -lean_inc(x_19); -lean_dec(x_11); -x_20 = l_Lean_Meta_SavedState_restore(x_9, x_3, x_4, x_5, x_6, x_19); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_9); -x_21 = !lean_is_exclusive(x_20); -if (x_21 == 0) -{ -lean_object* x_22; lean_object* x_23; -x_22 = lean_ctor_get(x_20, 0); -lean_dec(x_22); -x_23 = lean_box(0); -lean_ctor_set(x_20, 0, x_23); -return x_20; -} -else -{ -lean_object* x_24; lean_object* x_25; lean_object* x_26; -x_24 = lean_ctor_get(x_20, 1); -lean_inc(x_24); -lean_dec(x_20); -x_25 = lean_box(0); -x_26 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_26, 0, x_25); -lean_ctor_set(x_26, 1, x_24); -return x_26; -} -} -} -} LEAN_EXPORT lean_object* l_Lean_Meta_subst_x3f(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { -lean_object* x_8; -x_8 = l_Lean_observing_x3f___at_Lean_Meta_subst_x3f___spec__1___at_Lean_Meta_subst_x3f___spec__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -return x_8; +lean_object* x_8; lean_object* x_9; +x_8 = lean_alloc_closure((void*)(l_Lean_Meta_subst), 7, 2); +lean_closure_set(x_8, 0, x_1); +lean_closure_set(x_8, 1, x_2); +x_9 = l_Lean_observing_x3f___at_Lean_Meta_subst_x3f___spec__1(x_8, x_3, x_4, x_5, x_6, x_7); +return x_9; } } LEAN_EXPORT lean_object* l_Lean_observing_x3f___at_Lean_Meta_substCore_x3f___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { @@ -10025,112 +9939,22 @@ return x_25; } } } -LEAN_EXPORT lean_object* l_Lean_observing_x3f___at_Lean_Meta_substCore_x3f___spec__1___at_Lean_Meta_substCore_x3f___spec__2(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, uint8_t x_5, uint8_t x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { -_start: -{ -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; -x_12 = l_Lean_Meta_saveState___rarg(x_8, x_9, x_10, x_11); -x_13 = lean_ctor_get(x_12, 0); -lean_inc(x_13); -x_14 = lean_ctor_get(x_12, 1); -lean_inc(x_14); -lean_dec(x_12); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_15 = l_Lean_Meta_substCore(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_14); -if (lean_obj_tag(x_15) == 0) -{ -uint8_t x_16; -lean_dec(x_13); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -x_16 = !lean_is_exclusive(x_15); -if (x_16 == 0) -{ -lean_object* x_17; lean_object* x_18; -x_17 = lean_ctor_get(x_15, 0); -x_18 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_18, 0, x_17); -lean_ctor_set(x_15, 0, x_18); -return x_15; -} -else -{ -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_19 = lean_ctor_get(x_15, 0); -x_20 = lean_ctor_get(x_15, 1); -lean_inc(x_20); -lean_inc(x_19); -lean_dec(x_15); -x_21 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_21, 0, x_19); -x_22 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_22, 0, x_21); -lean_ctor_set(x_22, 1, x_20); -return x_22; -} -} -else -{ -lean_object* x_23; lean_object* x_24; uint8_t x_25; -x_23 = lean_ctor_get(x_15, 1); -lean_inc(x_23); -lean_dec(x_15); -x_24 = l_Lean_Meta_SavedState_restore(x_13, x_7, x_8, x_9, x_10, x_23); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_13); -x_25 = !lean_is_exclusive(x_24); -if (x_25 == 0) -{ -lean_object* x_26; lean_object* x_27; -x_26 = lean_ctor_get(x_24, 0); -lean_dec(x_26); -x_27 = lean_box(0); -lean_ctor_set(x_24, 0, x_27); -return x_24; -} -else -{ -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_24, 1); -lean_inc(x_28); -lean_dec(x_24); -x_29 = lean_box(0); -x_30 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_30, 0, x_29); -lean_ctor_set(x_30, 1, x_28); -return x_30; -} -} -} -} LEAN_EXPORT lean_object* l_Lean_Meta_substCore_x3f(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, uint8_t x_5, uint8_t x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { _start: { -lean_object* x_12; -x_12 = l_Lean_observing_x3f___at_Lean_Meta_substCore_x3f___spec__1___at_Lean_Meta_substCore_x3f___spec__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11); -return x_12; -} -} -LEAN_EXPORT lean_object* l_Lean_observing_x3f___at_Lean_Meta_substCore_x3f___spec__1___at_Lean_Meta_substCore_x3f___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { -_start: -{ -uint8_t x_12; uint8_t x_13; uint8_t x_14; lean_object* x_15; -x_12 = lean_unbox(x_3); -lean_dec(x_3); -x_13 = lean_unbox(x_5); -lean_dec(x_5); -x_14 = lean_unbox(x_6); -lean_dec(x_6); -x_15 = l_Lean_observing_x3f___at_Lean_Meta_substCore_x3f___spec__1___at_Lean_Meta_substCore_x3f___spec__2(x_1, x_2, x_12, x_4, x_13, x_14, x_7, x_8, x_9, x_10, x_11); -return x_15; +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_12 = lean_box(x_3); +x_13 = lean_box(x_5); +x_14 = lean_box(x_6); +x_15 = lean_alloc_closure((void*)(l_Lean_Meta_substCore___boxed), 11, 6); +lean_closure_set(x_15, 0, x_1); +lean_closure_set(x_15, 1, x_2); +lean_closure_set(x_15, 2, x_12); +lean_closure_set(x_15, 3, x_4); +lean_closure_set(x_15, 4, x_13); +lean_closure_set(x_15, 5, x_14); +x_16 = l_Lean_observing_x3f___at_Lean_Meta_substCore_x3f___spec__1(x_15, x_7, x_8, x_9, x_10, x_11); +return x_16; } } LEAN_EXPORT lean_object* l_Lean_Meta_substCore_x3f___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { @@ -10152,7 +9976,7 @@ _start: { lean_object* x_8; lean_object* x_9; lean_inc(x_1); -x_8 = l_Lean_observing_x3f___at_Lean_Meta_subst_x3f___spec__1___at_Lean_Meta_subst_x3f___spec__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +x_8 = l_Lean_Meta_subst_x3f(x_1, x_2, x_3, x_4, x_5, x_6, x_7); x_9 = lean_ctor_get(x_8, 0); lean_inc(x_9); if (lean_obj_tag(x_9) == 0) @@ -10449,7 +10273,7 @@ lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); lean_inc(x_1); -x_33 = l_Lean_observing_x3f___at_Lean_Meta_subst_x3f___spec__1___at_Lean_Meta_subst_x3f___spec__2(x_1, x_32, x_8, x_9, x_10, x_11, x_12); +x_33 = l_Lean_Meta_subst_x3f(x_1, x_32, x_8, x_9, x_10, x_11, x_12); x_34 = lean_ctor_get(x_33, 0); lean_inc(x_34); if (lean_obj_tag(x_34) == 0) @@ -10521,7 +10345,7 @@ lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); lean_inc(x_1); -x_49 = l_Lean_observing_x3f___at_Lean_Meta_subst_x3f___spec__1___at_Lean_Meta_subst_x3f___spec__2(x_1, x_48, x_8, x_9, x_10, x_11, x_12); +x_49 = l_Lean_Meta_subst_x3f(x_1, x_48, x_8, x_9, x_10, x_11, x_12); x_50 = lean_ctor_get(x_49, 0); lean_inc(x_50); if (lean_obj_tag(x_50) == 0) @@ -10855,7 +10679,7 @@ lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); lean_inc(x_1); -x_34 = l_Lean_observing_x3f___at_Lean_Meta_subst_x3f___spec__1___at_Lean_Meta_subst_x3f___spec__2(x_1, x_33, x_8, x_9, x_10, x_11, x_12); +x_34 = l_Lean_Meta_subst_x3f(x_1, x_33, x_8, x_9, x_10, x_11, x_12); x_35 = lean_ctor_get(x_34, 0); lean_inc(x_35); if (lean_obj_tag(x_35) == 0) @@ -10927,7 +10751,7 @@ lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); lean_inc(x_1); -x_50 = l_Lean_observing_x3f___at_Lean_Meta_subst_x3f___spec__1___at_Lean_Meta_subst_x3f___spec__2(x_1, x_49, x_8, x_9, x_10, x_11, x_12); +x_50 = l_Lean_Meta_subst_x3f(x_1, x_49, x_8, x_9, x_10, x_11, x_12); x_51 = lean_ctor_get(x_50, 0); lean_inc(x_51); if (lean_obj_tag(x_51) == 0) diff --git a/stage0/stdlib/Lean/Parser.c b/stage0/stdlib/Lean/Parser.c index 31293000f8..b0a2ca2c2b 100644 --- a/stage0/stdlib/Lean/Parser.c +++ b/stage0/stdlib/Lean/Parser.c @@ -38,6 +38,7 @@ lean_object* l_Lean_Parser_mkAntiquot_parenthesizer(lean_object*, lean_object*, static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser___hyg_8____closed__193; lean_object* l_Lean_Name_str___override(lean_object*, lean_object*); static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser___hyg_8____closed__33; +lean_object* l_Lean_PrettyPrinter_Parenthesizer_withAntiquot_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_PrettyPrinter_Formatter_ident_formatter___closed__1; static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser___hyg_8____closed__25; lean_object* l_Lean_PrettyPrinter_Formatter_checkLinebreakBefore_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -263,6 +264,7 @@ static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser___hyg_8____closed__1 static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser___hyg_8____closed__12; lean_object* l_Lean_PrettyPrinter_Formatter_lookahead_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_PrettyPrinter_Formatter_scientificLit_formatter___closed__2; +lean_object* l_Lean_PrettyPrinter_Formatter_mkAntiquot_formatter_x27___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser___hyg_8____closed__127; lean_object* l_Lean_Parser_Term_char_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser___hyg_8____closed__156; @@ -408,6 +410,7 @@ static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser___hyg_8____closed__8 static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser___hyg_8____closed__17; static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser___hyg_8____closed__97; static lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_scientificLit_parenthesizer___closed__1; +lean_object* l_Lean_PrettyPrinter_Parenthesizer_mkAntiquot_parenthesizer_x27___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_scientificLit_parenthesizer___closed__2; static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser___hyg_8____closed__150; static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser___hyg_8____closed__57; @@ -6127,7 +6130,7 @@ LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_interpretParserDescr _start: { lean_object* x_8; -x_8 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +x_8 = l_Lean_PrettyPrinter_Parenthesizer_withAntiquot_parenthesizer(x_1, x_2, x_3, x_4, x_5, x_6, x_7); return x_8; } } @@ -6742,289 +6745,318 @@ return x_149; } case 9: { -lean_object* x_150; lean_object* x_151; lean_object* x_152; -x_150 = lean_ctor_get(x_1, 1); +lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; +x_150 = lean_ctor_get(x_1, 0); lean_inc(x_150); -x_151 = lean_ctor_get(x_1, 2); +x_151 = lean_ctor_get(x_1, 1); lean_inc(x_151); +x_152 = lean_ctor_get(x_1, 2); +lean_inc(x_152); lean_dec(x_1); -x_152 = lean_pretty_printer_parenthesizer_interpret_parser_descr(x_151, x_2, x_3, x_4); -if (lean_obj_tag(x_152) == 0) +x_153 = lean_pretty_printer_parenthesizer_interpret_parser_descr(x_152, x_2, x_3, x_4); +if (lean_obj_tag(x_153) == 0) { -uint8_t x_153; -x_153 = !lean_is_exclusive(x_152); -if (x_153 == 0) +uint8_t x_154; +x_154 = !lean_is_exclusive(x_153); +if (x_154 == 0) { -lean_object* x_154; lean_object* x_155; -x_154 = lean_ctor_get(x_152, 0); -x_155 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_interpretParserDescr___elambda__8), 7, 2); -lean_closure_set(x_155, 0, x_150); -lean_closure_set(x_155, 1, x_154); -lean_ctor_set(x_152, 0, x_155); -return x_152; +lean_object* x_155; uint8_t x_156; uint8_t x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; +x_155 = lean_ctor_get(x_153, 0); +x_156 = 1; +x_157 = 0; +x_158 = lean_box(x_156); +x_159 = lean_box(x_157); +lean_inc(x_151); +x_160 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_mkAntiquot_parenthesizer_x27___boxed), 9, 4); +lean_closure_set(x_160, 0, x_150); +lean_closure_set(x_160, 1, x_151); +lean_closure_set(x_160, 2, x_158); +lean_closure_set(x_160, 3, x_159); +x_161 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer), 7, 2); +lean_closure_set(x_161, 0, x_151); +lean_closure_set(x_161, 1, x_155); +x_162 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_interpretParserDescr___elambda__8), 7, 2); +lean_closure_set(x_162, 0, x_160); +lean_closure_set(x_162, 1, x_161); +lean_ctor_set(x_153, 0, x_162); +return x_153; } else { -lean_object* x_156; lean_object* x_157; lean_object* x_158; lean_object* x_159; -x_156 = lean_ctor_get(x_152, 0); -x_157 = lean_ctor_get(x_152, 1); -lean_inc(x_157); -lean_inc(x_156); -lean_dec(x_152); -x_158 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_interpretParserDescr___elambda__8), 7, 2); -lean_closure_set(x_158, 0, x_150); -lean_closure_set(x_158, 1, x_156); -x_159 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_159, 0, x_158); -lean_ctor_set(x_159, 1, x_157); -return x_159; +lean_object* x_163; lean_object* x_164; uint8_t x_165; uint8_t x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; lean_object* x_172; +x_163 = lean_ctor_get(x_153, 0); +x_164 = lean_ctor_get(x_153, 1); +lean_inc(x_164); +lean_inc(x_163); +lean_dec(x_153); +x_165 = 1; +x_166 = 0; +x_167 = lean_box(x_165); +x_168 = lean_box(x_166); +lean_inc(x_151); +x_169 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_mkAntiquot_parenthesizer_x27___boxed), 9, 4); +lean_closure_set(x_169, 0, x_150); +lean_closure_set(x_169, 1, x_151); +lean_closure_set(x_169, 2, x_167); +lean_closure_set(x_169, 3, x_168); +x_170 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer), 7, 2); +lean_closure_set(x_170, 0, x_151); +lean_closure_set(x_170, 1, x_163); +x_171 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_interpretParserDescr___elambda__8), 7, 2); +lean_closure_set(x_171, 0, x_169); +lean_closure_set(x_171, 1, x_170); +x_172 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_172, 0, x_171); +lean_ctor_set(x_172, 1, x_164); +return x_172; } } else { -uint8_t x_160; +uint8_t x_173; +lean_dec(x_151); lean_dec(x_150); -x_160 = !lean_is_exclusive(x_152); -if (x_160 == 0) +x_173 = !lean_is_exclusive(x_153); +if (x_173 == 0) { -return x_152; +return x_153; } else { -lean_object* x_161; lean_object* x_162; lean_object* x_163; -x_161 = lean_ctor_get(x_152, 0); -x_162 = lean_ctor_get(x_152, 1); -lean_inc(x_162); -lean_inc(x_161); -lean_dec(x_152); -x_163 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_163, 0, x_161); -lean_ctor_set(x_163, 1, x_162); -return x_163; +lean_object* x_174; lean_object* x_175; lean_object* x_176; +x_174 = lean_ctor_get(x_153, 0); +x_175 = lean_ctor_get(x_153, 1); +lean_inc(x_175); +lean_inc(x_174); +lean_dec(x_153); +x_176 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_176, 0, x_174); +lean_ctor_set(x_176, 1, x_175); +return x_176; } } } case 10: { -lean_object* x_164; lean_object* x_165; lean_object* x_166; uint8_t x_167; lean_object* x_168; -x_164 = lean_ctor_get(x_1, 0); -lean_inc(x_164); -x_165 = lean_ctor_get(x_1, 1); -lean_inc(x_165); -x_166 = lean_ctor_get(x_1, 2); -lean_inc(x_166); -x_167 = lean_ctor_get_uint8(x_1, sizeof(void*)*3); +lean_object* x_177; lean_object* x_178; lean_object* x_179; uint8_t x_180; lean_object* x_181; +x_177 = lean_ctor_get(x_1, 0); +lean_inc(x_177); +x_178 = lean_ctor_get(x_1, 1); +lean_inc(x_178); +x_179 = lean_ctor_get(x_1, 2); +lean_inc(x_179); +x_180 = lean_ctor_get_uint8(x_1, sizeof(void*)*3); lean_dec(x_1); lean_inc(x_3); lean_inc(x_2); -x_168 = lean_pretty_printer_parenthesizer_interpret_parser_descr(x_164, x_2, x_3, x_4); -if (lean_obj_tag(x_168) == 0) -{ -lean_object* x_169; lean_object* x_170; lean_object* x_171; -x_169 = lean_ctor_get(x_168, 0); -lean_inc(x_169); -x_170 = lean_ctor_get(x_168, 1); -lean_inc(x_170); -lean_dec(x_168); -x_171 = lean_pretty_printer_parenthesizer_interpret_parser_descr(x_166, x_2, x_3, x_170); -if (lean_obj_tag(x_171) == 0) -{ -uint8_t x_172; -x_172 = !lean_is_exclusive(x_171); -if (x_172 == 0) -{ -lean_object* x_173; lean_object* x_174; lean_object* x_175; -x_173 = lean_ctor_get(x_171, 0); -x_174 = lean_box(x_167); -x_175 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_interpretParserDescr___elambda__9___boxed), 9, 4); -lean_closure_set(x_175, 0, x_165); -lean_closure_set(x_175, 1, x_174); -lean_closure_set(x_175, 2, x_169); -lean_closure_set(x_175, 3, x_173); -lean_ctor_set(x_171, 0, x_175); -return x_171; -} -else -{ -lean_object* x_176; lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; -x_176 = lean_ctor_get(x_171, 0); -x_177 = lean_ctor_get(x_171, 1); -lean_inc(x_177); -lean_inc(x_176); -lean_dec(x_171); -x_178 = lean_box(x_167); -x_179 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_interpretParserDescr___elambda__9___boxed), 9, 4); -lean_closure_set(x_179, 0, x_165); -lean_closure_set(x_179, 1, x_178); -lean_closure_set(x_179, 2, x_169); -lean_closure_set(x_179, 3, x_176); -x_180 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_180, 0, x_179); -lean_ctor_set(x_180, 1, x_177); -return x_180; -} -} -else -{ -uint8_t x_181; -lean_dec(x_169); -lean_dec(x_165); -x_181 = !lean_is_exclusive(x_171); -if (x_181 == 0) -{ -return x_171; -} -else +x_181 = lean_pretty_printer_parenthesizer_interpret_parser_descr(x_177, x_2, x_3, x_4); +if (lean_obj_tag(x_181) == 0) { lean_object* x_182; lean_object* x_183; lean_object* x_184; -x_182 = lean_ctor_get(x_171, 0); -x_183 = lean_ctor_get(x_171, 1); -lean_inc(x_183); +x_182 = lean_ctor_get(x_181, 0); lean_inc(x_182); -lean_dec(x_171); -x_184 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_184, 0, x_182); -lean_ctor_set(x_184, 1, x_183); -return x_184; -} -} -} -else +x_183 = lean_ctor_get(x_181, 1); +lean_inc(x_183); +lean_dec(x_181); +x_184 = lean_pretty_printer_parenthesizer_interpret_parser_descr(x_179, x_2, x_3, x_183); +if (lean_obj_tag(x_184) == 0) { uint8_t x_185; -lean_dec(x_166); -lean_dec(x_165); -lean_dec(x_3); -lean_dec(x_2); -x_185 = !lean_is_exclusive(x_168); +x_185 = !lean_is_exclusive(x_184); if (x_185 == 0) { -return x_168; +lean_object* x_186; lean_object* x_187; lean_object* x_188; +x_186 = lean_ctor_get(x_184, 0); +x_187 = lean_box(x_180); +x_188 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_interpretParserDescr___elambda__9___boxed), 9, 4); +lean_closure_set(x_188, 0, x_178); +lean_closure_set(x_188, 1, x_187); +lean_closure_set(x_188, 2, x_182); +lean_closure_set(x_188, 3, x_186); +lean_ctor_set(x_184, 0, x_188); +return x_184; } else { -lean_object* x_186; lean_object* x_187; lean_object* x_188; -x_186 = lean_ctor_get(x_168, 0); -x_187 = lean_ctor_get(x_168, 1); -lean_inc(x_187); -lean_inc(x_186); -lean_dec(x_168); -x_188 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_188, 0, x_186); -lean_ctor_set(x_188, 1, x_187); -return x_188; +lean_object* x_189; lean_object* x_190; lean_object* x_191; lean_object* x_192; lean_object* x_193; +x_189 = lean_ctor_get(x_184, 0); +x_190 = lean_ctor_get(x_184, 1); +lean_inc(x_190); +lean_inc(x_189); +lean_dec(x_184); +x_191 = lean_box(x_180); +x_192 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_interpretParserDescr___elambda__9___boxed), 9, 4); +lean_closure_set(x_192, 0, x_178); +lean_closure_set(x_192, 1, x_191); +lean_closure_set(x_192, 2, x_182); +lean_closure_set(x_192, 3, x_189); +x_193 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_193, 0, x_192); +lean_ctor_set(x_193, 1, x_190); +return x_193; +} +} +else +{ +uint8_t x_194; +lean_dec(x_182); +lean_dec(x_178); +x_194 = !lean_is_exclusive(x_184); +if (x_194 == 0) +{ +return x_184; +} +else +{ +lean_object* x_195; lean_object* x_196; lean_object* x_197; +x_195 = lean_ctor_get(x_184, 0); +x_196 = lean_ctor_get(x_184, 1); +lean_inc(x_196); +lean_inc(x_195); +lean_dec(x_184); +x_197 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_197, 0, x_195); +lean_ctor_set(x_197, 1, x_196); +return x_197; +} +} +} +else +{ +uint8_t x_198; +lean_dec(x_179); +lean_dec(x_178); +lean_dec(x_3); +lean_dec(x_2); +x_198 = !lean_is_exclusive(x_181); +if (x_198 == 0) +{ +return x_181; +} +else +{ +lean_object* x_199; lean_object* x_200; lean_object* x_201; +x_199 = lean_ctor_get(x_181, 0); +x_200 = lean_ctor_get(x_181, 1); +lean_inc(x_200); +lean_inc(x_199); +lean_dec(x_181); +x_201 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_201, 0, x_199); +lean_ctor_set(x_201, 1, x_200); +return x_201; } } } default: { -lean_object* x_189; lean_object* x_190; lean_object* x_191; uint8_t x_192; lean_object* x_193; -x_189 = lean_ctor_get(x_1, 0); -lean_inc(x_189); -x_190 = lean_ctor_get(x_1, 1); -lean_inc(x_190); -x_191 = lean_ctor_get(x_1, 2); -lean_inc(x_191); -x_192 = lean_ctor_get_uint8(x_1, sizeof(void*)*3); +lean_object* x_202; lean_object* x_203; lean_object* x_204; uint8_t x_205; lean_object* x_206; +x_202 = lean_ctor_get(x_1, 0); +lean_inc(x_202); +x_203 = lean_ctor_get(x_1, 1); +lean_inc(x_203); +x_204 = lean_ctor_get(x_1, 2); +lean_inc(x_204); +x_205 = lean_ctor_get_uint8(x_1, sizeof(void*)*3); lean_dec(x_1); lean_inc(x_3); lean_inc(x_2); -x_193 = lean_pretty_printer_parenthesizer_interpret_parser_descr(x_189, x_2, x_3, x_4); -if (lean_obj_tag(x_193) == 0) -{ -lean_object* x_194; lean_object* x_195; lean_object* x_196; -x_194 = lean_ctor_get(x_193, 0); -lean_inc(x_194); -x_195 = lean_ctor_get(x_193, 1); -lean_inc(x_195); -lean_dec(x_193); -x_196 = lean_pretty_printer_parenthesizer_interpret_parser_descr(x_191, x_2, x_3, x_195); -if (lean_obj_tag(x_196) == 0) -{ -uint8_t x_197; -x_197 = !lean_is_exclusive(x_196); -if (x_197 == 0) -{ -lean_object* x_198; lean_object* x_199; lean_object* x_200; -x_198 = lean_ctor_get(x_196, 0); -x_199 = lean_box(x_192); -x_200 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_interpretParserDescr___elambda__10___boxed), 9, 4); -lean_closure_set(x_200, 0, x_190); -lean_closure_set(x_200, 1, x_199); -lean_closure_set(x_200, 2, x_194); -lean_closure_set(x_200, 3, x_198); -lean_ctor_set(x_196, 0, x_200); -return x_196; -} -else -{ -lean_object* x_201; lean_object* x_202; lean_object* x_203; lean_object* x_204; lean_object* x_205; -x_201 = lean_ctor_get(x_196, 0); -x_202 = lean_ctor_get(x_196, 1); -lean_inc(x_202); -lean_inc(x_201); -lean_dec(x_196); -x_203 = lean_box(x_192); -x_204 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_interpretParserDescr___elambda__10___boxed), 9, 4); -lean_closure_set(x_204, 0, x_190); -lean_closure_set(x_204, 1, x_203); -lean_closure_set(x_204, 2, x_194); -lean_closure_set(x_204, 3, x_201); -x_205 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_205, 0, x_204); -lean_ctor_set(x_205, 1, x_202); -return x_205; -} -} -else -{ -uint8_t x_206; -lean_dec(x_194); -lean_dec(x_190); -x_206 = !lean_is_exclusive(x_196); -if (x_206 == 0) -{ -return x_196; -} -else +x_206 = lean_pretty_printer_parenthesizer_interpret_parser_descr(x_202, x_2, x_3, x_4); +if (lean_obj_tag(x_206) == 0) { lean_object* x_207; lean_object* x_208; lean_object* x_209; -x_207 = lean_ctor_get(x_196, 0); -x_208 = lean_ctor_get(x_196, 1); -lean_inc(x_208); +x_207 = lean_ctor_get(x_206, 0); lean_inc(x_207); -lean_dec(x_196); -x_209 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_209, 0, x_207); -lean_ctor_set(x_209, 1, x_208); -return x_209; -} -} -} -else +x_208 = lean_ctor_get(x_206, 1); +lean_inc(x_208); +lean_dec(x_206); +x_209 = lean_pretty_printer_parenthesizer_interpret_parser_descr(x_204, x_2, x_3, x_208); +if (lean_obj_tag(x_209) == 0) { uint8_t x_210; -lean_dec(x_191); -lean_dec(x_190); -lean_dec(x_3); -lean_dec(x_2); -x_210 = !lean_is_exclusive(x_193); +x_210 = !lean_is_exclusive(x_209); if (x_210 == 0) { -return x_193; +lean_object* x_211; lean_object* x_212; lean_object* x_213; +x_211 = lean_ctor_get(x_209, 0); +x_212 = lean_box(x_205); +x_213 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_interpretParserDescr___elambda__10___boxed), 9, 4); +lean_closure_set(x_213, 0, x_203); +lean_closure_set(x_213, 1, x_212); +lean_closure_set(x_213, 2, x_207); +lean_closure_set(x_213, 3, x_211); +lean_ctor_set(x_209, 0, x_213); +return x_209; } else { -lean_object* x_211; lean_object* x_212; lean_object* x_213; -x_211 = lean_ctor_get(x_193, 0); -x_212 = lean_ctor_get(x_193, 1); -lean_inc(x_212); -lean_inc(x_211); -lean_dec(x_193); -x_213 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_213, 0, x_211); -lean_ctor_set(x_213, 1, x_212); -return x_213; +lean_object* x_214; lean_object* x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; +x_214 = lean_ctor_get(x_209, 0); +x_215 = lean_ctor_get(x_209, 1); +lean_inc(x_215); +lean_inc(x_214); +lean_dec(x_209); +x_216 = lean_box(x_205); +x_217 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_interpretParserDescr___elambda__10___boxed), 9, 4); +lean_closure_set(x_217, 0, x_203); +lean_closure_set(x_217, 1, x_216); +lean_closure_set(x_217, 2, x_207); +lean_closure_set(x_217, 3, x_214); +x_218 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_218, 0, x_217); +lean_ctor_set(x_218, 1, x_215); +return x_218; +} +} +else +{ +uint8_t x_219; +lean_dec(x_207); +lean_dec(x_203); +x_219 = !lean_is_exclusive(x_209); +if (x_219 == 0) +{ +return x_209; +} +else +{ +lean_object* x_220; lean_object* x_221; lean_object* x_222; +x_220 = lean_ctor_get(x_209, 0); +x_221 = lean_ctor_get(x_209, 1); +lean_inc(x_221); +lean_inc(x_220); +lean_dec(x_209); +x_222 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_222, 0, x_220); +lean_ctor_set(x_222, 1, x_221); +return x_222; +} +} +} +else +{ +uint8_t x_223; +lean_dec(x_204); +lean_dec(x_203); +lean_dec(x_3); +lean_dec(x_2); +x_223 = !lean_is_exclusive(x_206); +if (x_223 == 0) +{ +return x_206; +} +else +{ +lean_object* x_224; lean_object* x_225; lean_object* x_226; +x_224 = lean_ctor_get(x_206, 0); +x_225 = lean_ctor_get(x_206, 1); +lean_inc(x_225); +lean_inc(x_224); +lean_dec(x_206); +x_226 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_226, 0, x_224); +lean_ctor_set(x_226, 1, x_225); +return x_226; } } } @@ -7390,7 +7422,7 @@ LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Formatter_interpretParserDescr___e _start: { lean_object* x_8; -x_8 = l_Lean_PrettyPrinter_Formatter_node_formatter(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +x_8 = l_Lean_PrettyPrinter_Formatter_orelse_formatter(x_1, x_2, x_3, x_4, x_5, x_6, x_7); return x_8; } } @@ -7994,289 +8026,318 @@ return x_145; } case 9: { -lean_object* x_146; lean_object* x_147; lean_object* x_148; -x_146 = lean_ctor_get(x_1, 1); +lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; +x_146 = lean_ctor_get(x_1, 0); lean_inc(x_146); -x_147 = lean_ctor_get(x_1, 2); +x_147 = lean_ctor_get(x_1, 1); lean_inc(x_147); +x_148 = lean_ctor_get(x_1, 2); +lean_inc(x_148); lean_dec(x_1); -x_148 = lean_pretty_printer_formatter_interpret_parser_descr(x_147, x_2, x_3, x_4); -if (lean_obj_tag(x_148) == 0) +x_149 = lean_pretty_printer_formatter_interpret_parser_descr(x_148, x_2, x_3, x_4); +if (lean_obj_tag(x_149) == 0) { -uint8_t x_149; -x_149 = !lean_is_exclusive(x_148); -if (x_149 == 0) +uint8_t x_150; +x_150 = !lean_is_exclusive(x_149); +if (x_150 == 0) { -lean_object* x_150; lean_object* x_151; -x_150 = lean_ctor_get(x_148, 0); -x_151 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_interpretParserDescr___elambda__8), 7, 2); -lean_closure_set(x_151, 0, x_146); -lean_closure_set(x_151, 1, x_150); -lean_ctor_set(x_148, 0, x_151); -return x_148; +lean_object* x_151; uint8_t x_152; uint8_t x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; +x_151 = lean_ctor_get(x_149, 0); +x_152 = 1; +x_153 = 0; +x_154 = lean_box(x_152); +x_155 = lean_box(x_153); +lean_inc(x_147); +x_156 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_mkAntiquot_formatter_x27___boxed), 9, 4); +lean_closure_set(x_156, 0, x_146); +lean_closure_set(x_156, 1, x_147); +lean_closure_set(x_156, 2, x_154); +lean_closure_set(x_156, 3, x_155); +x_157 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_node_formatter), 7, 2); +lean_closure_set(x_157, 0, x_147); +lean_closure_set(x_157, 1, x_151); +x_158 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_interpretParserDescr___elambda__8), 7, 2); +lean_closure_set(x_158, 0, x_156); +lean_closure_set(x_158, 1, x_157); +lean_ctor_set(x_149, 0, x_158); +return x_149; } else { -lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; -x_152 = lean_ctor_get(x_148, 0); -x_153 = lean_ctor_get(x_148, 1); -lean_inc(x_153); -lean_inc(x_152); -lean_dec(x_148); -x_154 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_interpretParserDescr___elambda__8), 7, 2); -lean_closure_set(x_154, 0, x_146); -lean_closure_set(x_154, 1, x_152); -x_155 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_155, 0, x_154); -lean_ctor_set(x_155, 1, x_153); -return x_155; +lean_object* x_159; lean_object* x_160; uint8_t x_161; uint8_t x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; +x_159 = lean_ctor_get(x_149, 0); +x_160 = lean_ctor_get(x_149, 1); +lean_inc(x_160); +lean_inc(x_159); +lean_dec(x_149); +x_161 = 1; +x_162 = 0; +x_163 = lean_box(x_161); +x_164 = lean_box(x_162); +lean_inc(x_147); +x_165 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_mkAntiquot_formatter_x27___boxed), 9, 4); +lean_closure_set(x_165, 0, x_146); +lean_closure_set(x_165, 1, x_147); +lean_closure_set(x_165, 2, x_163); +lean_closure_set(x_165, 3, x_164); +x_166 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_node_formatter), 7, 2); +lean_closure_set(x_166, 0, x_147); +lean_closure_set(x_166, 1, x_159); +x_167 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_interpretParserDescr___elambda__8), 7, 2); +lean_closure_set(x_167, 0, x_165); +lean_closure_set(x_167, 1, x_166); +x_168 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_168, 0, x_167); +lean_ctor_set(x_168, 1, x_160); +return x_168; } } else { -uint8_t x_156; +uint8_t x_169; +lean_dec(x_147); lean_dec(x_146); -x_156 = !lean_is_exclusive(x_148); -if (x_156 == 0) +x_169 = !lean_is_exclusive(x_149); +if (x_169 == 0) { -return x_148; +return x_149; } else { -lean_object* x_157; lean_object* x_158; lean_object* x_159; -x_157 = lean_ctor_get(x_148, 0); -x_158 = lean_ctor_get(x_148, 1); -lean_inc(x_158); -lean_inc(x_157); -lean_dec(x_148); -x_159 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_159, 0, x_157); -lean_ctor_set(x_159, 1, x_158); -return x_159; +lean_object* x_170; lean_object* x_171; lean_object* x_172; +x_170 = lean_ctor_get(x_149, 0); +x_171 = lean_ctor_get(x_149, 1); +lean_inc(x_171); +lean_inc(x_170); +lean_dec(x_149); +x_172 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_172, 0, x_170); +lean_ctor_set(x_172, 1, x_171); +return x_172; } } } case 10: { -lean_object* x_160; lean_object* x_161; lean_object* x_162; uint8_t x_163; lean_object* x_164; -x_160 = lean_ctor_get(x_1, 0); -lean_inc(x_160); -x_161 = lean_ctor_get(x_1, 1); -lean_inc(x_161); -x_162 = lean_ctor_get(x_1, 2); -lean_inc(x_162); -x_163 = lean_ctor_get_uint8(x_1, sizeof(void*)*3); +lean_object* x_173; lean_object* x_174; lean_object* x_175; uint8_t x_176; lean_object* x_177; +x_173 = lean_ctor_get(x_1, 0); +lean_inc(x_173); +x_174 = lean_ctor_get(x_1, 1); +lean_inc(x_174); +x_175 = lean_ctor_get(x_1, 2); +lean_inc(x_175); +x_176 = lean_ctor_get_uint8(x_1, sizeof(void*)*3); lean_dec(x_1); lean_inc(x_3); lean_inc(x_2); -x_164 = lean_pretty_printer_formatter_interpret_parser_descr(x_160, x_2, x_3, x_4); -if (lean_obj_tag(x_164) == 0) -{ -lean_object* x_165; lean_object* x_166; lean_object* x_167; -x_165 = lean_ctor_get(x_164, 0); -lean_inc(x_165); -x_166 = lean_ctor_get(x_164, 1); -lean_inc(x_166); -lean_dec(x_164); -x_167 = lean_pretty_printer_formatter_interpret_parser_descr(x_162, x_2, x_3, x_166); -if (lean_obj_tag(x_167) == 0) -{ -uint8_t x_168; -x_168 = !lean_is_exclusive(x_167); -if (x_168 == 0) -{ -lean_object* x_169; lean_object* x_170; lean_object* x_171; -x_169 = lean_ctor_get(x_167, 0); -x_170 = lean_box(x_163); -x_171 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_interpretParserDescr___elambda__9___boxed), 9, 4); -lean_closure_set(x_171, 0, x_161); -lean_closure_set(x_171, 1, x_170); -lean_closure_set(x_171, 2, x_165); -lean_closure_set(x_171, 3, x_169); -lean_ctor_set(x_167, 0, x_171); -return x_167; -} -else -{ -lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_object* x_176; -x_172 = lean_ctor_get(x_167, 0); -x_173 = lean_ctor_get(x_167, 1); -lean_inc(x_173); -lean_inc(x_172); -lean_dec(x_167); -x_174 = lean_box(x_163); -x_175 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_interpretParserDescr___elambda__9___boxed), 9, 4); -lean_closure_set(x_175, 0, x_161); -lean_closure_set(x_175, 1, x_174); -lean_closure_set(x_175, 2, x_165); -lean_closure_set(x_175, 3, x_172); -x_176 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_176, 0, x_175); -lean_ctor_set(x_176, 1, x_173); -return x_176; -} -} -else -{ -uint8_t x_177; -lean_dec(x_165); -lean_dec(x_161); -x_177 = !lean_is_exclusive(x_167); -if (x_177 == 0) -{ -return x_167; -} -else +x_177 = lean_pretty_printer_formatter_interpret_parser_descr(x_173, x_2, x_3, x_4); +if (lean_obj_tag(x_177) == 0) { lean_object* x_178; lean_object* x_179; lean_object* x_180; -x_178 = lean_ctor_get(x_167, 0); -x_179 = lean_ctor_get(x_167, 1); -lean_inc(x_179); +x_178 = lean_ctor_get(x_177, 0); lean_inc(x_178); -lean_dec(x_167); -x_180 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_180, 0, x_178); -lean_ctor_set(x_180, 1, x_179); -return x_180; -} -} -} -else +x_179 = lean_ctor_get(x_177, 1); +lean_inc(x_179); +lean_dec(x_177); +x_180 = lean_pretty_printer_formatter_interpret_parser_descr(x_175, x_2, x_3, x_179); +if (lean_obj_tag(x_180) == 0) { uint8_t x_181; -lean_dec(x_162); -lean_dec(x_161); -lean_dec(x_3); -lean_dec(x_2); -x_181 = !lean_is_exclusive(x_164); +x_181 = !lean_is_exclusive(x_180); if (x_181 == 0) { -return x_164; +lean_object* x_182; lean_object* x_183; lean_object* x_184; +x_182 = lean_ctor_get(x_180, 0); +x_183 = lean_box(x_176); +x_184 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_interpretParserDescr___elambda__9___boxed), 9, 4); +lean_closure_set(x_184, 0, x_174); +lean_closure_set(x_184, 1, x_183); +lean_closure_set(x_184, 2, x_178); +lean_closure_set(x_184, 3, x_182); +lean_ctor_set(x_180, 0, x_184); +return x_180; } else { -lean_object* x_182; lean_object* x_183; lean_object* x_184; -x_182 = lean_ctor_get(x_164, 0); -x_183 = lean_ctor_get(x_164, 1); -lean_inc(x_183); -lean_inc(x_182); -lean_dec(x_164); -x_184 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_184, 0, x_182); -lean_ctor_set(x_184, 1, x_183); -return x_184; +lean_object* x_185; lean_object* x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; +x_185 = lean_ctor_get(x_180, 0); +x_186 = lean_ctor_get(x_180, 1); +lean_inc(x_186); +lean_inc(x_185); +lean_dec(x_180); +x_187 = lean_box(x_176); +x_188 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_interpretParserDescr___elambda__9___boxed), 9, 4); +lean_closure_set(x_188, 0, x_174); +lean_closure_set(x_188, 1, x_187); +lean_closure_set(x_188, 2, x_178); +lean_closure_set(x_188, 3, x_185); +x_189 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_189, 0, x_188); +lean_ctor_set(x_189, 1, x_186); +return x_189; +} +} +else +{ +uint8_t x_190; +lean_dec(x_178); +lean_dec(x_174); +x_190 = !lean_is_exclusive(x_180); +if (x_190 == 0) +{ +return x_180; +} +else +{ +lean_object* x_191; lean_object* x_192; lean_object* x_193; +x_191 = lean_ctor_get(x_180, 0); +x_192 = lean_ctor_get(x_180, 1); +lean_inc(x_192); +lean_inc(x_191); +lean_dec(x_180); +x_193 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_193, 0, x_191); +lean_ctor_set(x_193, 1, x_192); +return x_193; +} +} +} +else +{ +uint8_t x_194; +lean_dec(x_175); +lean_dec(x_174); +lean_dec(x_3); +lean_dec(x_2); +x_194 = !lean_is_exclusive(x_177); +if (x_194 == 0) +{ +return x_177; +} +else +{ +lean_object* x_195; lean_object* x_196; lean_object* x_197; +x_195 = lean_ctor_get(x_177, 0); +x_196 = lean_ctor_get(x_177, 1); +lean_inc(x_196); +lean_inc(x_195); +lean_dec(x_177); +x_197 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_197, 0, x_195); +lean_ctor_set(x_197, 1, x_196); +return x_197; } } } default: { -lean_object* x_185; lean_object* x_186; lean_object* x_187; uint8_t x_188; lean_object* x_189; -x_185 = lean_ctor_get(x_1, 0); -lean_inc(x_185); -x_186 = lean_ctor_get(x_1, 1); -lean_inc(x_186); -x_187 = lean_ctor_get(x_1, 2); -lean_inc(x_187); -x_188 = lean_ctor_get_uint8(x_1, sizeof(void*)*3); +lean_object* x_198; lean_object* x_199; lean_object* x_200; uint8_t x_201; lean_object* x_202; +x_198 = lean_ctor_get(x_1, 0); +lean_inc(x_198); +x_199 = lean_ctor_get(x_1, 1); +lean_inc(x_199); +x_200 = lean_ctor_get(x_1, 2); +lean_inc(x_200); +x_201 = lean_ctor_get_uint8(x_1, sizeof(void*)*3); lean_dec(x_1); lean_inc(x_3); lean_inc(x_2); -x_189 = lean_pretty_printer_formatter_interpret_parser_descr(x_185, x_2, x_3, x_4); -if (lean_obj_tag(x_189) == 0) -{ -lean_object* x_190; lean_object* x_191; lean_object* x_192; -x_190 = lean_ctor_get(x_189, 0); -lean_inc(x_190); -x_191 = lean_ctor_get(x_189, 1); -lean_inc(x_191); -lean_dec(x_189); -x_192 = lean_pretty_printer_formatter_interpret_parser_descr(x_187, x_2, x_3, x_191); -if (lean_obj_tag(x_192) == 0) -{ -uint8_t x_193; -x_193 = !lean_is_exclusive(x_192); -if (x_193 == 0) -{ -lean_object* x_194; lean_object* x_195; lean_object* x_196; -x_194 = lean_ctor_get(x_192, 0); -x_195 = lean_box(x_188); -x_196 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_interpretParserDescr___elambda__10___boxed), 9, 4); -lean_closure_set(x_196, 0, x_186); -lean_closure_set(x_196, 1, x_195); -lean_closure_set(x_196, 2, x_190); -lean_closure_set(x_196, 3, x_194); -lean_ctor_set(x_192, 0, x_196); -return x_192; -} -else -{ -lean_object* x_197; lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_object* x_201; -x_197 = lean_ctor_get(x_192, 0); -x_198 = lean_ctor_get(x_192, 1); -lean_inc(x_198); -lean_inc(x_197); -lean_dec(x_192); -x_199 = lean_box(x_188); -x_200 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_interpretParserDescr___elambda__10___boxed), 9, 4); -lean_closure_set(x_200, 0, x_186); -lean_closure_set(x_200, 1, x_199); -lean_closure_set(x_200, 2, x_190); -lean_closure_set(x_200, 3, x_197); -x_201 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_201, 0, x_200); -lean_ctor_set(x_201, 1, x_198); -return x_201; -} -} -else -{ -uint8_t x_202; -lean_dec(x_190); -lean_dec(x_186); -x_202 = !lean_is_exclusive(x_192); -if (x_202 == 0) -{ -return x_192; -} -else +x_202 = lean_pretty_printer_formatter_interpret_parser_descr(x_198, x_2, x_3, x_4); +if (lean_obj_tag(x_202) == 0) { lean_object* x_203; lean_object* x_204; lean_object* x_205; -x_203 = lean_ctor_get(x_192, 0); -x_204 = lean_ctor_get(x_192, 1); -lean_inc(x_204); +x_203 = lean_ctor_get(x_202, 0); lean_inc(x_203); -lean_dec(x_192); -x_205 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_205, 0, x_203); -lean_ctor_set(x_205, 1, x_204); -return x_205; -} -} -} -else +x_204 = lean_ctor_get(x_202, 1); +lean_inc(x_204); +lean_dec(x_202); +x_205 = lean_pretty_printer_formatter_interpret_parser_descr(x_200, x_2, x_3, x_204); +if (lean_obj_tag(x_205) == 0) { uint8_t x_206; -lean_dec(x_187); -lean_dec(x_186); -lean_dec(x_3); -lean_dec(x_2); -x_206 = !lean_is_exclusive(x_189); +x_206 = !lean_is_exclusive(x_205); if (x_206 == 0) { -return x_189; +lean_object* x_207; lean_object* x_208; lean_object* x_209; +x_207 = lean_ctor_get(x_205, 0); +x_208 = lean_box(x_201); +x_209 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_interpretParserDescr___elambda__10___boxed), 9, 4); +lean_closure_set(x_209, 0, x_199); +lean_closure_set(x_209, 1, x_208); +lean_closure_set(x_209, 2, x_203); +lean_closure_set(x_209, 3, x_207); +lean_ctor_set(x_205, 0, x_209); +return x_205; } else { -lean_object* x_207; lean_object* x_208; lean_object* x_209; -x_207 = lean_ctor_get(x_189, 0); -x_208 = lean_ctor_get(x_189, 1); -lean_inc(x_208); -lean_inc(x_207); -lean_dec(x_189); -x_209 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_209, 0, x_207); -lean_ctor_set(x_209, 1, x_208); -return x_209; +lean_object* x_210; lean_object* x_211; lean_object* x_212; lean_object* x_213; lean_object* x_214; +x_210 = lean_ctor_get(x_205, 0); +x_211 = lean_ctor_get(x_205, 1); +lean_inc(x_211); +lean_inc(x_210); +lean_dec(x_205); +x_212 = lean_box(x_201); +x_213 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_interpretParserDescr___elambda__10___boxed), 9, 4); +lean_closure_set(x_213, 0, x_199); +lean_closure_set(x_213, 1, x_212); +lean_closure_set(x_213, 2, x_203); +lean_closure_set(x_213, 3, x_210); +x_214 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_214, 0, x_213); +lean_ctor_set(x_214, 1, x_211); +return x_214; +} +} +else +{ +uint8_t x_215; +lean_dec(x_203); +lean_dec(x_199); +x_215 = !lean_is_exclusive(x_205); +if (x_215 == 0) +{ +return x_205; +} +else +{ +lean_object* x_216; lean_object* x_217; lean_object* x_218; +x_216 = lean_ctor_get(x_205, 0); +x_217 = lean_ctor_get(x_205, 1); +lean_inc(x_217); +lean_inc(x_216); +lean_dec(x_205); +x_218 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_218, 0, x_216); +lean_ctor_set(x_218, 1, x_217); +return x_218; +} +} +} +else +{ +uint8_t x_219; +lean_dec(x_200); +lean_dec(x_199); +lean_dec(x_3); +lean_dec(x_2); +x_219 = !lean_is_exclusive(x_202); +if (x_219 == 0) +{ +return x_202; +} +else +{ +lean_object* x_220; lean_object* x_221; lean_object* x_222; +x_220 = lean_ctor_get(x_202, 0); +x_221 = lean_ctor_get(x_202, 1); +lean_inc(x_221); +lean_inc(x_220); +lean_dec(x_202); +x_222 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_222, 0, x_220); +lean_ctor_set(x_222, 1, x_221); +return x_222; } } } diff --git a/stage0/stdlib/Lean/Parser/Extra.c b/stage0/stdlib/Lean/Parser/Extra.c index dd28f741fa..2400e833a3 100644 --- a/stage0/stdlib/Lean/Parser/Extra.c +++ b/stage0/stdlib/Lean/Parser/Extra.c @@ -15,10 +15,10 @@ extern "C" { #endif static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__53; lean_object* l_List_reverse___rarg(lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__105; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__42; lean_object* l_Lean_PrettyPrinter_Formatter_rawIdentNoAntiquot_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_mkAntiquot_formatter___closed__2; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__123; static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__22; lean_object* l_Lean_PrettyPrinter_Parenthesizer_withoutInfo_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__16; @@ -30,16 +30,16 @@ static lean_object* l_List_forIn_loop___at_Lean_Parser_sepByIndent_formatter___s lean_object* l_Lean_PrettyPrinter_Formatter_visitArgs(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); size_t lean_usize_add(size_t, size_t); static lean_object* l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__6; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__16; LEAN_EXPORT lean_object* l_Lean_Parser_ppRealGroup_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__16; LEAN_EXPORT lean_object* l_List_forIn_loop___at_Lean_Parser_sepByIndent_formatter___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_checkLinebreakBefore(lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__115; lean_object* l_Lean_PrettyPrinter_Parenthesizer_categoryParser_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_mkAntiquot_formatter___closed__14; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__115; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__85; static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__28; lean_object* l_Lean_PrettyPrinter_Formatter_numLitNoAntiquot_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__85; LEAN_EXPORT lean_object* l_Lean_Parser_ppHardSpace_parenthesizer___rarg(lean_object*); static lean_object* l_Lean_Parser_optional___closed__1; static lean_object* l_Lean_Parser_commandParser_formatter___rarg___closed__2; @@ -50,26 +50,26 @@ LEAN_EXPORT lean_object* l_Lean_Parser_mkAntiquot_parenthesizer(lean_object*, le lean_object* lean_mk_empty_array_with_capacity(lean_object*); lean_object* l_Lean_Name_str___override(lean_object*, lean_object*); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__37; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__66; LEAN_EXPORT lean_object* l_Lean_Parser_ppSpace_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__30; lean_object* l_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__55; static lean_object* l_Lean_Parser_antiquotNestedExpr_formatter___closed__10; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__56; LEAN_EXPORT lean_object* l_Lean_ppHardSpace_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_ppGroup_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_node3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_rawIdentNoAntiquot_parenthesizer___boxed(lean_object*); lean_object* l_Lean_Parser_manyNoAntiquot(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_withAntiquot_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__77; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__20; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__56; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__66; static lean_object* l_Lean_Parser_mkAntiquotSplice_formatter___closed__6; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__117; LEAN_EXPORT lean_object* l_Lean_ppHardLineUnlessUngrouped_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__81; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__77; static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__5; extern lean_object* l_Lean_Parser_strLitNoAntiquot; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__87; lean_object* l_Lean_PrettyPrinter_Formatter_sepByNoAntiquot_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_many(lean_object*); LEAN_EXPORT lean_object* l_Array_mapIdxM_map___at_Lean_Parser_sepByIndent_formatter___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -77,9 +77,9 @@ static lean_object* l_Lean_Parser_mkAntiquot_parenthesizer___closed__10; lean_object* l_Lean_Syntax_getOptional_x3f(lean_object*); uint8_t lean_usize_dec_eq(size_t, size_t); lean_object* lean_array_uget(lean_object*, size_t); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__12; static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__16; static lean_object* l_Lean_Parser_antiquotExpr_formatter___closed__2; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__68; lean_object* l_Lean_PrettyPrinter_Parenthesizer_leadingNode_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_ppSpace_parenthesizer___rarg(lean_object*); static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__7; @@ -92,28 +92,31 @@ LEAN_EXPORT lean_object* l_Lean_Parser_symbol_formatter(lean_object*, lean_objec LEAN_EXPORT lean_object* l_Lean_Parser_charLit; static lean_object* l_Lean_Parser_mkAntiquot_formatter___closed__15; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__43; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__87; lean_object* l_Lean_SourceInfo_fromRef(lean_object*, uint8_t); lean_object* l_Lean_PrettyPrinter_Formatter_indent(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__116; lean_object* l_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_nameLitNoAntiquot; LEAN_EXPORT lean_object* l_Lean_Parser_ppAllowUngrouped_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__102; static lean_object* l_Lean_Parser_ident_formatter___closed__1; LEAN_EXPORT lean_object* l_Lean_Parser_sepBy_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_atomic_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__90; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__79; static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__18; static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__15; LEAN_EXPORT lean_object* l_Lean_Parser_group_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_manyNoAntiquot_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__12; LEAN_EXPORT lean_object* l_Lean_Parser_sepByIndent_parenthesizer(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__90; static lean_object* l_Lean_Parser_nameLit_formatter___closed__3; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__102; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__105; LEAN_EXPORT lean_object* l_Lean_Parser_ppDedentIfGrouped___boxed(lean_object*); extern lean_object* l_Lean_Parser_pushNone; static lean_object* l_Lean_Parser_ident_formatter___closed__2; lean_object* l_Lean_Syntax_node2(lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__116; LEAN_EXPORT lean_object* l_Lean_Parser_scientificLit; LEAN_EXPORT lean_object* l_Lean_ppSpace_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_sepBy1Indent_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -121,71 +124,74 @@ static lean_object* l_Lean_Parser_many_parenthesizer___closed__1; lean_object* l_Lean_PrettyPrinter_Formatter_orelse_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_group(lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_ident; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__51; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__51; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__118; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__19; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__51; lean_object* l_Lean_Parser_checkColGe(lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__35; lean_object* lean_st_ref_get(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_ppDedentIfGrouped(lean_object*); static lean_object* l_Lean_Parser_sepByElemParser_formatter___closed__3; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__19; LEAN_EXPORT lean_object* l_Lean_Parser_withAntiquotSpliceAndSuffix_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkColEq_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_antiquotNestedExpr_parenthesizer___closed__1; LEAN_EXPORT lean_object* l_Lean_Parser_sepByIndent___boxed(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__24; lean_object* l_Lean_mkIdentFrom(lean_object*, lean_object*, uint8_t); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__39; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__70; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__61; static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__33; static lean_object* l_Lean_Parser_strLit_formatter___closed__1; lean_object* l_Lean_Name_mkStr2(lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__65; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__109; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__70; static lean_object* l_Lean_Parser_mkAntiquot_formatter___closed__8; lean_object* l_Lean_PrettyPrinter_Parenthesizer_nameLitNoAntiquot_parenthesizer___boxed(lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__35; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__39; lean_object* lean_array_push(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_optional_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__109; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__65; lean_object* lean_array_get_size(lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_ppIndent_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_optional_formatter___closed__4; lean_object* l_ReaderT_bind___at_Lean_PrettyPrinter_Formatter_categoryFormatterCore___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_string_append(lean_object*, lean_object*); static lean_object* l_Lean_Parser_mkAntiquot_formatter___closed__9; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__36; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__63; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__120; lean_object* l_Lean_Name_mkStr3(lean_object*, lean_object*, lean_object*); lean_object* l_List_range(lean_object*); static lean_object* l_Lean_Parser_strLit_formatter___closed__2; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__59; static lean_object* l_Lean_Parser_mkAntiquot_formatter___closed__17; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__81; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__31; lean_object* l_Lean_Parser_notFollowedBy(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_unicodeSymbol_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__73; static lean_object* l_Lean_Parser_optional_formatter___closed__2; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__20; lean_object* l_Lean_Parser_withPosition(lean_object*); static lean_object* l_Lean_Parser_mkAntiquot_formatter___closed__1; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__98; static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__13; lean_object* l_Lean_PrettyPrinter_Formatter_nonReservedSymbolNoAntiquot_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__21; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__10; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__32; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__95; LEAN_EXPORT lean_object* l_Lean_Parser_sepBy1_formatter(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__98; lean_object* l_Lean_PrettyPrinter_Parenthesizer_numLitNoAntiquot_parenthesizer___boxed(lean_object*); static lean_object* l_Lean_Parser_antiquotNestedExpr_formatter___closed__5; lean_object* l_Lean_PrettyPrinter_Formatter_unicodeSymbolNoAntiquot_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__73; static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__23; static lean_object* l_Lean_Parser_antiquotNestedExpr_parenthesizer___closed__5; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__10; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__32; LEAN_EXPORT lean_object* l_Lean_Parser_antiquotNestedExpr_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__7; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__71; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__43; LEAN_EXPORT lean_object* l_Lean_Parser_group_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__38; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__21; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__107; lean_object* l_Lean_PrettyPrinter_Parenthesizer_scientificLitNoAntiquot_parenthesizer___boxed(lean_object*); static lean_object* l_Lean_Parser_antiquotNestedExpr_parenthesizer___closed__3; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__24; @@ -200,20 +206,18 @@ LEAN_EXPORT lean_object* l_Lean_Parser_many_formatter(lean_object*, lean_object* lean_object* l_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__49; LEAN_EXPORT lean_object* l_Lean_Parser_ppLine; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__19; static lean_object* l___regBuiltin_Lean_Parser_antiquotNestedExpr_parenthesizer___closed__2; static lean_object* l_Lean_Parser_strLit___closed__1; LEAN_EXPORT lean_object* l_Lean_Parser_rawIdent_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__21; static lean_object* l_Lean_Parser_strLit_formatter___closed__3; static lean_object* l_Lean_Parser_leadingNode_formatter___closed__1; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__38; LEAN_EXPORT lean_object* l_Lean_Parser_optional_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__107; static lean_object* l_Lean_Parser_antiquotNestedExpr_formatter___closed__3; LEAN_EXPORT lean_object* l_Lean_Parser_sepByIndent_formatter___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_sepByNoAntiquot_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__75; LEAN_EXPORT lean_object* l_Lean_Parser_sepBy1Indent_parenthesizer(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_Parser_patternIgnore_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29________; static lean_object* l_Lean_Parser_ident___closed__1; lean_object* l_Lean_PrettyPrinter_Parenthesizer_atomic_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -221,22 +225,22 @@ lean_object* lean_nat_add(lean_object*, lean_object*); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__75; static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__32; static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__10; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__114; LEAN_EXPORT lean_object* l_Lean_Parser_ppAllowUngrouped_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__26; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__26; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__58; LEAN_EXPORT lean_object* l_Lean_ppAllowUngrouped_formatter___boxed(lean_object*); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__58; lean_object* l_Lean_PrettyPrinter_Parenthesizer_unicodeSymbolNoAntiquot_parenthesizer___boxed(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_optional(lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__26; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__114; lean_object* l_Lean_PrettyPrinter_Formatter_fill(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_antiquotExpr_formatter___closed__3; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__112; static lean_object* l_Lean_Parser_sepByIndent___closed__5; static lean_object* l_Lean_Parser_numLit___closed__1; lean_object* l_Lean_Parser_registerAliasCore___rarg(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__20; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__61; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__75; lean_object* l_Lean_Syntax_node5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_checkColGe_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_ppIndent_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -247,29 +251,33 @@ lean_object* l_Lean_PrettyPrinter_Parenthesizer_setExpected_parenthesizer___rarg LEAN_EXPORT lean_object* l_Lean_Parser_termParser_formatter___boxed(lean_object*); static lean_object* l_Lean_Parser_ident_formatter___closed__3; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__68; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__61; LEAN_EXPORT uint8_t l_Array_anyMUnsafe_any___at_Lean_Parser_sepByIndent_formatter___spec__3(lean_object*, size_t, size_t); LEAN_EXPORT lean_object* l_Lean_ppHardLineUnlessUngrouped_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_numLit___closed__2; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__113; static lean_object* l_Lean_Parser_antiquotNestedExpr_parenthesizer___closed__2; static lean_object* l_Lean_Parser_mkAntiquotSplice_formatter___closed__7; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__112; lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__11; lean_object* l_Lean_PrettyPrinter_Formatter_tokenWithAntiquot_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__83; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__36; lean_object* lean_array_fget(lean_object*, lean_object*); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__69; LEAN_EXPORT lean_object* l_Lean_Parser_ppSpace_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_mkAntiquotSplice_parenthesizer___closed__1; static lean_object* l_Lean_Parser_ident___closed__2; uint8_t lean_nat_dec_eq(lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__104; LEAN_EXPORT lean_object* l_Lean_Parser_sepByElemParser_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__40; static lean_object* l_Lean_Parser_group_formatter___closed__2; LEAN_EXPORT lean_object* l_Lean_Parser_ppHardSpace_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__83; static lean_object* l_Lean_Parser_antiquotNestedExpr_formatter___closed__7; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__67; static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__12; LEAN_EXPORT lean_object* l_Lean_ppRealFill_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__104; static lean_object* l_Lean_Parser_charLit_formatter___closed__2; lean_object* l___private_Init_Meta_0__Lean_getEscapedNameParts_x3f(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_mkAntiquotSplice_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -281,21 +289,20 @@ static lean_object* l_Lean_Parser_strLit_parenthesizer___closed__2; lean_object* lean_st_ref_take(lean_object*, lean_object*); static lean_object* l_Lean_Parser_strLit_parenthesizer___closed__1; LEAN_EXPORT lean_object* l_Lean_Parser_charLit_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__9; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__27; static lean_object* l_Lean_Parser_charLit_formatter___closed__4; LEAN_EXPORT lean_object* l_Lean_ppAllowUngrouped_formatter___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_nat_sub(lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__67; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__45; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__40; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__27; lean_object* l_Lean_PrettyPrinter_Parenthesizer_nonReservedSymbolNoAntiquot_parenthesizer___boxed(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_scientificLit_formatter___closed__3; LEAN_EXPORT lean_object* l_Lean_Parser_scientificLit_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__58; static lean_object* l_Lean_Parser_mkAntiquotSplice_parenthesizer___closed__2; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__9; LEAN_EXPORT lean_object* l_Lean_Parser_strLit_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_checkPrec_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1(lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__45; lean_object* l_Lean_PrettyPrinter_Formatter_decQuotDepth_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_visitArgs(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__44; @@ -309,17 +316,18 @@ static lean_object* l_Lean_Parser_sepByElemParser_formatter___closed__1; LEAN_EXPORT lean_object* l_Lean_Parser_notSymbol_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_withAntiquot(lean_object*, lean_object*); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__23; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__41; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__13; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__23; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__88; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__13; lean_object* l_Lean_Parser_symbol(lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__96; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__23; lean_object* l_Lean_Name_toString(lean_object*, uint8_t); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__8; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__72; LEAN_EXPORT lean_object* l_Lean_Parser_ppHardSpace_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_many___closed__1; LEAN_EXPORT lean_object* l_Lean_Parser_many1_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__96; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__72; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__64; static lean_object* l_Lean_Parser_mkAntiquotSplice_formatter___closed__5; LEAN_EXPORT lean_object* l_Lean_Parser_sepByIndent_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -329,19 +337,18 @@ extern lean_object* l_Lean_Parser_skip; LEAN_EXPORT lean_object* l_Lean_Parser_nameLit; lean_object* l_Lean_PrettyPrinter_Formatter_node_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_sepByIndent_formatter___closed__1; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__48; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__111; static lean_object* l_Lean_Parser_many1Indent_formatter___closed__1; LEAN_EXPORT lean_object* l_List_forIn_loop___at_Lean_Parser_sepByIndent_formatter___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__48; LEAN_EXPORT lean_object* l_Array_anyMUnsafe_any___at_Lean_Parser_sepByIndent_formatter___spec__3___boxed(lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__34; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__1; static lean_object* l_Lean_Parser_strLit_formatter___closed__4; static lean_object* l_Lean_Parser_mkAntiquot_formatter___closed__6; LEAN_EXPORT lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__111; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__34; static lean_object* l___regBuiltin_Lean_Parser_antiquotNestedExpr_parenthesizer___closed__3; lean_object* l_Lean_PrettyPrinter_Parenthesizer_charLitNoAntiquot_parenthesizer___boxed(lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__59; static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__14; LEAN_EXPORT lean_object* l_Lean_Parser_manyIndent(lean_object*); static lean_object* l_Lean_Parser_nameLit___closed__1; @@ -352,38 +359,38 @@ static lean_object* l_Lean_Parser_numLit_formatter___closed__4; LEAN_EXPORT lean_object* l_Lean_Parser_ppSpace; LEAN_EXPORT lean_object* l_Lean_Parser_ppHardSpace; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__2; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__31; static lean_object* l_Lean_Parser_nameLit___closed__2; LEAN_EXPORT lean_object* l_Lean_Parser_termParser_formatter___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_sepByElemParser_formatter___closed__2; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__31; LEAN_EXPORT lean_object* l_Lean_Parser_ppIndent(lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_scientificLit_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_ppRealFill(lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_commandParser_formatter___boxed(lean_object*); static lean_object* l_Lean_Parser_mkAntiquotSplice_formatter___closed__3; lean_object* l_Lean_Syntax_getId(lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__113; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__13; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__59; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__18; extern lean_object* l_Lean_Parser_maxPrec; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__41; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__103; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__121; LEAN_EXPORT lean_object* l_Lean_Parser_strLit_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_rawIdent; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__76; static lean_object* l_Lean_Parser_antiquotExpr_parenthesizer___closed__2; LEAN_EXPORT lean_object* l_Lean_Parser_ppDedent(lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__30; static lean_object* l_Lean_Parser_sepByIndent_parenthesizer___closed__1; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__5; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__14; LEAN_EXPORT lean_object* l_Lean_Parser_many1Indent_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__76; LEAN_EXPORT lean_object* l_Lean_Parser_nodeWithAntiquot_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__28; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__88; LEAN_EXPORT lean_object* l_Lean_Parser_sepByIndent(lean_object*, lean_object*, lean_object*, uint8_t); static lean_object* l_Lean_Parser_charLit___closed__2; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__12; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__28; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__14; LEAN_EXPORT lean_object* l_Lean_Parser_sepByIndent_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_scientificLitNoAntiquot_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__30; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__18; extern lean_object* l_Lean_PrettyPrinter_formatterAttribute; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__65; LEAN_EXPORT lean_object* l_Lean_Parser_ppLine_parenthesizer___rarg(lean_object*); @@ -391,15 +398,16 @@ lean_object* l_Lean_Syntax_mkStrLit(lean_object*, lean_object*); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__57; static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__31; static lean_object* l_Lean_Parser_mkAntiquot_formatter___closed__10; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__4; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__4; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__94; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__8; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__17; static lean_object* l_Lean_Parser_sepByIndent___closed__1; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__8; static lean_object* l_Lean_Parser_antiquotExpr_parenthesizer___closed__1; static lean_object* l_Lean_Parser_optional_formatter___closed__3; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__57; static lean_object* l_Lean_Parser_sepByIndent___closed__4; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__17; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__122; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__57; LEAN_EXPORT lean_object* l_Lean_Parser_ppDedentIfGrouped_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__39; lean_object* l_Lean_PrettyPrinter_Parenthesizer_pushNone_parenthesizer___boxed(lean_object*); @@ -408,27 +416,26 @@ static lean_object* l_Lean_Parser_numLit_formatter___closed__3; static lean_object* l___regBuiltin_Lean_Parser_antiquotNestedExpr_parenthesizer___closed__4; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__70; static lean_object* l_Lean_Parser_mkAntiquot_parenthesizer___closed__9; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__1; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__35; static lean_object* l_Lean_Parser_numLit_parenthesizer___closed__2; static lean_object* l_Lean_ppHardSpace_formatter___closed__2; lean_object* l_Lean_Parser_checkColEq(lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__44; LEAN_EXPORT lean_object* l_Lean_Parser_ppIndent___boxed(lean_object*); static lean_object* l_Lean_Parser_optional_parenthesizer___closed__1; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__2; static lean_object* l_Lean_Parser_antiquotNestedExpr_formatter___closed__1; static lean_object* l_Lean_Parser_mkAntiquot_formatter___closed__11; lean_object* l_Lean_Syntax_MonadTraverser_goLeft___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__44; LEAN_EXPORT lean_object* l_Lean_Parser_nonReservedSymbol_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_mkAntiquot_parenthesizer___closed__4; LEAN_EXPORT lean_object* l_Lean_Parser_sepBy1_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__97; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__1; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__36; LEAN_EXPORT lean_object* l_Lean_Parser_commandParser_formatter(lean_object*); static lean_object* l_Lean_Parser_rawIdent_parenthesizer___closed__1; lean_object* l_Lean_Parser_registerAlias(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); size_t lean_usize_of_nat(lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__99; static lean_object* l_Lean_Parser_antiquotNestedExpr_parenthesizer___closed__6; LEAN_EXPORT lean_object* l_Lean_Parser_ppRealGroup(lean_object*); static lean_object* l_Lean_ppHardSpace_formatter___closed__1; @@ -436,49 +443,51 @@ static lean_object* l_Lean_Parser_numLit_parenthesizer___closed__1; lean_object* l_Lean_addMacroScope(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_mkAntiquot_parenthesizer___closed__2; lean_object* l_Lean_PrettyPrinter_Formatter_nameLitNoAntiquot_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__99; static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__27; static lean_object* l_Lean_Parser_antiquotNestedExpr_formatter___closed__6; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__74; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__50; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__46; LEAN_EXPORT lean_object* l_Lean_Parser_mkAntiquot_formatter(lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__47; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__60; LEAN_EXPORT lean_object* l_Lean_ppHardSpace_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_many1_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__17; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__50; LEAN_EXPORT lean_object* l_Lean_Parser_ppAllowUngrouped; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__86; LEAN_EXPORT lean_object* l_Lean_Parser_notSymbol(lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__80; LEAN_EXPORT lean_object* l_Lean_Parser_sepByElemParser_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_antiquotNestedExpr_formatter___closed__2; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__94; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__80; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__6; lean_object* l_Lean_Syntax_node6(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__6; LEAN_EXPORT lean_object* l_Lean_Parser_termParser_formatter(lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__46; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__41; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__86; LEAN_EXPORT lean_object* l_Lean_Parser_mkAntiquot_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_sepBy1(lean_object*, lean_object*, lean_object*, uint8_t); static lean_object* l_Lean_Parser_sepByIndent___closed__2; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__110; LEAN_EXPORT lean_object* l_Lean_Parser_ppLine_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__17; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__21; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__110; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__38; LEAN_EXPORT lean_object* l_Lean_Parser_sepBy1Indent_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_mkAntiquot_parenthesizer___closed__1; static lean_object* l_Lean_Parser_sepByIndent_parenthesizer___closed__2; LEAN_EXPORT lean_object* l_Lean_Parser_commandParser_formatter___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_many_formatter___closed__3; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__15; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__15; lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__3; static lean_object* l_Lean_Parser_nameLit_parenthesizer___closed__1; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__3; lean_object* l_String_intercalate(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_numLit; static lean_object* l_Lean_Parser_charLit_formatter___closed__1; static lean_object* l_Lean_Parser_antiquotExpr_parenthesizer___closed__3; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__3; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__37; lean_object* l_Lean_Macro_throwError___rarg(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_scientificLitNoAntiquot; LEAN_EXPORT lean_object* l_Lean_Parser_ppHardLineUnlessUngrouped; @@ -486,54 +495,53 @@ static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Le lean_object* l_Lean_PrettyPrinter_Parenthesizer_decQuotDepth_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_ppDedent___boxed(lean_object*); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__52; -LEAN_EXPORT lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104_(lean_object*); +LEAN_EXPORT lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111_(lean_object*); extern lean_object* l_Lean_PrettyPrinter_Formatter_formatterAliasesRef; LEAN_EXPORT lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__42; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__55; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__54; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__62; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__78; lean_object* l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter___boxed(lean_object*); static lean_object* l_Lean_Parser_sepByIndent___closed__3; static lean_object* l_List_forIn_loop___at_Lean_Parser_sepByIndent_formatter___spec__2___closed__2; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__53; LEAN_EXPORT lean_object* l_Lean_ppDedentIfGrouped_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__100; uint8_t lean_nat_dec_le(lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__37; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__53; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__42; static lean_object* l_Lean_Parser_termParser_formatter___rarg___closed__2; LEAN_EXPORT lean_object* l_Lean_Parser_ppGroup_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__9; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__55; LEAN_EXPORT lean_object* l_Lean_Parser_commandParser_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_scientificLit_parenthesizer___closed__2; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__100; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__33; static lean_object* l_Lean_Parser_mkAntiquot_formatter___closed__16; static lean_object* l_Lean_Parser_group_formatter___closed__1; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__47; lean_object* l_Lean_Syntax_getArgs(lean_object*); lean_object* l_Lean_Name_append(lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__60; lean_object* l_Lean_Parser_many1NoAntiquot(lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__89; lean_object* l_Lean_Macro_resolveGlobalName(lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__97; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__22; static lean_object* l_Lean_Parser_termParser_formatter___rarg___closed__1; extern lean_object* l_Lean_Parser_numLitNoAntiquot; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__74; static lean_object* l_Lean_Parser_mkAntiquot_formatter___closed__7; +static lean_object* l_Lean_Parser_patternIgnore_formatter___closed__2; lean_object* l_Lean_quoteNameMk(lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__64; static lean_object* l_Lean_Parser_nameLit_parenthesizer___closed__2; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__74; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__89; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__2; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__60; LEAN_EXPORT lean_object* l_Lean_ppAllowUngrouped_formatter(lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__47; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__64; lean_object* l_String_toSubstring_x27(lean_object*); static lean_object* l_Lean_Parser_charLit_parenthesizer___closed__1; LEAN_EXPORT lean_object* l_Lean_Parser_charLit_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_mkAntiquot_parenthesizer___closed__6; static lean_object* l_Lean_Parser_charLit_parenthesizer___closed__2; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__45; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__79; static lean_object* l_Lean_Parser_charLit_formatter___closed__3; LEAN_EXPORT lean_object* l_Lean_Parser_notSymbol_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__67; @@ -541,20 +549,21 @@ LEAN_EXPORT lean_object* l_Lean_ppLine_formatter(lean_object*, lean_object*, lea static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__40; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__9; static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__4; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__95; LEAN_EXPORT lean_object* l_Lean_Parser_many1Indent(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoImmediateColon_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_identNoAntiquot_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__101; static lean_object* l_Lean_ppDedent_formatter___closed__1; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__27; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__101; lean_object* l_Lean_PrettyPrinter_Formatter_pushNone_formatter___boxed(lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_sepByIndent_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__4; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__43; extern lean_object* l_Lean_Parser_rawIdentNoAntiquot; lean_object* l_Std_Format_getIndent(lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__79; static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__35; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__84; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__29; LEAN_EXPORT lean_object* l_Lean_Parser_notSymbol_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_sepBy_formatter(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_antiquotNestedExpr_formatter___closed__9; @@ -569,12 +578,13 @@ LEAN_EXPORT lean_object* l_Lean_Parser_antiquotExpr_parenthesizer(lean_object*, LEAN_EXPORT lean_object* l_Lean_Parser_ident_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_optional_formatter___closed__1; uint8_t lean_nat_dec_eq(lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__54; lean_object* l_Lean_PrettyPrinter_Formatter_checkNoImmediateColon_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_sepBy1Indent(lean_object*, lean_object*, lean_object*, uint8_t); static lean_object* l_Lean_Parser_sepByIndent_parenthesizer___closed__4; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__25; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__29; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__62; LEAN_EXPORT lean_object* l_Lean_Parser_mkAntiquotSplice_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__25; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__34; static lean_object* l_Lean_Parser_mkAntiquotSplice_formatter___closed__1; lean_object* l_Lean_PrettyPrinter_Parenthesizer_symbolNoAntiquot_parenthesizer___boxed(lean_object*, lean_object*); @@ -583,19 +593,17 @@ LEAN_EXPORT lean_object* l_Lean_Parser_sepBy1_formatter___boxed(lean_object*, le static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__2; uint8_t l_Lean_Syntax_isNone(lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_numLit_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__78; static lean_object* l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__2; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__91; LEAN_EXPORT lean_object* l_Lean_ppSpace_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__119; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__48; static lean_object* l_Lean_Parser_scientificLit_formatter___closed__4; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__84; lean_object* l_Lean_Syntax_node1(lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__62; lean_object* l_String_trim(lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_fold(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__52; static lean_object* l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__4; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__54; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__52; lean_object* l_Lean_PrettyPrinter_Formatter_withoutInfo_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_many_formatter___closed__2; lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkLinebreakBefore_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -617,37 +625,37 @@ static lean_object* l_Lean_Parser_rawIdent___closed__1; static lean_object* l_Lean_Parser_many_formatter___closed__1; static lean_object* l_Lean_Parser_scientificLit_formatter___closed__2; static lean_object* l_Lean_Parser_mkAntiquotSplice_formatter___closed__4; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__108; lean_object* l_Lean_PrettyPrinter_Formatter_charLitNoAntiquot_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_mkAntiquot_formatter___closed__13; LEAN_EXPORT lean_object* l_Lean_Parser_withAntiquotSpliceAndSuffix_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkAntiquot(lean_object*, lean_object*, uint8_t, uint8_t); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__14; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__24; lean_object* l_Lean_PrettyPrinter_Parenthesizer_withPosition_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__28; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__63; static lean_object* l_Lean_Parser_nameLit_formatter___closed__2; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__106; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__7; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__108; LEAN_EXPORT lean_object* l_Lean_Parser_ppGroup(lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__71; static lean_object* l_Lean_Parser_antiquotNestedExpr_parenthesizer___closed__4; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__5; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__63; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__49; lean_object* l_Lean_Syntax_getArg(lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__106; lean_object* l_Lean_PrettyPrinter_Formatter_pushWhitespace(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__1; LEAN_EXPORT lean_object* l_Lean_Parser_many_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__30; static lean_object* l_Lean_Parser_antiquotNestedExpr_formatter___closed__4; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__7; static lean_object* l_Lean_Parser_ident_parenthesizer___closed__1; static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__8; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__76; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__71; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__18; LEAN_EXPORT lean_object* l_Lean_Parser_ppRealFill___boxed(lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__24; lean_object* lean_nat_mod(lean_object*, lean_object*); LEAN_EXPORT lean_object* l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter(lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__49; lean_object* l_Lean_Parser_orelse(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_sepBy1Indent___boxed(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_ppHardLineUnlessUngrouped_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*); @@ -669,52 +677,57 @@ static lean_object* l_Lean_Parser_sepByIndent_parenthesizer___closed__3; static lean_object* l_Lean_Parser_antiquotExpr_formatter___closed__4; LEAN_EXPORT lean_object* l_Lean_Parser_mkAntiquotSplice_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Name_mkStr4(lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_Parser_patternIgnore(lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_notSymbol_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_nonReservedSymbol_formatter(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_antiquotExpr_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_mapIdxM_map___at_Lean_Parser_sepByIndent_formatter___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_ppRealGroup___boxed(lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__68; static lean_object* l_Lean_Parser_antiquotNestedExpr_formatter___closed__8; extern lean_object* l_Lean_PrettyPrinter_backtrackExceptionId; LEAN_EXPORT lean_object* l_Lean_ppRealGroup_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_numLit_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__92; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__77; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__92; LEAN_EXPORT lean_object* l_Lean_Parser_sepBy_parenthesizer(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_mkAntiquot_parenthesizer___closed__5; static lean_object* l_Lean_Parser_nameLit_formatter___closed__4; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__124; LEAN_EXPORT lean_object* l_Lean_Parser_sepByIndent_formatter___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_patternIgnore_formatter___closed__1; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__81; lean_object* l_Lean_PrettyPrinter_Formatter_withAntiquotSuffixSplice_formatter___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Formatter_setLhsPrec_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_ident_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__11; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__22; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__33; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__73; static lean_object* l_List_forIn_loop___at_Lean_Parser_sepByIndent_formatter___spec__2___closed__4; static lean_object* l_Lean_Parser_scientificLit___closed__2; static lean_object* l_Lean_Parser_many1Indent___closed__1; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__93; static lean_object* l_Lean_ppDedentIfGrouped_formatter___closed__1; static lean_object* l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__5; LEAN_EXPORT lean_object* l_Lean_Parser_symbol_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__10; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__32; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__33; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__78; lean_object* l_Lean_PrettyPrinter_Parenthesizer_tokenWithAntiquot_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__20; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__91; lean_object* l_Lean_PrettyPrinter_Formatter_group(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_nameLit_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_Parser_patternIgnore_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_nat_to_int(lean_object*); static lean_object* l_Lean_Parser_scientificLit_parenthesizer___closed__1; extern lean_object* l_Lean_Parser_charLitNoAntiquot; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__5; LEAN_EXPORT lean_object* l_Lean_ppAllowUngrouped_formatter___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_mkAntiquot_parenthesizer___closed__7; static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__19; LEAN_EXPORT lean_object* l_Lean_Parser_nonReservedSymbol_parenthesizer(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__93; LEAN_EXPORT lean_object* l_Lean_Parser_notSymbol_parenthesizer___rarg(lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__103; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__22; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__6; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__80; static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__25; @@ -722,16 +735,16 @@ LEAN_EXPORT lean_object* l_Lean_Parser_strLit; LEAN_EXPORT lean_object* l_Lean_Parser_many1(lean_object*); static lean_object* l_Lean_Parser_termRegister__parser__alias_x28Kind_x3a_x3d___x29___________closed__25; lean_object* l_Lean_PrettyPrinter_Formatter_andthen_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__82; static lean_object* l_Lean_Parser_scientificLit___closed__1; LEAN_EXPORT lean_object* l_Lean_Parser_mkAntiquotSplice_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_sepByElemParser_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_nodeWithAntiquot_parenthesizer(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__82; static lean_object* l_Lean_Parser_strLit___closed__2; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__69; LEAN_EXPORT lean_object* l_Lean_Parser_ppDedent_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__46; LEAN_EXPORT lean_object* l_Lean_Parser_sepBy1Indent_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__11; LEAN_EXPORT lean_object* l_Lean_Parser_notSymbol_formatter___rarg(lean_object*); static lean_object* l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__3; static lean_object* l_Lean_Parser_antiquotExpr_formatter___closed__1; @@ -743,7 +756,7 @@ uint8_t lean_nat_dec_lt(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Parser_ppLine_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_mkAntiquotSplice_formatter___closed__8; -static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__69; +static lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__11; lean_object* l_Lean_PrettyPrinter_Formatter_categoryParser_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Parser_many1Indent___closed__2; static lean_object* _init_l_Lean_Parser_leadingNode_formatter___closed__1() { @@ -4545,6 +4558,51 @@ x_3 = l_Lean_Parser_notFollowedBy(x_2, x_1); return x_3; } } +static lean_object* _init_l_Lean_Parser_patternIgnore_formatter___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string_from_bytes("patternIgnore", 13); +return x_1; +} +} +static lean_object* _init_l_Lean_Parser_patternIgnore_formatter___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Parser_patternIgnore_formatter___closed__1; +x_3 = l_Lean_Name_str___override(x_1, x_2); +return x_3; +} +} +LEAN_EXPORT lean_object* l_Lean_Parser_patternIgnore_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; lean_object* x_8; +x_7 = l_Lean_Parser_patternIgnore_formatter___closed__2; +x_8 = l_Lean_PrettyPrinter_Formatter_node_formatter(x_7, x_1, x_2, x_3, x_4, x_5, x_6); +return x_8; +} +} +LEAN_EXPORT lean_object* l_Lean_Parser_patternIgnore_parenthesizer(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; lean_object* x_8; +x_7 = l_Lean_Parser_patternIgnore_formatter___closed__2; +x_8 = l_Lean_PrettyPrinter_Parenthesizer_node_parenthesizer(x_7, x_1, x_2, x_3, x_4, x_5, x_6); +return x_8; +} +} +LEAN_EXPORT lean_object* l_Lean_Parser_patternIgnore(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; +x_2 = l_Lean_Parser_patternIgnore_formatter___closed__2; +x_3 = l_Lean_Parser_node(x_2, x_1); +return x_3; +} +} static lean_object* _init_l_Lean_Parser_ppHardSpace() { _start: { @@ -7345,7 +7403,122 @@ lean_dec(x_1); return x_6; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__1() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_1 = l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__1; +x_2 = l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__2; +x_3 = l_Lean_Parser_patternIgnore_formatter___closed__1; +x_4 = l_Lean_Name_mkStr3(x_1, x_2, x_3); +return x_4; +} +} +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Parser_patternIgnore), 1, 0); +return x_1; +} +} +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__2; +x_2 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__1; +x_2 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = lean_unsigned_to_nat(1u); +x_2 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; uint8_t x_3; lean_object* x_4; +x_1 = lean_box(0); +x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__5; +x_3 = 0; +x_4 = lean_alloc_ctor(0, 2, 1); +lean_ctor_set(x_4, 0, x_1); +lean_ctor_set(x_4, 1, x_2); +lean_ctor_set_uint8(x_4, sizeof(void*)*2, x_3); +return x_4; +} +} +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__7() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Parser_patternIgnore_formatter), 6, 0); +return x_1; +} +} +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__7; +x_2 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__9() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_PrettyPrinter_Formatter_formatterAliasesRef; +return x_1; +} +} +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__10() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Parser_patternIgnore_parenthesizer), 6, 0); +return x_1; +} +} +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__11() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__10; +x_2 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__12() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_parenthesizerAliasesRef; +return x_1; +} +} +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__13() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; @@ -7356,7 +7529,7 @@ x_4 = l_Lean_Name_mkStr3(x_1, x_2, x_3); return x_4; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__2() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__14() { _start: { lean_object* x_1; @@ -7364,51 +7537,27 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_group), 1, 0); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__3() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__15() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__2; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__14; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__4() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__16() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__1; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__13; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__5() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = lean_unsigned_to_nat(1u); -x_2 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; -} -} -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__6() { -_start: -{ -lean_object* x_1; lean_object* x_2; uint8_t x_3; lean_object* x_4; -x_1 = lean_box(0); -x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__5; -x_3 = 0; -x_4 = lean_alloc_ctor(0, 2, 1); -lean_ctor_set(x_4, 0, x_1); -lean_ctor_set(x_4, 1, x_2); -lean_ctor_set_uint8(x_4, sizeof(void*)*2, x_3); -return x_4; -} -} -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__7() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__17() { _start: { lean_object* x_1; @@ -7416,25 +7565,17 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_group_formatter), 6, 0); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__8() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__18() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__7; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__17; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__9() { -_start: -{ -lean_object* x_1; -x_1 = l_Lean_PrettyPrinter_Formatter_formatterAliasesRef; -return x_1; -} -} -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__10() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__19() { _start: { lean_object* x_1; @@ -7442,25 +7583,17 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_group_parenthesizer), 6, 0); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__11() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__20() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__10; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__19; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__12() { -_start: -{ -lean_object* x_1; -x_1 = l_Lean_PrettyPrinter_Parenthesizer_parenthesizerAliasesRef; -return x_1; -} -} -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__13() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__21() { _start: { lean_object* x_1; @@ -7468,28 +7601,28 @@ x_1 = lean_mk_string_from_bytes("ppHardSpace", 11); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__14() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__22() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__13; +x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__21; x_3 = l_Lean_Name_str___override(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__15() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__23() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__1; x_2 = l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__2; -x_3 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__13; +x_3 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__21; x_4 = l_Lean_Name_mkStr3(x_1, x_2, x_3); return x_4; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__16() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__24() { _start: { lean_object* x_1; lean_object* x_2; @@ -7499,17 +7632,17 @@ lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__17() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__25() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__15; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__23; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__18() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__26() { _start: { lean_object* x_1; lean_object* x_2; @@ -7519,12 +7652,12 @@ lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__19() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__27() { _start: { lean_object* x_1; lean_object* x_2; uint8_t x_3; lean_object* x_4; x_1 = lean_box(0); -x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__18; +x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__26; x_3 = 1; x_4 = lean_alloc_ctor(0, 2, 1); lean_ctor_set(x_4, 0, x_1); @@ -7533,7 +7666,7 @@ lean_ctor_set_uint8(x_4, sizeof(void*)*2, x_3); return x_4; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__20() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__28() { _start: { lean_object* x_1; @@ -7541,17 +7674,17 @@ x_1 = lean_alloc_closure((void*)(l_Lean_ppHardSpace_formatter___boxed), 5, 0); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__21() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__29() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__20; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__28; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__22() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__30() { _start: { lean_object* x_1; @@ -7559,17 +7692,17 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_ppHardSpace_parenthesizer___boxed return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__23() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__31() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__22; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__30; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__24() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__32() { _start: { lean_object* x_1; @@ -7577,38 +7710,38 @@ x_1 = lean_mk_string_from_bytes("ppSpace", 7); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__25() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__33() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__24; +x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__32; x_3 = l_Lean_Name_str___override(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__26() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__34() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__1; x_2 = l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__2; -x_3 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__24; +x_3 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__32; x_4 = l_Lean_Name_mkStr3(x_1, x_2, x_3); return x_4; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__27() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__35() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__26; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__34; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__28() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__36() { _start: { lean_object* x_1; @@ -7616,17 +7749,17 @@ x_1 = lean_alloc_closure((void*)(l_Lean_ppSpace_formatter___boxed), 5, 0); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__29() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__37() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__28; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__36; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__30() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__38() { _start: { lean_object* x_1; @@ -7634,17 +7767,17 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_ppSpace_parenthesizer___boxed), 4 return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__31() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__39() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__30; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__38; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__32() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__40() { _start: { lean_object* x_1; @@ -7652,38 +7785,38 @@ x_1 = lean_mk_string_from_bytes("ppLine", 6); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__33() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__41() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__32; +x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__40; x_3 = l_Lean_Name_str___override(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__34() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__42() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__1; x_2 = l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__2; -x_3 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__32; +x_3 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__40; x_4 = l_Lean_Name_mkStr3(x_1, x_2, x_3); return x_4; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__35() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__43() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__34; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__42; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__36() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__44() { _start: { lean_object* x_1; @@ -7691,17 +7824,17 @@ x_1 = lean_alloc_closure((void*)(l_Lean_ppLine_formatter___boxed), 5, 0); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__37() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__45() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__36; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__44; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__38() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__46() { _start: { lean_object* x_1; @@ -7709,17 +7842,17 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_ppLine_parenthesizer___boxed), 4, return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__39() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__47() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__38; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__46; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__40() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__48() { _start: { lean_object* x_1; @@ -7727,28 +7860,28 @@ x_1 = lean_mk_string_from_bytes("ppGroup", 7); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__41() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__49() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__40; +x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__48; x_3 = l_Lean_Name_str___override(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__42() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__50() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__1; x_2 = l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__2; -x_3 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__40; +x_3 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__48; x_4 = l_Lean_Name_mkStr3(x_1, x_2, x_3); return x_4; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__43() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__51() { _start: { lean_object* x_1; @@ -7756,27 +7889,27 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_ppGroup___boxed), 1, 0); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__44() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__52() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__43; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__51; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__45() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__53() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__42; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__50; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__46() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__54() { _start: { lean_object* x_1; lean_object* x_2; uint8_t x_3; lean_object* x_4; @@ -7790,7 +7923,7 @@ lean_ctor_set_uint8(x_4, sizeof(void*)*2, x_3); return x_4; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__47() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__55() { _start: { lean_object* x_1; @@ -7798,17 +7931,17 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_ppGroup_formatter), 6, 0); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__48() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__56() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__47; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__55; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__49() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__57() { _start: { lean_object* x_1; @@ -7816,17 +7949,17 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_ppGroup_parenthesizer), 6, 0); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__50() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__58() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__49; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__57; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__51() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__59() { _start: { lean_object* x_1; @@ -7834,28 +7967,28 @@ x_1 = lean_mk_string_from_bytes("ppRealGroup", 11); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__52() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__60() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__51; +x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__59; x_3 = l_Lean_Name_str___override(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__53() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__61() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__1; x_2 = l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__2; -x_3 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__51; +x_3 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__59; x_4 = l_Lean_Name_mkStr3(x_1, x_2, x_3); return x_4; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__54() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__62() { _start: { lean_object* x_1; @@ -7863,27 +7996,27 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_ppRealGroup___boxed), 1, 0); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__55() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__63() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__54; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__62; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__56() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__64() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__53; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__61; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__57() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__65() { _start: { lean_object* x_1; @@ -7891,17 +8024,17 @@ x_1 = lean_alloc_closure((void*)(l_Lean_ppRealGroup_formatter), 6, 0); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__58() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__66() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__57; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__65; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__59() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__67() { _start: { lean_object* x_1; @@ -7909,17 +8042,17 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_ppRealGroup_parenthesizer), 6, 0) return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__60() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__68() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__59; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__67; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__61() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__69() { _start: { lean_object* x_1; @@ -7927,28 +8060,28 @@ x_1 = lean_mk_string_from_bytes("ppRealFill", 10); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__62() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__70() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__61; +x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__69; x_3 = l_Lean_Name_str___override(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__63() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__71() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__1; x_2 = l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__2; -x_3 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__61; +x_3 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__69; x_4 = l_Lean_Name_mkStr3(x_1, x_2, x_3); return x_4; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__64() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__72() { _start: { lean_object* x_1; @@ -7956,27 +8089,27 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_ppRealFill___boxed), 1, 0); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__65() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__73() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__64; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__72; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__66() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__74() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__63; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__71; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__67() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__75() { _start: { lean_object* x_1; @@ -7984,17 +8117,17 @@ x_1 = lean_alloc_closure((void*)(l_Lean_ppRealFill_formatter), 6, 0); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__68() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__76() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__67; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__75; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__69() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__77() { _start: { lean_object* x_1; @@ -8002,17 +8135,17 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_ppRealFill_parenthesizer), 6, 0); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__70() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__78() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__69; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__77; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__71() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__79() { _start: { lean_object* x_1; @@ -8020,28 +8153,28 @@ x_1 = lean_mk_string_from_bytes("ppIndent", 8); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__72() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__80() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__71; +x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__79; x_3 = l_Lean_Name_str___override(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__73() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__81() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__1; x_2 = l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__2; -x_3 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__71; +x_3 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__79; x_4 = l_Lean_Name_mkStr3(x_1, x_2, x_3); return x_4; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__74() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__82() { _start: { lean_object* x_1; @@ -8049,27 +8182,27 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_ppIndent___boxed), 1, 0); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__75() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__83() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__74; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__82; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__76() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__84() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__73; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__81; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__77() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__85() { _start: { lean_object* x_1; @@ -8077,17 +8210,17 @@ x_1 = lean_alloc_closure((void*)(l_Lean_ppIndent_formatter), 6, 0); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__78() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__86() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__77; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__85; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__79() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__87() { _start: { lean_object* x_1; @@ -8095,17 +8228,17 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_ppIndent_parenthesizer), 6, 0); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__80() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__88() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__79; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__87; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__81() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__89() { _start: { lean_object* x_1; @@ -8113,28 +8246,28 @@ x_1 = lean_mk_string_from_bytes("ppDedent", 8); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__82() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__90() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__81; +x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__89; x_3 = l_Lean_Name_str___override(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__83() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__91() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__1; x_2 = l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__2; -x_3 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__81; +x_3 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__89; x_4 = l_Lean_Name_mkStr3(x_1, x_2, x_3); return x_4; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__84() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__92() { _start: { lean_object* x_1; @@ -8142,27 +8275,27 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_ppDedent___boxed), 1, 0); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__85() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__93() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__84; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__92; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__86() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__94() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__83; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__91; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__87() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__95() { _start: { lean_object* x_1; @@ -8170,17 +8303,17 @@ x_1 = lean_alloc_closure((void*)(l_Lean_ppDedent_formatter), 6, 0); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__88() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__96() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__87; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__95; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__89() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__97() { _start: { lean_object* x_1; @@ -8188,17 +8321,17 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_ppDedent_parenthesizer), 6, 0); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__90() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__98() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__89; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__97; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__91() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__99() { _start: { lean_object* x_1; @@ -8206,28 +8339,28 @@ x_1 = lean_mk_string_from_bytes("ppDedentIfGrouped", 17); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__92() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__100() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__91; +x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__99; x_3 = l_Lean_Name_str___override(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__93() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__101() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__1; x_2 = l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__2; -x_3 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__91; +x_3 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__99; x_4 = l_Lean_Name_mkStr3(x_1, x_2, x_3); return x_4; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__94() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__102() { _start: { lean_object* x_1; @@ -8235,27 +8368,27 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_ppDedentIfGrouped___boxed), 1, 0) return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__95() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__103() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__94; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__102; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__96() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__104() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__93; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__101; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__97() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__105() { _start: { lean_object* x_1; @@ -8263,17 +8396,17 @@ x_1 = lean_alloc_closure((void*)(l_Lean_ppDedentIfGrouped_formatter), 6, 0); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__98() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__106() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__97; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__105; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__99() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__107() { _start: { lean_object* x_1; @@ -8281,17 +8414,17 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_ppDedentIfGrouped_parenthesizer), return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__100() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__108() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__99; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__107; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__101() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__109() { _start: { lean_object* x_1; @@ -8299,38 +8432,38 @@ x_1 = lean_mk_string_from_bytes("ppAllowUngrouped", 16); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__102() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__110() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__101; +x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__109; x_3 = l_Lean_Name_str___override(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__103() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__111() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__1; x_2 = l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__2; -x_3 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__101; +x_3 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__109; x_4 = l_Lean_Name_mkStr3(x_1, x_2, x_3); return x_4; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__104() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__112() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__103; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__111; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__105() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__113() { _start: { lean_object* x_1; @@ -8338,17 +8471,17 @@ x_1 = lean_alloc_closure((void*)(l_Lean_ppAllowUngrouped_formatter___boxed), 1, return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__106() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__114() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__105; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__113; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__107() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__115() { _start: { lean_object* x_1; @@ -8356,17 +8489,17 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_ppAllowUngrouped_parenthesizer___ return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__108() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__116() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__107; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__115; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__109() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__117() { _start: { lean_object* x_1; @@ -8374,38 +8507,38 @@ x_1 = lean_mk_string_from_bytes("ppHardLineUnlessUngrouped", 25); return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__110() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__118() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__109; +x_2 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__117; x_3 = l_Lean_Name_str___override(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__111() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__119() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__1; x_2 = l___regBuiltin_Lean_Parser_antiquotNestedExpr_formatter___closed__2; -x_3 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__109; +x_3 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__117; x_4 = l_Lean_Name_mkStr3(x_1, x_2, x_3); return x_4; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__112() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__120() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__111; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__119; x_2 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__113() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__121() { _start: { lean_object* x_1; @@ -8413,17 +8546,17 @@ x_1 = lean_alloc_closure((void*)(l_Lean_ppHardLineUnlessUngrouped_formatter___bo return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__114() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__122() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__113; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__121; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__115() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__123() { _start: { lean_object* x_1; @@ -8431,25 +8564,25 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Parser_ppHardLineUnlessUngrouped_parenth return x_1; } } -static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__116() { +static lean_object* _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__124() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__115; +x_1 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__123; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -LEAN_EXPORT lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104_(lean_object* x_1) { +LEAN_EXPORT lean_object* l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111_(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; -x_2 = l_Lean_Parser_group_formatter___closed__2; -x_3 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__1; -x_4 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__3; -x_5 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__4; -x_6 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__6; +x_2 = l_Lean_Parser_patternIgnore_formatter___closed__2; +x_3 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__1; +x_4 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__3; +x_5 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__4; +x_6 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__6; x_7 = l_Lean_Parser_registerAlias(x_2, x_3, x_4, x_5, x_6, x_1); if (lean_obj_tag(x_7) == 0) { @@ -8457,8 +8590,8 @@ lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; x_8 = lean_ctor_get(x_7, 1); lean_inc(x_8); lean_dec(x_7); -x_9 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__9; -x_10 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__8; +x_9 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__9; +x_10 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__8; x_11 = l_Lean_Parser_registerAliasCore___rarg(x_9, x_2, x_10, x_8); if (lean_obj_tag(x_11) == 0) { @@ -8466,162 +8599,162 @@ lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; x_12 = lean_ctor_get(x_11, 1); lean_inc(x_12); lean_dec(x_11); -x_13 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__12; -x_14 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__11; +x_13 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__12; +x_14 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__11; x_15 = l_Lean_Parser_registerAliasCore___rarg(x_13, x_2, x_14, x_12); if (lean_obj_tag(x_15) == 0) { -lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; x_16 = lean_ctor_get(x_15, 1); lean_inc(x_16); lean_dec(x_15); -x_17 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__14; -x_18 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__15; -x_19 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__16; -x_20 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__17; -x_21 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__19; -x_22 = l_Lean_Parser_registerAlias(x_17, x_18, x_19, x_20, x_21, x_16); -if (lean_obj_tag(x_22) == 0) +x_17 = l_Lean_Parser_group_formatter___closed__2; +x_18 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__13; +x_19 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__15; +x_20 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__16; +x_21 = l_Lean_Parser_registerAlias(x_17, x_18, x_19, x_20, x_6, x_16); +if (lean_obj_tag(x_21) == 0) { -lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_23 = lean_ctor_get(x_22, 1); -lean_inc(x_23); -lean_dec(x_22); -x_24 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__21; -x_25 = l_Lean_Parser_registerAliasCore___rarg(x_9, x_17, x_24, x_23); -if (lean_obj_tag(x_25) == 0) +lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_22 = lean_ctor_get(x_21, 1); +lean_inc(x_22); +lean_dec(x_21); +x_23 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__18; +x_24 = l_Lean_Parser_registerAliasCore___rarg(x_9, x_17, x_23, x_22); +if (lean_obj_tag(x_24) == 0) { -lean_object* x_26; lean_object* x_27; lean_object* x_28; -x_26 = lean_ctor_get(x_25, 1); -lean_inc(x_26); -lean_dec(x_25); -x_27 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__23; -x_28 = l_Lean_Parser_registerAliasCore___rarg(x_13, x_17, x_27, x_26); -if (lean_obj_tag(x_28) == 0) +lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_25 = lean_ctor_get(x_24, 1); +lean_inc(x_25); +lean_dec(x_24); +x_26 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__20; +x_27 = l_Lean_Parser_registerAliasCore___rarg(x_13, x_17, x_26, x_25); +if (lean_obj_tag(x_27) == 0) { -lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; -x_29 = lean_ctor_get(x_28, 1); -lean_inc(x_29); -lean_dec(x_28); -x_30 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__25; -x_31 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__26; -x_32 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__27; -x_33 = l_Lean_Parser_registerAlias(x_30, x_31, x_19, x_32, x_21, x_29); -if (lean_obj_tag(x_33) == 0) +lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; +x_28 = lean_ctor_get(x_27, 1); +lean_inc(x_28); +lean_dec(x_27); +x_29 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__22; +x_30 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__23; +x_31 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__24; +x_32 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__25; +x_33 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__27; +x_34 = l_Lean_Parser_registerAlias(x_29, x_30, x_31, x_32, x_33, x_28); +if (lean_obj_tag(x_34) == 0) { -lean_object* x_34; lean_object* x_35; lean_object* x_36; -x_34 = lean_ctor_get(x_33, 1); -lean_inc(x_34); -lean_dec(x_33); -x_35 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__29; -x_36 = l_Lean_Parser_registerAliasCore___rarg(x_9, x_30, x_35, x_34); -if (lean_obj_tag(x_36) == 0) +lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_35 = lean_ctor_get(x_34, 1); +lean_inc(x_35); +lean_dec(x_34); +x_36 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__29; +x_37 = l_Lean_Parser_registerAliasCore___rarg(x_9, x_29, x_36, x_35); +if (lean_obj_tag(x_37) == 0) { -lean_object* x_37; lean_object* x_38; lean_object* x_39; -x_37 = lean_ctor_get(x_36, 1); -lean_inc(x_37); -lean_dec(x_36); -x_38 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__31; -x_39 = l_Lean_Parser_registerAliasCore___rarg(x_13, x_30, x_38, x_37); -if (lean_obj_tag(x_39) == 0) +lean_object* x_38; lean_object* x_39; lean_object* x_40; +x_38 = lean_ctor_get(x_37, 1); +lean_inc(x_38); +lean_dec(x_37); +x_39 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__31; +x_40 = l_Lean_Parser_registerAliasCore___rarg(x_13, x_29, x_39, x_38); +if (lean_obj_tag(x_40) == 0) { -lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; -x_40 = lean_ctor_get(x_39, 1); -lean_inc(x_40); -lean_dec(x_39); -x_41 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__33; -x_42 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__34; -x_43 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__35; -x_44 = l_Lean_Parser_registerAlias(x_41, x_42, x_19, x_43, x_21, x_40); -if (lean_obj_tag(x_44) == 0) +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; +x_41 = lean_ctor_get(x_40, 1); +lean_inc(x_41); +lean_dec(x_40); +x_42 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__33; +x_43 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__34; +x_44 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__35; +x_45 = l_Lean_Parser_registerAlias(x_42, x_43, x_31, x_44, x_33, x_41); +if (lean_obj_tag(x_45) == 0) { -lean_object* x_45; lean_object* x_46; lean_object* x_47; -x_45 = lean_ctor_get(x_44, 1); -lean_inc(x_45); -lean_dec(x_44); -x_46 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__37; -x_47 = l_Lean_Parser_registerAliasCore___rarg(x_9, x_41, x_46, x_45); -if (lean_obj_tag(x_47) == 0) +lean_object* x_46; lean_object* x_47; lean_object* x_48; +x_46 = lean_ctor_get(x_45, 1); +lean_inc(x_46); +lean_dec(x_45); +x_47 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__37; +x_48 = l_Lean_Parser_registerAliasCore___rarg(x_9, x_42, x_47, x_46); +if (lean_obj_tag(x_48) == 0) { -lean_object* x_48; lean_object* x_49; lean_object* x_50; -x_48 = lean_ctor_get(x_47, 1); -lean_inc(x_48); -lean_dec(x_47); -x_49 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__39; -x_50 = l_Lean_Parser_registerAliasCore___rarg(x_13, x_41, x_49, x_48); -if (lean_obj_tag(x_50) == 0) +lean_object* x_49; lean_object* x_50; lean_object* x_51; +x_49 = lean_ctor_get(x_48, 1); +lean_inc(x_49); +lean_dec(x_48); +x_50 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__39; +x_51 = l_Lean_Parser_registerAliasCore___rarg(x_13, x_42, x_50, x_49); +if (lean_obj_tag(x_51) == 0) { -lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; -x_51 = lean_ctor_get(x_50, 1); -lean_inc(x_51); -lean_dec(x_50); -x_52 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__41; -x_53 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__42; -x_54 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__44; -x_55 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__45; -x_56 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__46; -x_57 = l_Lean_Parser_registerAlias(x_52, x_53, x_54, x_55, x_56, x_51); -if (lean_obj_tag(x_57) == 0) +lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; +x_52 = lean_ctor_get(x_51, 1); +lean_inc(x_52); +lean_dec(x_51); +x_53 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__41; +x_54 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__42; +x_55 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__43; +x_56 = l_Lean_Parser_registerAlias(x_53, x_54, x_31, x_55, x_33, x_52); +if (lean_obj_tag(x_56) == 0) { -lean_object* x_58; lean_object* x_59; lean_object* x_60; -x_58 = lean_ctor_get(x_57, 1); -lean_inc(x_58); -lean_dec(x_57); -x_59 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__48; -x_60 = l_Lean_Parser_registerAliasCore___rarg(x_9, x_52, x_59, x_58); -if (lean_obj_tag(x_60) == 0) +lean_object* x_57; lean_object* x_58; lean_object* x_59; +x_57 = lean_ctor_get(x_56, 1); +lean_inc(x_57); +lean_dec(x_56); +x_58 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__45; +x_59 = l_Lean_Parser_registerAliasCore___rarg(x_9, x_53, x_58, x_57); +if (lean_obj_tag(x_59) == 0) { -lean_object* x_61; lean_object* x_62; lean_object* x_63; -x_61 = lean_ctor_get(x_60, 1); -lean_inc(x_61); -lean_dec(x_60); -x_62 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__50; -x_63 = l_Lean_Parser_registerAliasCore___rarg(x_13, x_52, x_62, x_61); -if (lean_obj_tag(x_63) == 0) +lean_object* x_60; lean_object* x_61; lean_object* x_62; +x_60 = lean_ctor_get(x_59, 1); +lean_inc(x_60); +lean_dec(x_59); +x_61 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__47; +x_62 = l_Lean_Parser_registerAliasCore___rarg(x_13, x_53, x_61, x_60); +if (lean_obj_tag(x_62) == 0) { -lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; -x_64 = lean_ctor_get(x_63, 1); -lean_inc(x_64); -lean_dec(x_63); -x_65 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__52; -x_66 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__53; -x_67 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__55; -x_68 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__56; -x_69 = l_Lean_Parser_registerAlias(x_65, x_66, x_67, x_68, x_56, x_64); +lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; +x_63 = lean_ctor_get(x_62, 1); +lean_inc(x_63); +lean_dec(x_62); +x_64 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__49; +x_65 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__50; +x_66 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__52; +x_67 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__53; +x_68 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__54; +x_69 = l_Lean_Parser_registerAlias(x_64, x_65, x_66, x_67, x_68, x_63); if (lean_obj_tag(x_69) == 0) { lean_object* x_70; lean_object* x_71; lean_object* x_72; x_70 = lean_ctor_get(x_69, 1); lean_inc(x_70); lean_dec(x_69); -x_71 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__58; -x_72 = l_Lean_Parser_registerAliasCore___rarg(x_9, x_65, x_71, x_70); +x_71 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__56; +x_72 = l_Lean_Parser_registerAliasCore___rarg(x_9, x_64, x_71, x_70); if (lean_obj_tag(x_72) == 0) { lean_object* x_73; lean_object* x_74; lean_object* x_75; x_73 = lean_ctor_get(x_72, 1); lean_inc(x_73); lean_dec(x_72); -x_74 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__60; -x_75 = l_Lean_Parser_registerAliasCore___rarg(x_13, x_65, x_74, x_73); +x_74 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__58; +x_75 = l_Lean_Parser_registerAliasCore___rarg(x_13, x_64, x_74, x_73); if (lean_obj_tag(x_75) == 0) { lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; x_76 = lean_ctor_get(x_75, 1); lean_inc(x_76); lean_dec(x_75); -x_77 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__62; -x_78 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__63; -x_79 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__65; -x_80 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__66; -x_81 = l_Lean_Parser_registerAlias(x_77, x_78, x_79, x_80, x_56, x_76); +x_77 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__60; +x_78 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__61; +x_79 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__63; +x_80 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__64; +x_81 = l_Lean_Parser_registerAlias(x_77, x_78, x_79, x_80, x_68, x_76); if (lean_obj_tag(x_81) == 0) { lean_object* x_82; lean_object* x_83; lean_object* x_84; x_82 = lean_ctor_get(x_81, 1); lean_inc(x_82); lean_dec(x_81); -x_83 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__68; +x_83 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__66; x_84 = l_Lean_Parser_registerAliasCore___rarg(x_9, x_77, x_83, x_82); if (lean_obj_tag(x_84) == 0) { @@ -8629,7 +8762,7 @@ lean_object* x_85; lean_object* x_86; lean_object* x_87; x_85 = lean_ctor_get(x_84, 1); lean_inc(x_85); lean_dec(x_84); -x_86 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__70; +x_86 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__68; x_87 = l_Lean_Parser_registerAliasCore___rarg(x_13, x_77, x_86, x_85); if (lean_obj_tag(x_87) == 0) { @@ -8637,18 +8770,18 @@ lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean x_88 = lean_ctor_get(x_87, 1); lean_inc(x_88); lean_dec(x_87); -x_89 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__72; -x_90 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__73; -x_91 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__75; -x_92 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__76; -x_93 = l_Lean_Parser_registerAlias(x_89, x_90, x_91, x_92, x_56, x_88); +x_89 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__70; +x_90 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__71; +x_91 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__73; +x_92 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__74; +x_93 = l_Lean_Parser_registerAlias(x_89, x_90, x_91, x_92, x_68, x_88); if (lean_obj_tag(x_93) == 0) { lean_object* x_94; lean_object* x_95; lean_object* x_96; x_94 = lean_ctor_get(x_93, 1); lean_inc(x_94); lean_dec(x_93); -x_95 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__78; +x_95 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__76; x_96 = l_Lean_Parser_registerAliasCore___rarg(x_9, x_89, x_95, x_94); if (lean_obj_tag(x_96) == 0) { @@ -8656,7 +8789,7 @@ lean_object* x_97; lean_object* x_98; lean_object* x_99; x_97 = lean_ctor_get(x_96, 1); lean_inc(x_97); lean_dec(x_96); -x_98 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__80; +x_98 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__78; x_99 = l_Lean_Parser_registerAliasCore___rarg(x_13, x_89, x_98, x_97); if (lean_obj_tag(x_99) == 0) { @@ -8664,18 +8797,18 @@ lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; x_100 = lean_ctor_get(x_99, 1); lean_inc(x_100); lean_dec(x_99); -x_101 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__82; -x_102 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__83; -x_103 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__85; -x_104 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__86; -x_105 = l_Lean_Parser_registerAlias(x_101, x_102, x_103, x_104, x_56, x_100); +x_101 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__80; +x_102 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__81; +x_103 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__83; +x_104 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__84; +x_105 = l_Lean_Parser_registerAlias(x_101, x_102, x_103, x_104, x_68, x_100); if (lean_obj_tag(x_105) == 0) { lean_object* x_106; lean_object* x_107; lean_object* x_108; x_106 = lean_ctor_get(x_105, 1); lean_inc(x_106); lean_dec(x_105); -x_107 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__88; +x_107 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__86; x_108 = l_Lean_Parser_registerAliasCore___rarg(x_9, x_101, x_107, x_106); if (lean_obj_tag(x_108) == 0) { @@ -8683,7 +8816,7 @@ lean_object* x_109; lean_object* x_110; lean_object* x_111; x_109 = lean_ctor_get(x_108, 1); lean_inc(x_109); lean_dec(x_108); -x_110 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__90; +x_110 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__88; x_111 = l_Lean_Parser_registerAliasCore___rarg(x_13, x_101, x_110, x_109); if (lean_obj_tag(x_111) == 0) { @@ -8691,18 +8824,18 @@ lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; x_112 = lean_ctor_get(x_111, 1); lean_inc(x_112); lean_dec(x_111); -x_113 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__92; -x_114 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__93; -x_115 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__95; -x_116 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__96; -x_117 = l_Lean_Parser_registerAlias(x_113, x_114, x_115, x_116, x_56, x_112); +x_113 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__90; +x_114 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__91; +x_115 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__93; +x_116 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__94; +x_117 = l_Lean_Parser_registerAlias(x_113, x_114, x_115, x_116, x_68, x_112); if (lean_obj_tag(x_117) == 0) { lean_object* x_118; lean_object* x_119; lean_object* x_120; x_118 = lean_ctor_get(x_117, 1); lean_inc(x_118); lean_dec(x_117); -x_119 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__98; +x_119 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__96; x_120 = l_Lean_Parser_registerAliasCore___rarg(x_9, x_113, x_119, x_118); if (lean_obj_tag(x_120) == 0) { @@ -8710,147 +8843,105 @@ lean_object* x_121; lean_object* x_122; lean_object* x_123; x_121 = lean_ctor_get(x_120, 1); lean_inc(x_121); lean_dec(x_120); -x_122 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__100; +x_122 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__98; x_123 = l_Lean_Parser_registerAliasCore___rarg(x_13, x_113, x_122, x_121); if (lean_obj_tag(x_123) == 0) { -lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; +lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; x_124 = lean_ctor_get(x_123, 1); lean_inc(x_124); lean_dec(x_123); -x_125 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__102; -x_126 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__103; -x_127 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__104; -x_128 = l_Lean_Parser_registerAlias(x_125, x_126, x_19, x_127, x_21, x_124); -if (lean_obj_tag(x_128) == 0) +x_125 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__100; +x_126 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__101; +x_127 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__103; +x_128 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__104; +x_129 = l_Lean_Parser_registerAlias(x_125, x_126, x_127, x_128, x_68, x_124); +if (lean_obj_tag(x_129) == 0) { -lean_object* x_129; lean_object* x_130; lean_object* x_131; -x_129 = lean_ctor_get(x_128, 1); -lean_inc(x_129); -lean_dec(x_128); -x_130 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__106; -x_131 = l_Lean_Parser_registerAliasCore___rarg(x_9, x_125, x_130, x_129); -if (lean_obj_tag(x_131) == 0) +lean_object* x_130; lean_object* x_131; lean_object* x_132; +x_130 = lean_ctor_get(x_129, 1); +lean_inc(x_130); +lean_dec(x_129); +x_131 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__106; +x_132 = l_Lean_Parser_registerAliasCore___rarg(x_9, x_125, x_131, x_130); +if (lean_obj_tag(x_132) == 0) { -lean_object* x_132; lean_object* x_133; lean_object* x_134; -x_132 = lean_ctor_get(x_131, 1); -lean_inc(x_132); -lean_dec(x_131); -x_133 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__108; -x_134 = l_Lean_Parser_registerAliasCore___rarg(x_13, x_125, x_133, x_132); -if (lean_obj_tag(x_134) == 0) +lean_object* x_133; lean_object* x_134; lean_object* x_135; +x_133 = lean_ctor_get(x_132, 1); +lean_inc(x_133); +lean_dec(x_132); +x_134 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__108; +x_135 = l_Lean_Parser_registerAliasCore___rarg(x_13, x_125, x_134, x_133); +if (lean_obj_tag(x_135) == 0) { -lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; -x_135 = lean_ctor_get(x_134, 1); -lean_inc(x_135); -lean_dec(x_134); -x_136 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__110; -x_137 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__111; -x_138 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__112; -x_139 = l_Lean_Parser_registerAlias(x_136, x_137, x_19, x_138, x_21, x_135); -if (lean_obj_tag(x_139) == 0) +lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; +x_136 = lean_ctor_get(x_135, 1); +lean_inc(x_136); +lean_dec(x_135); +x_137 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__110; +x_138 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__111; +x_139 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__112; +x_140 = l_Lean_Parser_registerAlias(x_137, x_138, x_31, x_139, x_33, x_136); +if (lean_obj_tag(x_140) == 0) { -lean_object* x_140; lean_object* x_141; lean_object* x_142; -x_140 = lean_ctor_get(x_139, 1); -lean_inc(x_140); -lean_dec(x_139); -x_141 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__114; -x_142 = l_Lean_Parser_registerAliasCore___rarg(x_9, x_136, x_141, x_140); -if (lean_obj_tag(x_142) == 0) +lean_object* x_141; lean_object* x_142; lean_object* x_143; +x_141 = lean_ctor_get(x_140, 1); +lean_inc(x_141); +lean_dec(x_140); +x_142 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__114; +x_143 = l_Lean_Parser_registerAliasCore___rarg(x_9, x_137, x_142, x_141); +if (lean_obj_tag(x_143) == 0) { -lean_object* x_143; lean_object* x_144; lean_object* x_145; -x_143 = lean_ctor_get(x_142, 1); -lean_inc(x_143); -lean_dec(x_142); -x_144 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__116; -x_145 = l_Lean_Parser_registerAliasCore___rarg(x_13, x_136, x_144, x_143); -return x_145; -} -else +lean_object* x_144; lean_object* x_145; lean_object* x_146; +x_144 = lean_ctor_get(x_143, 1); +lean_inc(x_144); +lean_dec(x_143); +x_145 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__116; +x_146 = l_Lean_Parser_registerAliasCore___rarg(x_13, x_137, x_145, x_144); +if (lean_obj_tag(x_146) == 0) { -uint8_t x_146; -x_146 = !lean_is_exclusive(x_142); -if (x_146 == 0) -{ -return x_142; -} -else -{ -lean_object* x_147; lean_object* x_148; lean_object* x_149; -x_147 = lean_ctor_get(x_142, 0); -x_148 = lean_ctor_get(x_142, 1); -lean_inc(x_148); +lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; +x_147 = lean_ctor_get(x_146, 1); lean_inc(x_147); -lean_dec(x_142); -x_149 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_149, 0, x_147); -lean_ctor_set(x_149, 1, x_148); -return x_149; -} -} -} -else +lean_dec(x_146); +x_148 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__118; +x_149 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__119; +x_150 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__120; +x_151 = l_Lean_Parser_registerAlias(x_148, x_149, x_31, x_150, x_33, x_147); +if (lean_obj_tag(x_151) == 0) { -uint8_t x_150; -x_150 = !lean_is_exclusive(x_139); -if (x_150 == 0) -{ -return x_139; -} -else -{ -lean_object* x_151; lean_object* x_152; lean_object* x_153; -x_151 = lean_ctor_get(x_139, 0); -x_152 = lean_ctor_get(x_139, 1); +lean_object* x_152; lean_object* x_153; lean_object* x_154; +x_152 = lean_ctor_get(x_151, 1); lean_inc(x_152); -lean_inc(x_151); -lean_dec(x_139); -x_153 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_153, 0, x_151); -lean_ctor_set(x_153, 1, x_152); -return x_153; -} -} -} -else -{ -uint8_t x_154; -x_154 = !lean_is_exclusive(x_134); -if (x_154 == 0) -{ -return x_134; -} -else +lean_dec(x_151); +x_153 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__122; +x_154 = l_Lean_Parser_registerAliasCore___rarg(x_9, x_148, x_153, x_152); +if (lean_obj_tag(x_154) == 0) { lean_object* x_155; lean_object* x_156; lean_object* x_157; -x_155 = lean_ctor_get(x_134, 0); -x_156 = lean_ctor_get(x_134, 1); -lean_inc(x_156); +x_155 = lean_ctor_get(x_154, 1); lean_inc(x_155); -lean_dec(x_134); -x_157 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_157, 0, x_155); -lean_ctor_set(x_157, 1, x_156); +lean_dec(x_154); +x_156 = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__124; +x_157 = l_Lean_Parser_registerAliasCore___rarg(x_13, x_148, x_156, x_155); return x_157; } -} -} else { uint8_t x_158; -x_158 = !lean_is_exclusive(x_131); +x_158 = !lean_is_exclusive(x_154); if (x_158 == 0) { -return x_131; +return x_154; } else { lean_object* x_159; lean_object* x_160; lean_object* x_161; -x_159 = lean_ctor_get(x_131, 0); -x_160 = lean_ctor_get(x_131, 1); +x_159 = lean_ctor_get(x_154, 0); +x_160 = lean_ctor_get(x_154, 1); lean_inc(x_160); lean_inc(x_159); -lean_dec(x_131); +lean_dec(x_154); x_161 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_161, 0, x_159); lean_ctor_set(x_161, 1, x_160); @@ -8861,19 +8952,19 @@ return x_161; else { uint8_t x_162; -x_162 = !lean_is_exclusive(x_128); +x_162 = !lean_is_exclusive(x_151); if (x_162 == 0) { -return x_128; +return x_151; } else { lean_object* x_163; lean_object* x_164; lean_object* x_165; -x_163 = lean_ctor_get(x_128, 0); -x_164 = lean_ctor_get(x_128, 1); +x_163 = lean_ctor_get(x_151, 0); +x_164 = lean_ctor_get(x_151, 1); lean_inc(x_164); lean_inc(x_163); -lean_dec(x_128); +lean_dec(x_151); x_165 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_165, 0, x_163); lean_ctor_set(x_165, 1, x_164); @@ -8884,19 +8975,19 @@ return x_165; else { uint8_t x_166; -x_166 = !lean_is_exclusive(x_123); +x_166 = !lean_is_exclusive(x_146); if (x_166 == 0) { -return x_123; +return x_146; } else { lean_object* x_167; lean_object* x_168; lean_object* x_169; -x_167 = lean_ctor_get(x_123, 0); -x_168 = lean_ctor_get(x_123, 1); +x_167 = lean_ctor_get(x_146, 0); +x_168 = lean_ctor_get(x_146, 1); lean_inc(x_168); lean_inc(x_167); -lean_dec(x_123); +lean_dec(x_146); x_169 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_169, 0, x_167); lean_ctor_set(x_169, 1, x_168); @@ -8907,19 +8998,19 @@ return x_169; else { uint8_t x_170; -x_170 = !lean_is_exclusive(x_120); +x_170 = !lean_is_exclusive(x_143); if (x_170 == 0) { -return x_120; +return x_143; } else { lean_object* x_171; lean_object* x_172; lean_object* x_173; -x_171 = lean_ctor_get(x_120, 0); -x_172 = lean_ctor_get(x_120, 1); +x_171 = lean_ctor_get(x_143, 0); +x_172 = lean_ctor_get(x_143, 1); lean_inc(x_172); lean_inc(x_171); -lean_dec(x_120); +lean_dec(x_143); x_173 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_173, 0, x_171); lean_ctor_set(x_173, 1, x_172); @@ -8930,19 +9021,19 @@ return x_173; else { uint8_t x_174; -x_174 = !lean_is_exclusive(x_117); +x_174 = !lean_is_exclusive(x_140); if (x_174 == 0) { -return x_117; +return x_140; } else { lean_object* x_175; lean_object* x_176; lean_object* x_177; -x_175 = lean_ctor_get(x_117, 0); -x_176 = lean_ctor_get(x_117, 1); +x_175 = lean_ctor_get(x_140, 0); +x_176 = lean_ctor_get(x_140, 1); lean_inc(x_176); lean_inc(x_175); -lean_dec(x_117); +lean_dec(x_140); x_177 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_177, 0, x_175); lean_ctor_set(x_177, 1, x_176); @@ -8953,19 +9044,19 @@ return x_177; else { uint8_t x_178; -x_178 = !lean_is_exclusive(x_111); +x_178 = !lean_is_exclusive(x_135); if (x_178 == 0) { -return x_111; +return x_135; } else { lean_object* x_179; lean_object* x_180; lean_object* x_181; -x_179 = lean_ctor_get(x_111, 0); -x_180 = lean_ctor_get(x_111, 1); +x_179 = lean_ctor_get(x_135, 0); +x_180 = lean_ctor_get(x_135, 1); lean_inc(x_180); lean_inc(x_179); -lean_dec(x_111); +lean_dec(x_135); x_181 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_181, 0, x_179); lean_ctor_set(x_181, 1, x_180); @@ -8976,19 +9067,19 @@ return x_181; else { uint8_t x_182; -x_182 = !lean_is_exclusive(x_108); +x_182 = !lean_is_exclusive(x_132); if (x_182 == 0) { -return x_108; +return x_132; } else { lean_object* x_183; lean_object* x_184; lean_object* x_185; -x_183 = lean_ctor_get(x_108, 0); -x_184 = lean_ctor_get(x_108, 1); +x_183 = lean_ctor_get(x_132, 0); +x_184 = lean_ctor_get(x_132, 1); lean_inc(x_184); lean_inc(x_183); -lean_dec(x_108); +lean_dec(x_132); x_185 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_185, 0, x_183); lean_ctor_set(x_185, 1, x_184); @@ -8999,19 +9090,19 @@ return x_185; else { uint8_t x_186; -x_186 = !lean_is_exclusive(x_105); +x_186 = !lean_is_exclusive(x_129); if (x_186 == 0) { -return x_105; +return x_129; } else { lean_object* x_187; lean_object* x_188; lean_object* x_189; -x_187 = lean_ctor_get(x_105, 0); -x_188 = lean_ctor_get(x_105, 1); +x_187 = lean_ctor_get(x_129, 0); +x_188 = lean_ctor_get(x_129, 1); lean_inc(x_188); lean_inc(x_187); -lean_dec(x_105); +lean_dec(x_129); x_189 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_189, 0, x_187); lean_ctor_set(x_189, 1, x_188); @@ -9022,19 +9113,19 @@ return x_189; else { uint8_t x_190; -x_190 = !lean_is_exclusive(x_99); +x_190 = !lean_is_exclusive(x_123); if (x_190 == 0) { -return x_99; +return x_123; } else { lean_object* x_191; lean_object* x_192; lean_object* x_193; -x_191 = lean_ctor_get(x_99, 0); -x_192 = lean_ctor_get(x_99, 1); +x_191 = lean_ctor_get(x_123, 0); +x_192 = lean_ctor_get(x_123, 1); lean_inc(x_192); lean_inc(x_191); -lean_dec(x_99); +lean_dec(x_123); x_193 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_193, 0, x_191); lean_ctor_set(x_193, 1, x_192); @@ -9045,19 +9136,19 @@ return x_193; else { uint8_t x_194; -x_194 = !lean_is_exclusive(x_96); +x_194 = !lean_is_exclusive(x_120); if (x_194 == 0) { -return x_96; +return x_120; } else { lean_object* x_195; lean_object* x_196; lean_object* x_197; -x_195 = lean_ctor_get(x_96, 0); -x_196 = lean_ctor_get(x_96, 1); +x_195 = lean_ctor_get(x_120, 0); +x_196 = lean_ctor_get(x_120, 1); lean_inc(x_196); lean_inc(x_195); -lean_dec(x_96); +lean_dec(x_120); x_197 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_197, 0, x_195); lean_ctor_set(x_197, 1, x_196); @@ -9068,19 +9159,19 @@ return x_197; else { uint8_t x_198; -x_198 = !lean_is_exclusive(x_93); +x_198 = !lean_is_exclusive(x_117); if (x_198 == 0) { -return x_93; +return x_117; } else { lean_object* x_199; lean_object* x_200; lean_object* x_201; -x_199 = lean_ctor_get(x_93, 0); -x_200 = lean_ctor_get(x_93, 1); +x_199 = lean_ctor_get(x_117, 0); +x_200 = lean_ctor_get(x_117, 1); lean_inc(x_200); lean_inc(x_199); -lean_dec(x_93); +lean_dec(x_117); x_201 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_201, 0, x_199); lean_ctor_set(x_201, 1, x_200); @@ -9091,19 +9182,19 @@ return x_201; else { uint8_t x_202; -x_202 = !lean_is_exclusive(x_87); +x_202 = !lean_is_exclusive(x_111); if (x_202 == 0) { -return x_87; +return x_111; } else { lean_object* x_203; lean_object* x_204; lean_object* x_205; -x_203 = lean_ctor_get(x_87, 0); -x_204 = lean_ctor_get(x_87, 1); +x_203 = lean_ctor_get(x_111, 0); +x_204 = lean_ctor_get(x_111, 1); lean_inc(x_204); lean_inc(x_203); -lean_dec(x_87); +lean_dec(x_111); x_205 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_205, 0, x_203); lean_ctor_set(x_205, 1, x_204); @@ -9114,19 +9205,19 @@ return x_205; else { uint8_t x_206; -x_206 = !lean_is_exclusive(x_84); +x_206 = !lean_is_exclusive(x_108); if (x_206 == 0) { -return x_84; +return x_108; } else { lean_object* x_207; lean_object* x_208; lean_object* x_209; -x_207 = lean_ctor_get(x_84, 0); -x_208 = lean_ctor_get(x_84, 1); +x_207 = lean_ctor_get(x_108, 0); +x_208 = lean_ctor_get(x_108, 1); lean_inc(x_208); lean_inc(x_207); -lean_dec(x_84); +lean_dec(x_108); x_209 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_209, 0, x_207); lean_ctor_set(x_209, 1, x_208); @@ -9137,19 +9228,19 @@ return x_209; else { uint8_t x_210; -x_210 = !lean_is_exclusive(x_81); +x_210 = !lean_is_exclusive(x_105); if (x_210 == 0) { -return x_81; +return x_105; } else { lean_object* x_211; lean_object* x_212; lean_object* x_213; -x_211 = lean_ctor_get(x_81, 0); -x_212 = lean_ctor_get(x_81, 1); +x_211 = lean_ctor_get(x_105, 0); +x_212 = lean_ctor_get(x_105, 1); lean_inc(x_212); lean_inc(x_211); -lean_dec(x_81); +lean_dec(x_105); x_213 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_213, 0, x_211); lean_ctor_set(x_213, 1, x_212); @@ -9160,19 +9251,19 @@ return x_213; else { uint8_t x_214; -x_214 = !lean_is_exclusive(x_75); +x_214 = !lean_is_exclusive(x_99); if (x_214 == 0) { -return x_75; +return x_99; } else { lean_object* x_215; lean_object* x_216; lean_object* x_217; -x_215 = lean_ctor_get(x_75, 0); -x_216 = lean_ctor_get(x_75, 1); +x_215 = lean_ctor_get(x_99, 0); +x_216 = lean_ctor_get(x_99, 1); lean_inc(x_216); lean_inc(x_215); -lean_dec(x_75); +lean_dec(x_99); x_217 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_217, 0, x_215); lean_ctor_set(x_217, 1, x_216); @@ -9183,19 +9274,19 @@ return x_217; else { uint8_t x_218; -x_218 = !lean_is_exclusive(x_72); +x_218 = !lean_is_exclusive(x_96); if (x_218 == 0) { -return x_72; +return x_96; } else { lean_object* x_219; lean_object* x_220; lean_object* x_221; -x_219 = lean_ctor_get(x_72, 0); -x_220 = lean_ctor_get(x_72, 1); +x_219 = lean_ctor_get(x_96, 0); +x_220 = lean_ctor_get(x_96, 1); lean_inc(x_220); lean_inc(x_219); -lean_dec(x_72); +lean_dec(x_96); x_221 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_221, 0, x_219); lean_ctor_set(x_221, 1, x_220); @@ -9206,19 +9297,19 @@ return x_221; else { uint8_t x_222; -x_222 = !lean_is_exclusive(x_69); +x_222 = !lean_is_exclusive(x_93); if (x_222 == 0) { -return x_69; +return x_93; } else { lean_object* x_223; lean_object* x_224; lean_object* x_225; -x_223 = lean_ctor_get(x_69, 0); -x_224 = lean_ctor_get(x_69, 1); +x_223 = lean_ctor_get(x_93, 0); +x_224 = lean_ctor_get(x_93, 1); lean_inc(x_224); lean_inc(x_223); -lean_dec(x_69); +lean_dec(x_93); x_225 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_225, 0, x_223); lean_ctor_set(x_225, 1, x_224); @@ -9229,19 +9320,19 @@ return x_225; else { uint8_t x_226; -x_226 = !lean_is_exclusive(x_63); +x_226 = !lean_is_exclusive(x_87); if (x_226 == 0) { -return x_63; +return x_87; } else { lean_object* x_227; lean_object* x_228; lean_object* x_229; -x_227 = lean_ctor_get(x_63, 0); -x_228 = lean_ctor_get(x_63, 1); +x_227 = lean_ctor_get(x_87, 0); +x_228 = lean_ctor_get(x_87, 1); lean_inc(x_228); lean_inc(x_227); -lean_dec(x_63); +lean_dec(x_87); x_229 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_229, 0, x_227); lean_ctor_set(x_229, 1, x_228); @@ -9252,19 +9343,19 @@ return x_229; else { uint8_t x_230; -x_230 = !lean_is_exclusive(x_60); +x_230 = !lean_is_exclusive(x_84); if (x_230 == 0) { -return x_60; +return x_84; } else { lean_object* x_231; lean_object* x_232; lean_object* x_233; -x_231 = lean_ctor_get(x_60, 0); -x_232 = lean_ctor_get(x_60, 1); +x_231 = lean_ctor_get(x_84, 0); +x_232 = lean_ctor_get(x_84, 1); lean_inc(x_232); lean_inc(x_231); -lean_dec(x_60); +lean_dec(x_84); x_233 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_233, 0, x_231); lean_ctor_set(x_233, 1, x_232); @@ -9275,19 +9366,19 @@ return x_233; else { uint8_t x_234; -x_234 = !lean_is_exclusive(x_57); +x_234 = !lean_is_exclusive(x_81); if (x_234 == 0) { -return x_57; +return x_81; } else { lean_object* x_235; lean_object* x_236; lean_object* x_237; -x_235 = lean_ctor_get(x_57, 0); -x_236 = lean_ctor_get(x_57, 1); +x_235 = lean_ctor_get(x_81, 0); +x_236 = lean_ctor_get(x_81, 1); lean_inc(x_236); lean_inc(x_235); -lean_dec(x_57); +lean_dec(x_81); x_237 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_237, 0, x_235); lean_ctor_set(x_237, 1, x_236); @@ -9298,19 +9389,19 @@ return x_237; else { uint8_t x_238; -x_238 = !lean_is_exclusive(x_50); +x_238 = !lean_is_exclusive(x_75); if (x_238 == 0) { -return x_50; +return x_75; } else { lean_object* x_239; lean_object* x_240; lean_object* x_241; -x_239 = lean_ctor_get(x_50, 0); -x_240 = lean_ctor_get(x_50, 1); +x_239 = lean_ctor_get(x_75, 0); +x_240 = lean_ctor_get(x_75, 1); lean_inc(x_240); lean_inc(x_239); -lean_dec(x_50); +lean_dec(x_75); x_241 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_241, 0, x_239); lean_ctor_set(x_241, 1, x_240); @@ -9321,19 +9412,19 @@ return x_241; else { uint8_t x_242; -x_242 = !lean_is_exclusive(x_47); +x_242 = !lean_is_exclusive(x_72); if (x_242 == 0) { -return x_47; +return x_72; } else { lean_object* x_243; lean_object* x_244; lean_object* x_245; -x_243 = lean_ctor_get(x_47, 0); -x_244 = lean_ctor_get(x_47, 1); +x_243 = lean_ctor_get(x_72, 0); +x_244 = lean_ctor_get(x_72, 1); lean_inc(x_244); lean_inc(x_243); -lean_dec(x_47); +lean_dec(x_72); x_245 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_245, 0, x_243); lean_ctor_set(x_245, 1, x_244); @@ -9344,19 +9435,19 @@ return x_245; else { uint8_t x_246; -x_246 = !lean_is_exclusive(x_44); +x_246 = !lean_is_exclusive(x_69); if (x_246 == 0) { -return x_44; +return x_69; } else { lean_object* x_247; lean_object* x_248; lean_object* x_249; -x_247 = lean_ctor_get(x_44, 0); -x_248 = lean_ctor_get(x_44, 1); +x_247 = lean_ctor_get(x_69, 0); +x_248 = lean_ctor_get(x_69, 1); lean_inc(x_248); lean_inc(x_247); -lean_dec(x_44); +lean_dec(x_69); x_249 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_249, 0, x_247); lean_ctor_set(x_249, 1, x_248); @@ -9367,19 +9458,19 @@ return x_249; else { uint8_t x_250; -x_250 = !lean_is_exclusive(x_39); +x_250 = !lean_is_exclusive(x_62); if (x_250 == 0) { -return x_39; +return x_62; } else { lean_object* x_251; lean_object* x_252; lean_object* x_253; -x_251 = lean_ctor_get(x_39, 0); -x_252 = lean_ctor_get(x_39, 1); +x_251 = lean_ctor_get(x_62, 0); +x_252 = lean_ctor_get(x_62, 1); lean_inc(x_252); lean_inc(x_251); -lean_dec(x_39); +lean_dec(x_62); x_253 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_253, 0, x_251); lean_ctor_set(x_253, 1, x_252); @@ -9390,19 +9481,19 @@ return x_253; else { uint8_t x_254; -x_254 = !lean_is_exclusive(x_36); +x_254 = !lean_is_exclusive(x_59); if (x_254 == 0) { -return x_36; +return x_59; } else { lean_object* x_255; lean_object* x_256; lean_object* x_257; -x_255 = lean_ctor_get(x_36, 0); -x_256 = lean_ctor_get(x_36, 1); +x_255 = lean_ctor_get(x_59, 0); +x_256 = lean_ctor_get(x_59, 1); lean_inc(x_256); lean_inc(x_255); -lean_dec(x_36); +lean_dec(x_59); x_257 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_257, 0, x_255); lean_ctor_set(x_257, 1, x_256); @@ -9413,19 +9504,19 @@ return x_257; else { uint8_t x_258; -x_258 = !lean_is_exclusive(x_33); +x_258 = !lean_is_exclusive(x_56); if (x_258 == 0) { -return x_33; +return x_56; } else { lean_object* x_259; lean_object* x_260; lean_object* x_261; -x_259 = lean_ctor_get(x_33, 0); -x_260 = lean_ctor_get(x_33, 1); +x_259 = lean_ctor_get(x_56, 0); +x_260 = lean_ctor_get(x_56, 1); lean_inc(x_260); lean_inc(x_259); -lean_dec(x_33); +lean_dec(x_56); x_261 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_261, 0, x_259); lean_ctor_set(x_261, 1, x_260); @@ -9436,19 +9527,19 @@ return x_261; else { uint8_t x_262; -x_262 = !lean_is_exclusive(x_28); +x_262 = !lean_is_exclusive(x_51); if (x_262 == 0) { -return x_28; +return x_51; } else { lean_object* x_263; lean_object* x_264; lean_object* x_265; -x_263 = lean_ctor_get(x_28, 0); -x_264 = lean_ctor_get(x_28, 1); +x_263 = lean_ctor_get(x_51, 0); +x_264 = lean_ctor_get(x_51, 1); lean_inc(x_264); lean_inc(x_263); -lean_dec(x_28); +lean_dec(x_51); x_265 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_265, 0, x_263); lean_ctor_set(x_265, 1, x_264); @@ -9459,19 +9550,19 @@ return x_265; else { uint8_t x_266; -x_266 = !lean_is_exclusive(x_25); +x_266 = !lean_is_exclusive(x_48); if (x_266 == 0) { -return x_25; +return x_48; } else { lean_object* x_267; lean_object* x_268; lean_object* x_269; -x_267 = lean_ctor_get(x_25, 0); -x_268 = lean_ctor_get(x_25, 1); +x_267 = lean_ctor_get(x_48, 0); +x_268 = lean_ctor_get(x_48, 1); lean_inc(x_268); lean_inc(x_267); -lean_dec(x_25); +lean_dec(x_48); x_269 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_269, 0, x_267); lean_ctor_set(x_269, 1, x_268); @@ -9482,19 +9573,19 @@ return x_269; else { uint8_t x_270; -x_270 = !lean_is_exclusive(x_22); +x_270 = !lean_is_exclusive(x_45); if (x_270 == 0) { -return x_22; +return x_45; } else { lean_object* x_271; lean_object* x_272; lean_object* x_273; -x_271 = lean_ctor_get(x_22, 0); -x_272 = lean_ctor_get(x_22, 1); +x_271 = lean_ctor_get(x_45, 0); +x_272 = lean_ctor_get(x_45, 1); lean_inc(x_272); lean_inc(x_271); -lean_dec(x_22); +lean_dec(x_45); x_273 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_273, 0, x_271); lean_ctor_set(x_273, 1, x_272); @@ -9505,19 +9596,19 @@ return x_273; else { uint8_t x_274; -x_274 = !lean_is_exclusive(x_15); +x_274 = !lean_is_exclusive(x_40); if (x_274 == 0) { -return x_15; +return x_40; } else { lean_object* x_275; lean_object* x_276; lean_object* x_277; -x_275 = lean_ctor_get(x_15, 0); -x_276 = lean_ctor_get(x_15, 1); +x_275 = lean_ctor_get(x_40, 0); +x_276 = lean_ctor_get(x_40, 1); lean_inc(x_276); lean_inc(x_275); -lean_dec(x_15); +lean_dec(x_40); x_277 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_277, 0, x_275); lean_ctor_set(x_277, 1, x_276); @@ -9528,19 +9619,19 @@ return x_277; else { uint8_t x_278; -x_278 = !lean_is_exclusive(x_11); +x_278 = !lean_is_exclusive(x_37); if (x_278 == 0) { -return x_11; +return x_37; } else { lean_object* x_279; lean_object* x_280; lean_object* x_281; -x_279 = lean_ctor_get(x_11, 0); -x_280 = lean_ctor_get(x_11, 1); +x_279 = lean_ctor_get(x_37, 0); +x_280 = lean_ctor_get(x_37, 1); lean_inc(x_280); lean_inc(x_279); -lean_dec(x_11); +lean_dec(x_37); x_281 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_281, 0, x_279); lean_ctor_set(x_281, 1, x_280); @@ -9551,23 +9642,161 @@ return x_281; else { uint8_t x_282; -x_282 = !lean_is_exclusive(x_7); +x_282 = !lean_is_exclusive(x_34); if (x_282 == 0) { +return x_34; +} +else +{ +lean_object* x_283; lean_object* x_284; lean_object* x_285; +x_283 = lean_ctor_get(x_34, 0); +x_284 = lean_ctor_get(x_34, 1); +lean_inc(x_284); +lean_inc(x_283); +lean_dec(x_34); +x_285 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_285, 0, x_283); +lean_ctor_set(x_285, 1, x_284); +return x_285; +} +} +} +else +{ +uint8_t x_286; +x_286 = !lean_is_exclusive(x_27); +if (x_286 == 0) +{ +return x_27; +} +else +{ +lean_object* x_287; lean_object* x_288; lean_object* x_289; +x_287 = lean_ctor_get(x_27, 0); +x_288 = lean_ctor_get(x_27, 1); +lean_inc(x_288); +lean_inc(x_287); +lean_dec(x_27); +x_289 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_289, 0, x_287); +lean_ctor_set(x_289, 1, x_288); +return x_289; +} +} +} +else +{ +uint8_t x_290; +x_290 = !lean_is_exclusive(x_24); +if (x_290 == 0) +{ +return x_24; +} +else +{ +lean_object* x_291; lean_object* x_292; lean_object* x_293; +x_291 = lean_ctor_get(x_24, 0); +x_292 = lean_ctor_get(x_24, 1); +lean_inc(x_292); +lean_inc(x_291); +lean_dec(x_24); +x_293 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_293, 0, x_291); +lean_ctor_set(x_293, 1, x_292); +return x_293; +} +} +} +else +{ +uint8_t x_294; +x_294 = !lean_is_exclusive(x_21); +if (x_294 == 0) +{ +return x_21; +} +else +{ +lean_object* x_295; lean_object* x_296; lean_object* x_297; +x_295 = lean_ctor_get(x_21, 0); +x_296 = lean_ctor_get(x_21, 1); +lean_inc(x_296); +lean_inc(x_295); +lean_dec(x_21); +x_297 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_297, 0, x_295); +lean_ctor_set(x_297, 1, x_296); +return x_297; +} +} +} +else +{ +uint8_t x_298; +x_298 = !lean_is_exclusive(x_15); +if (x_298 == 0) +{ +return x_15; +} +else +{ +lean_object* x_299; lean_object* x_300; lean_object* x_301; +x_299 = lean_ctor_get(x_15, 0); +x_300 = lean_ctor_get(x_15, 1); +lean_inc(x_300); +lean_inc(x_299); +lean_dec(x_15); +x_301 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_301, 0, x_299); +lean_ctor_set(x_301, 1, x_300); +return x_301; +} +} +} +else +{ +uint8_t x_302; +x_302 = !lean_is_exclusive(x_11); +if (x_302 == 0) +{ +return x_11; +} +else +{ +lean_object* x_303; lean_object* x_304; lean_object* x_305; +x_303 = lean_ctor_get(x_11, 0); +x_304 = lean_ctor_get(x_11, 1); +lean_inc(x_304); +lean_inc(x_303); +lean_dec(x_11); +x_305 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_305, 0, x_303); +lean_ctor_set(x_305, 1, x_304); +return x_305; +} +} +} +else +{ +uint8_t x_306; +x_306 = !lean_is_exclusive(x_7); +if (x_306 == 0) +{ return x_7; } else { -lean_object* x_283; lean_object* x_284; lean_object* x_285; -x_283 = lean_ctor_get(x_7, 0); -x_284 = lean_ctor_get(x_7, 1); -lean_inc(x_284); -lean_inc(x_283); +lean_object* x_307; lean_object* x_308; lean_object* x_309; +x_307 = lean_ctor_get(x_7, 0); +x_308 = lean_ctor_get(x_7, 1); +lean_inc(x_308); +lean_inc(x_307); lean_dec(x_7); -x_285 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_285, 0, x_283); -lean_ctor_set(x_285, 1, x_284); -return x_285; +x_309 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_309, 0, x_307); +lean_ctor_set(x_309, 1, x_308); +return x_309; } } } @@ -9933,6 +10162,10 @@ l_Lean_Parser_sepByIndent_parenthesizer___closed__3 = _init_l_Lean_Parser_sepByI lean_mark_persistent(l_Lean_Parser_sepByIndent_parenthesizer___closed__3); l_Lean_Parser_sepByIndent_parenthesizer___closed__4 = _init_l_Lean_Parser_sepByIndent_parenthesizer___closed__4(); lean_mark_persistent(l_Lean_Parser_sepByIndent_parenthesizer___closed__4); +l_Lean_Parser_patternIgnore_formatter___closed__1 = _init_l_Lean_Parser_patternIgnore_formatter___closed__1(); +lean_mark_persistent(l_Lean_Parser_patternIgnore_formatter___closed__1); +l_Lean_Parser_patternIgnore_formatter___closed__2 = _init_l_Lean_Parser_patternIgnore_formatter___closed__2(); +lean_mark_persistent(l_Lean_Parser_patternIgnore_formatter___closed__2); l_Lean_Parser_ppHardSpace = _init_l_Lean_Parser_ppHardSpace(); lean_mark_persistent(l_Lean_Parser_ppHardSpace); l_Lean_Parser_ppSpace = _init_l_Lean_Parser_ppSpace(); @@ -10185,239 +10418,255 @@ l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegi lean_mark_persistent(l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__80); l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__81 = _init_l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__81(); lean_mark_persistent(l_Lean_Parser___aux__Lean__Parser__Extra______macroRules__Lean__Parser__termRegister__parser__alias_x28Kind_x3a_x3d___x29__________1___lambda__1___closed__81); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__1 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__1(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__1); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__2 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__2(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__2); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__3 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__3(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__3); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__4 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__4(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__4); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__5 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__5(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__5); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__6 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__6(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__6); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__7 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__7(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__7); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__8 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__8(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__8); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__9 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__9(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__9); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__10 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__10(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__10); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__11 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__11(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__11); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__12 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__12(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__12); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__13 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__13(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__13); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__14 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__14(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__14); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__15 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__15(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__15); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__16 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__16(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__16); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__17 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__17(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__17); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__18 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__18(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__18); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__19 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__19(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__19); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__20 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__20(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__20); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__21 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__21(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__21); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__22 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__22(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__22); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__23 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__23(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__23); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__24 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__24(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__24); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__25 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__25(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__25); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__26 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__26(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__26); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__27 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__27(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__27); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__28 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__28(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__28); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__29 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__29(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__29); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__30 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__30(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__30); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__31 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__31(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__31); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__32 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__32(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__32); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__33 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__33(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__33); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__34 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__34(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__34); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__35 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__35(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__35); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__36 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__36(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__36); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__37 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__37(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__37); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__38 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__38(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__38); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__39 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__39(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__39); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__40 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__40(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__40); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__41 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__41(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__41); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__42 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__42(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__42); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__43 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__43(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__43); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__44 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__44(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__44); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__45 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__45(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__45); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__46 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__46(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__46); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__47 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__47(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__47); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__48 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__48(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__48); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__49 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__49(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__49); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__50 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__50(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__50); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__51 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__51(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__51); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__52 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__52(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__52); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__53 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__53(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__53); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__54 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__54(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__54); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__55 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__55(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__55); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__56 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__56(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__56); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__57 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__57(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__57); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__58 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__58(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__58); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__59 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__59(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__59); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__60 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__60(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__60); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__61 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__61(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__61); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__62 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__62(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__62); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__63 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__63(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__63); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__64 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__64(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__64); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__65 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__65(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__65); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__66 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__66(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__66); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__67 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__67(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__67); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__68 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__68(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__68); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__69 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__69(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__69); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__70 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__70(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__70); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__71 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__71(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__71); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__72 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__72(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__72); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__73 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__73(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__73); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__74 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__74(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__74); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__75 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__75(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__75); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__76 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__76(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__76); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__77 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__77(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__77); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__78 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__78(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__78); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__79 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__79(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__79); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__80 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__80(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__80); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__81 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__81(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__81); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__82 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__82(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__82); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__83 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__83(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__83); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__84 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__84(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__84); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__85 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__85(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__85); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__86 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__86(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__86); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__87 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__87(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__87); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__88 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__88(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__88); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__89 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__89(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__89); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__90 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__90(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__90); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__91 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__91(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__91); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__92 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__92(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__92); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__93 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__93(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__93); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__94 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__94(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__94); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__95 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__95(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__95); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__96 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__96(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__96); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__97 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__97(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__97); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__98 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__98(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__98); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__99 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__99(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__99); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__100 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__100(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__100); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__101 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__101(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__101); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__102 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__102(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__102); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__103 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__103(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__103); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__104 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__104(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__104); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__105 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__105(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__105); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__106 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__106(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__106); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__107 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__107(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__107); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__108 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__108(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__108); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__109 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__109(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__109); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__110 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__110(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__110); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__111 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__111(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__111); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__112 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__112(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__112); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__113 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__113(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__113); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__114 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__114(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__114); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__115 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__115(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__115); -l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__116 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__116(); -lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104____closed__116); -res = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2104_(lean_io_mk_world()); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__1 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__1(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__1); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__2 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__2(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__2); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__3 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__3(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__3); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__4 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__4(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__4); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__5 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__5(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__5); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__6 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__6(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__6); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__7 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__7(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__7); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__8 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__8(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__8); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__9 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__9(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__9); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__10 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__10(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__10); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__11 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__11(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__11); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__12 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__12(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__12); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__13 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__13(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__13); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__14 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__14(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__14); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__15 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__15(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__15); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__16 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__16(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__16); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__17 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__17(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__17); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__18 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__18(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__18); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__19 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__19(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__19); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__20 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__20(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__20); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__21 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__21(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__21); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__22 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__22(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__22); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__23 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__23(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__23); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__24 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__24(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__24); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__25 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__25(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__25); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__26 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__26(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__26); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__27 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__27(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__27); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__28 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__28(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__28); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__29 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__29(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__29); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__30 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__30(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__30); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__31 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__31(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__31); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__32 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__32(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__32); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__33 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__33(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__33); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__34 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__34(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__34); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__35 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__35(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__35); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__36 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__36(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__36); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__37 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__37(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__37); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__38 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__38(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__38); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__39 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__39(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__39); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__40 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__40(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__40); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__41 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__41(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__41); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__42 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__42(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__42); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__43 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__43(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__43); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__44 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__44(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__44); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__45 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__45(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__45); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__46 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__46(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__46); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__47 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__47(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__47); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__48 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__48(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__48); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__49 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__49(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__49); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__50 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__50(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__50); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__51 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__51(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__51); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__52 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__52(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__52); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__53 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__53(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__53); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__54 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__54(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__54); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__55 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__55(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__55); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__56 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__56(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__56); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__57 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__57(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__57); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__58 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__58(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__58); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__59 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__59(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__59); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__60 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__60(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__60); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__61 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__61(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__61); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__62 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__62(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__62); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__63 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__63(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__63); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__64 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__64(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__64); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__65 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__65(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__65); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__66 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__66(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__66); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__67 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__67(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__67); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__68 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__68(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__68); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__69 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__69(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__69); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__70 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__70(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__70); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__71 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__71(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__71); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__72 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__72(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__72); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__73 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__73(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__73); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__74 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__74(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__74); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__75 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__75(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__75); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__76 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__76(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__76); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__77 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__77(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__77); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__78 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__78(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__78); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__79 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__79(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__79); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__80 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__80(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__80); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__81 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__81(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__81); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__82 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__82(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__82); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__83 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__83(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__83); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__84 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__84(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__84); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__85 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__85(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__85); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__86 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__86(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__86); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__87 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__87(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__87); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__88 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__88(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__88); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__89 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__89(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__89); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__90 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__90(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__90); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__91 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__91(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__91); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__92 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__92(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__92); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__93 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__93(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__93); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__94 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__94(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__94); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__95 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__95(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__95); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__96 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__96(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__96); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__97 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__97(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__97); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__98 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__98(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__98); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__99 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__99(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__99); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__100 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__100(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__100); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__101 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__101(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__101); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__102 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__102(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__102); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__103 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__103(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__103); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__104 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__104(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__104); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__105 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__105(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__105); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__106 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__106(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__106); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__107 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__107(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__107); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__108 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__108(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__108); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__109 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__109(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__109); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__110 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__110(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__110); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__111 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__111(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__111); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__112 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__112(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__112); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__113 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__113(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__113); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__114 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__114(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__114); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__115 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__115(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__115); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__116 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__116(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__116); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__117 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__117(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__117); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__118 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__118(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__118); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__119 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__119(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__119); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__120 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__120(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__120); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__121 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__121(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__121); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__122 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__122(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__122); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__123 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__123(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__123); +l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__124 = _init_l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__124(); +lean_mark_persistent(l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111____closed__124); +res = l_Lean_Parser_initFn____x40_Lean_Parser_Extra___hyg_2111_(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); return lean_io_result_mk_ok(lean_box(0)); diff --git a/stage0/stdlib/Lean/PrettyPrinter/Formatter.c b/stage0/stdlib/Lean/PrettyPrinter/Formatter.c index 648422b11d..c6c6ffdc8a 100644 --- a/stage0/stdlib/Lean/PrettyPrinter/Formatter.c +++ b/stage0/stdlib/Lean/PrettyPrinter/Formatter.c @@ -24,7 +24,7 @@ LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Formatter_ite___rarg___boxed(lean_ uint8_t l_Lean_Syntax_isAntiquotSuffixSplice(lean_object*); LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Formatter_visitArgs(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); size_t lean_usize_add(size_t, size_t); -LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Formatter_initFn____x40_Lean_PrettyPrinter_Formatter___hyg_6589_(lean_object*); +LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Formatter_initFn____x40_Lean_PrettyPrinter_Formatter___hyg_6640_(lean_object*); LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Formatter_checkTailWs_formatter___rarg(lean_object*); uint8_t l_Lean_Syntax_isTokenAntiquot(lean_object*); lean_object* l_Lean_registerTraceClass(lean_object*, uint8_t, lean_object*); @@ -122,6 +122,7 @@ lean_object* lean_string_utf8_extract(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Formatter_checkNoWsBefore_formatter___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Formatter_lookahead_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_PrettyPrinter_Formatter_orelse_formatter___closed__2; LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Formatter_checkTailWs_formatter___boxed(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Formatter_symbolNoAntiquot_formatter___closed__3; LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_mkFormatterAttribute(lean_object*); @@ -153,7 +154,6 @@ LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Formatter_pushToken___lambda__3___ LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Formatter_fill(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__3; static lean_object* l_Lean_PrettyPrinter_mkFormatterAttribute___closed__9; -static lean_object* l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__7; lean_object* l_Lean_Parser_registerAliasCore___rarg(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Formatter_getStack___boxed(lean_object*); static lean_object* l_Lean_PrettyPrinter_Formatter_scientificLitNoAntiquot_formatter___closed__2; @@ -271,7 +271,6 @@ LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Formatter_checkLhsPrec_formatter(l LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Formatter_checkKind___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Formatter_mkAntiquot_formatter_x27___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Syntax_MonadTraverser_goUp___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__4___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__6; lean_object* l___private_Init_Util_0__mkPanicMessageWithDecl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_reverse___rarg(lean_object*); static lean_object* l_Lean_PrettyPrinter_Formatter_identNoAntiquot_formatter___closed__2; @@ -418,11 +417,12 @@ static lean_object* l_Lean_PrettyPrinter_Formatter_instMonadTraverserFormatterM_ LEAN_EXPORT lean_object* l___private_Lean_PrettyPrinter_Formatter_0__Lean_PrettyPrinter_Formatter_SourceInfo_getExprPos_x3f___boxed(lean_object*); LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Formatter_withoutInfo_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Std_instInhabitedFormat; +static lean_object* l_Lean_PrettyPrinter_Formatter_orelse_formatter___closed__1; static lean_object* l_Lean_PrettyPrinter_Formatter_numLitNoAntiquot_formatter___closed__2; LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Formatter_concat___lambda__1___boxed(lean_object*); LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Formatter_parserOfStack_formatter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Formatter_nameLitNoAntiquot_formatter___closed__2; -LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_initFn____x40_Lean_PrettyPrinter_Formatter___hyg_7236_(lean_object*); +LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_initFn____x40_Lean_PrettyPrinter_Formatter___hyg_7287_(lean_object*); lean_object* lean_int_sub(lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Formatter_symbolNoAntiquot_formatter___closed__6; static lean_object* l_Lean_PrettyPrinter_mkCombinatorFormatterAttribute___closed__4; @@ -3742,155 +3742,196 @@ lean_dec(x_1); return x_8; } } +static lean_object* _init_l_Lean_PrettyPrinter_Formatter_orelse_formatter___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string_from_bytes("choice", 6); +return x_1; +} +} +static lean_object* _init_l_Lean_PrettyPrinter_Formatter_orelse_formatter___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_PrettyPrinter_Formatter_orelse_formatter___closed__1; +x_3 = l_Lean_Name_str___override(x_1, x_2); +return x_3; +} +} LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Formatter_orelse_formatter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; -x_8 = lean_st_ref_get(x_6, x_7); -x_9 = lean_ctor_get(x_8, 1); +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_8 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___rarg(x_4, x_5, x_6, x_7); +x_9 = lean_ctor_get(x_8, 0); lean_inc(x_9); +x_10 = lean_ctor_get(x_8, 1); +lean_inc(x_10); lean_dec(x_8); -x_10 = lean_st_ref_get(x_4, x_9); -x_11 = lean_ctor_get(x_10, 0); -lean_inc(x_11); -x_12 = lean_ctor_get(x_10, 1); -lean_inc(x_12); -lean_dec(x_10); +x_11 = l_Lean_Syntax_getKind(x_9); +x_12 = l_Lean_PrettyPrinter_Formatter_orelse_formatter___closed__2; +x_13 = lean_name_eq(x_11, x_12); +lean_dec(x_11); +if (x_13 == 0) +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_14 = lean_st_ref_get(x_6, x_10); +x_15 = lean_ctor_get(x_14, 1); +lean_inc(x_15); +lean_dec(x_14); +x_16 = lean_st_ref_get(x_4, x_15); +x_17 = lean_ctor_get(x_16, 0); +lean_inc(x_17); +x_18 = lean_ctor_get(x_16, 1); +lean_inc(x_18); +lean_dec(x_16); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); -x_13 = lean_apply_5(x_1, x_3, x_4, x_5, x_6, x_12); -if (lean_obj_tag(x_13) == 0) +x_19 = lean_apply_5(x_1, x_3, x_4, x_5, x_6, x_18); +if (lean_obj_tag(x_19) == 0) { -lean_dec(x_11); +lean_dec(x_17); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -return x_13; +return x_19; } else { -lean_object* x_14; -x_14 = lean_ctor_get(x_13, 0); -lean_inc(x_14); -if (lean_obj_tag(x_14) == 0) +lean_object* x_20; +x_20 = lean_ctor_get(x_19, 0); +lean_inc(x_20); +if (lean_obj_tag(x_20) == 0) { -uint8_t x_15; -lean_dec(x_11); +uint8_t x_21; +lean_dec(x_17); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_15 = !lean_is_exclusive(x_13); -if (x_15 == 0) +x_21 = !lean_is_exclusive(x_19); +if (x_21 == 0) { -lean_object* x_16; -x_16 = lean_ctor_get(x_13, 0); -lean_dec(x_16); -return x_13; -} -else -{ -lean_object* x_17; lean_object* x_18; -x_17 = lean_ctor_get(x_13, 1); -lean_inc(x_17); -lean_dec(x_13); -x_18 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_18, 0, x_14); -lean_ctor_set(x_18, 1, x_17); -return x_18; -} -} -else -{ -uint8_t x_19; -x_19 = !lean_is_exclusive(x_13); -if (x_19 == 0) -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; -x_20 = lean_ctor_get(x_13, 1); -x_21 = lean_ctor_get(x_13, 0); -lean_dec(x_21); -x_22 = lean_ctor_get(x_14, 0); -lean_inc(x_22); -x_23 = l_Lean_PrettyPrinter_FormatterM_orElse___rarg___closed__1; -x_24 = lean_nat_dec_eq(x_23, x_22); +lean_object* x_22; +x_22 = lean_ctor_get(x_19, 0); lean_dec(x_22); -if (x_24 == 0) -{ -lean_dec(x_11); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_13; +return x_19; } else { -lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; -lean_free_object(x_13); -lean_dec(x_14); -x_25 = lean_st_ref_get(x_6, x_20); -x_26 = lean_ctor_get(x_25, 1); -lean_inc(x_26); -lean_dec(x_25); -x_27 = lean_st_ref_set(x_4, x_11, x_26); -x_28 = lean_ctor_get(x_27, 1); -lean_inc(x_28); +lean_object* x_23; lean_object* x_24; +x_23 = lean_ctor_get(x_19, 1); +lean_inc(x_23); +lean_dec(x_19); +x_24 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_24, 0, x_20); +lean_ctor_set(x_24, 1, x_23); +return x_24; +} +} +else +{ +uint8_t x_25; +x_25 = !lean_is_exclusive(x_19); +if (x_25 == 0) +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; uint8_t x_30; +x_26 = lean_ctor_get(x_19, 1); +x_27 = lean_ctor_get(x_19, 0); lean_dec(x_27); -x_29 = lean_apply_5(x_2, x_3, x_4, x_5, x_6, x_28); -return x_29; -} -} -else +x_28 = lean_ctor_get(x_20, 0); +lean_inc(x_28); +x_29 = l_Lean_PrettyPrinter_FormatterM_orElse___rarg___closed__1; +x_30 = lean_nat_dec_eq(x_29, x_28); +lean_dec(x_28); +if (x_30 == 0) { -lean_object* x_30; lean_object* x_31; lean_object* x_32; uint8_t x_33; -x_30 = lean_ctor_get(x_13, 1); -lean_inc(x_30); -lean_dec(x_13); -x_31 = lean_ctor_get(x_14, 0); -lean_inc(x_31); -x_32 = l_Lean_PrettyPrinter_FormatterM_orElse___rarg___closed__1; -x_33 = lean_nat_dec_eq(x_32, x_31); -lean_dec(x_31); -if (x_33 == 0) -{ -lean_object* x_34; -lean_dec(x_11); +lean_dec(x_17); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_14); -lean_ctor_set(x_34, 1, x_30); -return x_34; +return x_19; } else { -lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; -lean_dec(x_14); -x_35 = lean_st_ref_get(x_6, x_30); -x_36 = lean_ctor_get(x_35, 1); +lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; +lean_free_object(x_19); +lean_dec(x_20); +x_31 = lean_st_ref_get(x_6, x_26); +x_32 = lean_ctor_get(x_31, 1); +lean_inc(x_32); +lean_dec(x_31); +x_33 = lean_st_ref_set(x_4, x_17, x_32); +x_34 = lean_ctor_get(x_33, 1); +lean_inc(x_34); +lean_dec(x_33); +x_35 = lean_apply_5(x_2, x_3, x_4, x_5, x_6, x_34); +return x_35; +} +} +else +{ +lean_object* x_36; lean_object* x_37; lean_object* x_38; uint8_t x_39; +x_36 = lean_ctor_get(x_19, 1); lean_inc(x_36); -lean_dec(x_35); -x_37 = lean_st_ref_set(x_4, x_11, x_36); -x_38 = lean_ctor_get(x_37, 1); -lean_inc(x_38); +lean_dec(x_19); +x_37 = lean_ctor_get(x_20, 0); +lean_inc(x_37); +x_38 = l_Lean_PrettyPrinter_FormatterM_orElse___rarg___closed__1; +x_39 = lean_nat_dec_eq(x_38, x_37); lean_dec(x_37); -x_39 = lean_apply_5(x_2, x_3, x_4, x_5, x_6, x_38); -return x_39; +if (x_39 == 0) +{ +lean_object* x_40; +lean_dec(x_17); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_40 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_40, 0, x_20); +lean_ctor_set(x_40, 1, x_36); +return x_40; +} +else +{ +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; +lean_dec(x_20); +x_41 = lean_st_ref_get(x_6, x_36); +x_42 = lean_ctor_get(x_41, 1); +lean_inc(x_42); +lean_dec(x_41); +x_43 = lean_st_ref_set(x_4, x_17, x_42); +x_44 = lean_ctor_get(x_43, 1); +lean_inc(x_44); +lean_dec(x_43); +x_45 = lean_apply_5(x_2, x_3, x_4, x_5, x_6, x_44); +return x_45; } } } } } +else +{ +lean_object* x_46; lean_object* x_47; +x_46 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Formatter_orelse_formatter), 7, 2); +lean_closure_set(x_46, 0, x_1); +lean_closure_set(x_46, 1, x_2); +x_47 = l_Lean_PrettyPrinter_Formatter_visitArgs(x_46, x_3, x_4, x_5, x_6, x_10); +return x_47; +} +} } LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Formatter_mkAntiquot_formatter_x27___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { _start: @@ -4654,7 +4695,7 @@ static lean_object* _init_l_Lean_PrettyPrinter_Formatter_categoryFormatterCore__ _start: { lean_object* x_1; -x_1 = lean_mk_string_from_bytes("choice", 6); +x_1 = lean_mk_string_from_bytes("rawStx", 6); return x_1; } } @@ -4672,29 +4713,11 @@ static lean_object* _init_l_Lean_PrettyPrinter_Formatter_categoryFormatterCore__ _start: { lean_object* x_1; -x_1 = lean_mk_string_from_bytes("rawStx", 6); -return x_1; -} -} -static lean_object* _init_l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__5() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_box(0); -x_2 = l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__4; -x_3 = l_Lean_Name_str___override(x_1, x_2); -return x_3; -} -} -static lean_object* _init_l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__6() { -_start: -{ -lean_object* x_1; x_1 = lean_alloc_closure((void*)(l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Formatter_visitArgs___spec__1___boxed), 1, 0); return x_1; } } -static lean_object* _init_l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__7() { +static lean_object* _init_l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__5() { _start: { lean_object* x_1; @@ -4709,12 +4732,12 @@ lean_object* x_9; lean_object* x_10; lean_object* x_11; uint8_t x_12; x_9 = l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__1; lean_inc(x_1); x_10 = l_Lean_Syntax_getKind(x_1); -x_11 = l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__3; +x_11 = l_Lean_PrettyPrinter_Formatter_orelse_formatter___closed__2; x_12 = lean_name_eq(x_10, x_11); if (x_12 == 0) { lean_object* x_13; uint8_t x_14; -x_13 = l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__5; +x_13 = l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__3; x_14 = lean_name_eq(x_2, x_13); if (x_14 == 0) { @@ -4845,8 +4868,8 @@ lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_dec(x_10); lean_dec(x_2); lean_dec(x_1); -x_47 = l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__6; -x_48 = l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__7; +x_47 = l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__4; +x_48 = l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__5; x_49 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_PrettyPrinter_Formatter_categoryFormatterCore___spec__2___rarg), 7, 2); lean_closure_set(x_49, 0, x_47); lean_closure_set(x_49, 1, x_48); @@ -7571,7 +7594,7 @@ _start: lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; x_1 = l_Lean_PrettyPrinter_Formatter_symbolNoAntiquot_formatter___closed__5; x_2 = l_Lean_PrettyPrinter_Formatter_symbolNoAntiquot_formatter___closed__6; -x_3 = lean_unsigned_to_nat(377u); +x_3 = lean_unsigned_to_nat(385u); x_4 = lean_unsigned_to_nat(42u); x_5 = l_Lean_PrettyPrinter_Formatter_symbolNoAntiquot_formatter___closed__7; x_6 = l___private_Init_Util_0__mkPanicMessageWithDecl(x_1, x_2, x_3, x_4, x_5); @@ -10179,7 +10202,7 @@ x_10 = l_Lean_PrettyPrinter_Formatter_ite___rarg(x_9, x_2, x_3, x_4, x_5, x_6, x return x_10; } } -LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Formatter_initFn____x40_Lean_PrettyPrinter_Formatter___hyg_6589_(lean_object* x_1) { +LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Formatter_initFn____x40_Lean_PrettyPrinter_Formatter___hyg_6640_(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; uint8_t x_4; @@ -10869,7 +10892,7 @@ x_6 = l_Lean_PrettyPrinter_formatCategory(x_5, x_1, x_2, x_3, x_4); return x_6; } } -LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_initFn____x40_Lean_PrettyPrinter_Formatter___hyg_7236_(lean_object* x_1) { +LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_initFn____x40_Lean_PrettyPrinter_Formatter___hyg_7287_(lean_object* x_1) { _start: { lean_object* x_2; uint8_t x_3; lean_object* x_4; @@ -11061,6 +11084,10 @@ l_Lean_PrettyPrinter_Formatter_visitArgs___closed__1 = _init_l_Lean_PrettyPrinte lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_visitArgs___closed__1); l_Lean_PrettyPrinter_Formatter_concat___closed__1 = _init_l_Lean_PrettyPrinter_Formatter_concat___closed__1(); lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_concat___closed__1); +l_Lean_PrettyPrinter_Formatter_orelse_formatter___closed__1 = _init_l_Lean_PrettyPrinter_Formatter_orelse_formatter___closed__1(); +lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_orelse_formatter___closed__1); +l_Lean_PrettyPrinter_Formatter_orelse_formatter___closed__2 = _init_l_Lean_PrettyPrinter_Formatter_orelse_formatter___closed__2(); +lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_orelse_formatter___closed__2); l_Lean_PrettyPrinter_Formatter_formatterForKindUnsafe___closed__1 = _init_l_Lean_PrettyPrinter_Formatter_formatterForKindUnsafe___closed__1(); lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_formatterForKindUnsafe___closed__1); l_Lean_PrettyPrinter_Formatter_formatterForKindUnsafe___closed__2 = _init_l_Lean_PrettyPrinter_Formatter_formatterForKindUnsafe___closed__2(); @@ -11085,10 +11112,6 @@ l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__4 = _ lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__4); l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__5 = _init_l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__5(); lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__5); -l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__6 = _init_l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__6(); -lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__6); -l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__7 = _init_l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__7(); -lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___lambda__4___closed__7); l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___closed__1 = _init_l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___closed__1(); lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___closed__1); l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___closed__2 = _init_l_Lean_PrettyPrinter_Formatter_categoryFormatterCore___closed__2(); @@ -11207,7 +11230,7 @@ l_Array_foldlMUnsafe_fold___at_Lean_PrettyPrinter_Formatter_interpolatedStr_form lean_mark_persistent(l_Array_foldlMUnsafe_fold___at_Lean_PrettyPrinter_Formatter_interpolatedStr_formatter___spec__2___closed__2); l_Lean_PrettyPrinter_Formatter_interpolatedStr_formatter___boxed__const__1 = _init_l_Lean_PrettyPrinter_Formatter_interpolatedStr_formatter___boxed__const__1(); lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_interpolatedStr_formatter___boxed__const__1); -if (builtin) {res = l_Lean_PrettyPrinter_Formatter_initFn____x40_Lean_PrettyPrinter_Formatter___hyg_6589_(lean_io_mk_world()); +if (builtin) {res = l_Lean_PrettyPrinter_Formatter_initFn____x40_Lean_PrettyPrinter_Formatter___hyg_6640_(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; l_Lean_PrettyPrinter_Formatter_formatterAliasesRef = lean_io_result_get_value(res); lean_mark_persistent(l_Lean_PrettyPrinter_Formatter_formatterAliasesRef); @@ -11236,7 +11259,7 @@ l_Lean_PrettyPrinter_formatCommand___closed__1 = _init_l_Lean_PrettyPrinter_form lean_mark_persistent(l_Lean_PrettyPrinter_formatCommand___closed__1); l_Lean_PrettyPrinter_formatCommand___closed__2 = _init_l_Lean_PrettyPrinter_formatCommand___closed__2(); lean_mark_persistent(l_Lean_PrettyPrinter_formatCommand___closed__2); -res = l_Lean_PrettyPrinter_initFn____x40_Lean_PrettyPrinter_Formatter___hyg_7236_(lean_io_mk_world()); +res = l_Lean_PrettyPrinter_initFn____x40_Lean_PrettyPrinter_Formatter___hyg_7287_(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); return lean_io_result_mk_ok(lean_box(0)); diff --git a/stage0/stdlib/Lean/PrettyPrinter/Parenthesizer.c b/stage0/stdlib/Lean/PrettyPrinter/Parenthesizer.c index c8c17ebe08..e1f79f691a 100644 --- a/stage0/stdlib/Lean/PrettyPrinter/Parenthesizer.c +++ b/stage0/stdlib/Lean/PrettyPrinter/Parenthesizer.c @@ -79,6 +79,7 @@ static lean_object* l_Lean_PrettyPrinter_mkParenthesizerAttribute___closed__10; static lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__3; LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_parenthesize___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___closed__2; +static lean_object* l_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer___closed__1; LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___lambda__10(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkColEq_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_node2(lean_object*, lean_object*, lean_object*, lean_object*); @@ -90,7 +91,7 @@ lean_object* lean_environment_find(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Syntax_MonadTraverser_goUp___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__4___boxed(lean_object*); LEAN_EXPORT lean_object* l_Lean_isTracingEnabledFor___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_st_ref_get(lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_initFn____x40_Lean_PrettyPrinter_Parenthesizer___hyg_6568_(lean_object*); +LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_initFn____x40_Lean_PrettyPrinter_Parenthesizer___hyg_6637_(lean_object*); LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___lambda__9___boxed(lean_object**); LEAN_EXPORT lean_object* l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___lambda__1___closed__6; @@ -242,6 +243,7 @@ LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_pushNone_parenthesiz LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_scientificLitNoAntiquot_parenthesizer___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_mkParenthesizerAttribute___closed__12; LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_incQuotDepth_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer___closed__2; static lean_object* l_Lean_PrettyPrinter_ParenthesizerM_orElse___rarg___closed__1; LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_categoryParserOfStack_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_parenthesizeCategory(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -362,7 +364,7 @@ LEAN_EXPORT lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_level_p static lean_object* l_Lean_PrettyPrinter_Parenthesizer_level_parenthesizer___lambda__1___closed__2; static lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkKind___closed__2; LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_mkCategoryParenthesizerAttribute___lambda__1(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_initFn____x40_Lean_PrettyPrinter_Parenthesizer___hyg_5957_(lean_object*); +LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_initFn____x40_Lean_PrettyPrinter_Parenthesizer___hyg_6026_(lean_object*); static lean_object* l_Option_format___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__6___closed__4; LEAN_EXPORT lean_object* l_Lean_isTracingEnabledFor___at_Lean_PrettyPrinter_parenthesize___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_setExpected_parenthesizer(lean_object*); @@ -418,9 +420,8 @@ static lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_tactic_paren LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_parenthesizeTactic(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_instMonadQuotation___rarg(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___lambda__10___closed__10; -static lean_object* l_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___closed__1; LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___lambda__8(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Nat_forM_loop___at_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Nat_forM_loop___at_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_st_ref_set(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___lambda__10___closed__20; LEAN_EXPORT lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer(lean_object*); @@ -436,7 +437,7 @@ LEAN_EXPORT lean_object* l_Lean_Syntax_MonadTraverser_goUp___at_Lean_PrettyPrint static lean_object* l_Lean_PrettyPrinter_mkCombinatorParenthesizerAttribute___closed__4; LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_symbolNoAntiquot_parenthesizer___boxed(lean_object*, lean_object*); static lean_object* l_Lean_addTrace___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__3___closed__1; -LEAN_EXPORT lean_object* l_Nat_forM_loop___at_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Nat_forM_loop___at_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Syntax_MonadTraverser_getIdx___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__2; static lean_object* l_Lean_PrettyPrinter_mkParenthesizerAttribute___closed__3; @@ -447,7 +448,6 @@ LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_mkAntiquot_parenthes LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_instMonadTraverserParenthesizerM___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_rawIdentNoAntiquot_parenthesizer(lean_object*); LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkColGt_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___closed__2; LEAN_EXPORT lean_object* l_Lean_Syntax_MonadTraverser_getIdx___at_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___spec__1___boxed(lean_object*); LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkLinebreakBefore_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_mkCategoryParenthesizerAttribute___closed__2; @@ -510,6 +510,7 @@ LEAN_EXPORT lean_object* l_Lean_Syntax_MonadTraverser_getIdx___at_Lean_PrettyPri static lean_object* l_Lean_PrettyPrinter_Parenthesizer_tactic_parenthesizer___closed__1; LEAN_EXPORT lean_object* l_ReaderT_bind___at_Lean_PrettyPrinter_Parenthesizer_trailingNode_parenthesizer___spec__1(lean_object*, lean_object*); lean_object* l_Lean_Syntax_Traverser_left(lean_object*); +LEAN_EXPORT lean_object* l_Nat_forM_loop___at_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___lambda__10___closed__17; LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_categoryParserOfStack_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_mkCombinatorParenthesizerAttribute___closed__2; @@ -532,6 +533,7 @@ LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___ static lean_object* l_Lean_PrettyPrinter_parenthesize___closed__2; static lean_object* l_Lean_PrettyPrinter_Parenthesizer_level_parenthesizer___closed__2; LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_addPrecCheck___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Nat_forM_loop___at_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___lambda__10___closed__9; LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_notFollowedBy_parenthesizer___rarg(lean_object*); LEAN_EXPORT lean_object* l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); @@ -5523,155 +5525,291 @@ lean_dec(x_1); return x_2; } } +LEAN_EXPORT lean_object* l_Nat_forM_loop___at_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +_start: +{ +lean_object* x_10; uint8_t x_11; +x_10 = lean_unsigned_to_nat(0u); +x_11 = lean_nat_dec_eq(x_4, x_10); +if (x_11 == 0) +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_12 = lean_unsigned_to_nat(1u); +x_13 = lean_nat_sub(x_4, x_12); +lean_dec(x_4); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_2); +lean_inc(x_1); +x_14 = l_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer(x_1, x_2, x_5, x_6, x_7, x_8, x_9); +if (lean_obj_tag(x_14) == 0) +{ +lean_object* x_15; +x_15 = lean_ctor_get(x_14, 1); +lean_inc(x_15); +lean_dec(x_14); +x_4 = x_13; +x_9 = x_15; +goto _start; +} +else +{ +uint8_t x_17; +lean_dec(x_13); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_2); +lean_dec(x_1); +x_17 = !lean_is_exclusive(x_14); +if (x_17 == 0) +{ +return x_14; +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_18 = lean_ctor_get(x_14, 0); +x_19 = lean_ctor_get(x_14, 1); +lean_inc(x_19); +lean_inc(x_18); +lean_dec(x_14); +x_20 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_20, 0, x_18); +lean_ctor_set(x_20, 1, x_19); +return x_20; +} +} +} +else +{ +lean_object* x_21; lean_object* x_22; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_21 = lean_box(0); +x_22 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_22, 0, x_21); +lean_ctor_set(x_22, 1, x_9); +return x_22; +} +} +} +static lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string_from_bytes("choice", 6); +return x_1; +} +} +static lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer___closed__1; +x_3 = l_Lean_Name_str___override(x_1, x_2); +return x_3; +} +} LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; -x_8 = lean_st_ref_get(x_6, x_7); -x_9 = lean_ctor_get(x_8, 1); +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_8 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_4, x_5, x_6, x_7); +x_9 = lean_ctor_get(x_8, 0); lean_inc(x_9); +x_10 = lean_ctor_get(x_8, 1); +lean_inc(x_10); lean_dec(x_8); -x_10 = lean_st_ref_get(x_4, x_9); -x_11 = lean_ctor_get(x_10, 0); -lean_inc(x_11); -x_12 = lean_ctor_get(x_10, 1); -lean_inc(x_12); -lean_dec(x_10); +lean_inc(x_9); +x_11 = l_Lean_Syntax_getKind(x_9); +x_12 = l_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer___closed__2; +x_13 = lean_name_eq(x_11, x_12); +lean_dec(x_11); +if (x_13 == 0) +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +lean_dec(x_9); +x_14 = lean_st_ref_get(x_6, x_10); +x_15 = lean_ctor_get(x_14, 1); +lean_inc(x_15); +lean_dec(x_14); +x_16 = lean_st_ref_get(x_4, x_15); +x_17 = lean_ctor_get(x_16, 0); +lean_inc(x_17); +x_18 = lean_ctor_get(x_16, 1); +lean_inc(x_18); +lean_dec(x_16); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); -x_13 = lean_apply_5(x_1, x_3, x_4, x_5, x_6, x_12); -if (lean_obj_tag(x_13) == 0) +x_19 = lean_apply_5(x_1, x_3, x_4, x_5, x_6, x_18); +if (lean_obj_tag(x_19) == 0) { -lean_dec(x_11); +lean_dec(x_17); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -return x_13; +return x_19; } else { -lean_object* x_14; -x_14 = lean_ctor_get(x_13, 0); -lean_inc(x_14); -if (lean_obj_tag(x_14) == 0) +lean_object* x_20; +x_20 = lean_ctor_get(x_19, 0); +lean_inc(x_20); +if (lean_obj_tag(x_20) == 0) { -uint8_t x_15; -lean_dec(x_11); +uint8_t x_21; +lean_dec(x_17); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_15 = !lean_is_exclusive(x_13); -if (x_15 == 0) +x_21 = !lean_is_exclusive(x_19); +if (x_21 == 0) { -lean_object* x_16; -x_16 = lean_ctor_get(x_13, 0); -lean_dec(x_16); -return x_13; -} -else -{ -lean_object* x_17; lean_object* x_18; -x_17 = lean_ctor_get(x_13, 1); -lean_inc(x_17); -lean_dec(x_13); -x_18 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_18, 0, x_14); -lean_ctor_set(x_18, 1, x_17); -return x_18; -} -} -else -{ -uint8_t x_19; -x_19 = !lean_is_exclusive(x_13); -if (x_19 == 0) -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; -x_20 = lean_ctor_get(x_13, 1); -x_21 = lean_ctor_get(x_13, 0); -lean_dec(x_21); -x_22 = lean_ctor_get(x_14, 0); -lean_inc(x_22); -x_23 = l_Lean_PrettyPrinter_ParenthesizerM_orElse___rarg___closed__1; -x_24 = lean_nat_dec_eq(x_23, x_22); +lean_object* x_22; +x_22 = lean_ctor_get(x_19, 0); lean_dec(x_22); -if (x_24 == 0) -{ -lean_dec(x_11); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_13; +return x_19; } else { -lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; -lean_free_object(x_13); -lean_dec(x_14); -x_25 = lean_st_ref_get(x_6, x_20); -x_26 = lean_ctor_get(x_25, 1); -lean_inc(x_26); -lean_dec(x_25); -x_27 = lean_st_ref_set(x_4, x_11, x_26); -x_28 = lean_ctor_get(x_27, 1); -lean_inc(x_28); +lean_object* x_23; lean_object* x_24; +x_23 = lean_ctor_get(x_19, 1); +lean_inc(x_23); +lean_dec(x_19); +x_24 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_24, 0, x_20); +lean_ctor_set(x_24, 1, x_23); +return x_24; +} +} +else +{ +uint8_t x_25; +x_25 = !lean_is_exclusive(x_19); +if (x_25 == 0) +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; uint8_t x_30; +x_26 = lean_ctor_get(x_19, 1); +x_27 = lean_ctor_get(x_19, 0); lean_dec(x_27); -x_29 = lean_apply_5(x_2, x_3, x_4, x_5, x_6, x_28); -return x_29; -} -} -else +x_28 = lean_ctor_get(x_20, 0); +lean_inc(x_28); +x_29 = l_Lean_PrettyPrinter_ParenthesizerM_orElse___rarg___closed__1; +x_30 = lean_nat_dec_eq(x_29, x_28); +lean_dec(x_28); +if (x_30 == 0) { -lean_object* x_30; lean_object* x_31; lean_object* x_32; uint8_t x_33; -x_30 = lean_ctor_get(x_13, 1); -lean_inc(x_30); -lean_dec(x_13); -x_31 = lean_ctor_get(x_14, 0); -lean_inc(x_31); -x_32 = l_Lean_PrettyPrinter_ParenthesizerM_orElse___rarg___closed__1; -x_33 = lean_nat_dec_eq(x_32, x_31); -lean_dec(x_31); -if (x_33 == 0) -{ -lean_object* x_34; -lean_dec(x_11); +lean_dec(x_17); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_14); -lean_ctor_set(x_34, 1, x_30); -return x_34; +return x_19; } else { -lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; -lean_dec(x_14); -x_35 = lean_st_ref_get(x_6, x_30); -x_36 = lean_ctor_get(x_35, 1); +lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; +lean_free_object(x_19); +lean_dec(x_20); +x_31 = lean_st_ref_get(x_6, x_26); +x_32 = lean_ctor_get(x_31, 1); +lean_inc(x_32); +lean_dec(x_31); +x_33 = lean_st_ref_set(x_4, x_17, x_32); +x_34 = lean_ctor_get(x_33, 1); +lean_inc(x_34); +lean_dec(x_33); +x_35 = lean_apply_5(x_2, x_3, x_4, x_5, x_6, x_34); +return x_35; +} +} +else +{ +lean_object* x_36; lean_object* x_37; lean_object* x_38; uint8_t x_39; +x_36 = lean_ctor_get(x_19, 1); lean_inc(x_36); -lean_dec(x_35); -x_37 = lean_st_ref_set(x_4, x_11, x_36); -x_38 = lean_ctor_get(x_37, 1); -lean_inc(x_38); +lean_dec(x_19); +x_37 = lean_ctor_get(x_20, 0); +lean_inc(x_37); +x_38 = l_Lean_PrettyPrinter_ParenthesizerM_orElse___rarg___closed__1; +x_39 = lean_nat_dec_eq(x_38, x_37); lean_dec(x_37); -x_39 = lean_apply_5(x_2, x_3, x_4, x_5, x_6, x_38); -return x_39; +if (x_39 == 0) +{ +lean_object* x_40; +lean_dec(x_17); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_40 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_40, 0, x_20); +lean_ctor_set(x_40, 1, x_36); +return x_40; +} +else +{ +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; +lean_dec(x_20); +x_41 = lean_st_ref_get(x_6, x_36); +x_42 = lean_ctor_get(x_41, 1); +lean_inc(x_42); +lean_dec(x_41); +x_43 = lean_st_ref_set(x_4, x_17, x_42); +x_44 = lean_ctor_get(x_43, 1); +lean_inc(x_44); +lean_dec(x_43); +x_45 = lean_apply_5(x_2, x_3, x_4, x_5, x_6, x_44); +return x_45; } } } } } +else +{ +lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; +x_46 = l_Lean_Syntax_getArgs(x_9); +lean_dec(x_9); +x_47 = lean_array_get_size(x_46); +lean_dec(x_46); +lean_inc(x_47); +x_48 = lean_alloc_closure((void*)(l_Nat_forM_loop___at_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer___spec__1___boxed), 9, 4); +lean_closure_set(x_48, 0, x_1); +lean_closure_set(x_48, 1, x_2); +lean_closure_set(x_48, 2, x_47); +lean_closure_set(x_48, 3, x_47); +x_49 = l_Lean_PrettyPrinter_Parenthesizer_visitArgs(x_48, x_3, x_4, x_5, x_6, x_10); +return x_49; +} +} +} +LEAN_EXPORT lean_object* l_Nat_forM_loop___at_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +_start: +{ +lean_object* x_10; +x_10 = l_Nat_forM_loop___at_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer___spec__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +lean_dec(x_3); +return x_10; +} } LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_mkAntiquot_parenthesizer_x27___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { _start: @@ -5979,81 +6117,80 @@ return x_12; } } } -LEAN_EXPORT lean_object* l_Nat_forM_loop___at_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +LEAN_EXPORT lean_object* l_Nat_forM_loop___at_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { _start: { -lean_object* x_8; uint8_t x_9; -x_8 = lean_unsigned_to_nat(0u); -x_9 = lean_nat_dec_eq(x_2, x_8); -if (x_9 == 0) +lean_object* x_10; uint8_t x_11; +x_10 = lean_unsigned_to_nat(0u); +x_11 = lean_nat_dec_eq(x_4, x_10); +if (x_11 == 0) { -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_10 = lean_unsigned_to_nat(1u); -x_11 = lean_nat_sub(x_2, x_10); -lean_dec(x_2); -x_12 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_4, x_5, x_6, x_7); -x_13 = lean_ctor_get(x_12, 0); -lean_inc(x_13); -x_14 = lean_ctor_get(x_12, 1); -lean_inc(x_14); -lean_dec(x_12); -x_15 = l_Lean_Syntax_getKind(x_13); +lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_12 = lean_unsigned_to_nat(1u); +x_13 = lean_nat_sub(x_4, x_12); +lean_dec(x_4); +lean_inc(x_8); +lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -x_16 = l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKindUnsafe(x_15, x_3, x_4, x_5, x_6, x_14); -if (lean_obj_tag(x_16) == 0) +lean_inc(x_2); +lean_inc(x_1); +x_14 = l_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore(x_1, x_2, x_5, x_6, x_7, x_8, x_9); +if (lean_obj_tag(x_14) == 0) { -lean_object* x_17; -x_17 = lean_ctor_get(x_16, 1); -lean_inc(x_17); -lean_dec(x_16); -x_2 = x_11; -x_7 = x_17; +lean_object* x_15; +x_15 = lean_ctor_get(x_14, 1); +lean_inc(x_15); +lean_dec(x_14); +x_4 = x_13; +x_9 = x_15; goto _start; } else { -uint8_t x_19; -lean_dec(x_11); +uint8_t x_17; +lean_dec(x_13); +lean_dec(x_8); +lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -x_19 = !lean_is_exclusive(x_16); -if (x_19 == 0) -{ -return x_16; -} -else -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_20 = lean_ctor_get(x_16, 0); -x_21 = lean_ctor_get(x_16, 1); -lean_inc(x_21); -lean_inc(x_20); -lean_dec(x_16); -x_22 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_22, 0, x_20); -lean_ctor_set(x_22, 1, x_21); -return x_22; -} -} -} -else -{ -lean_object* x_23; lean_object* x_24; -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); lean_dec(x_2); -x_23 = lean_box(0); -x_24 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_24, 0, x_23); -lean_ctor_set(x_24, 1, x_7); -return x_24; +lean_dec(x_1); +x_17 = !lean_is_exclusive(x_14); +if (x_17 == 0) +{ +return x_14; +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_18 = lean_ctor_get(x_14, 0); +x_19 = lean_ctor_get(x_14, 1); +lean_inc(x_19); +lean_inc(x_18); +lean_dec(x_14); +x_20 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_20, 0, x_18); +lean_ctor_set(x_20, 1, x_19); +return x_20; +} +} +} +else +{ +lean_object* x_21; lean_object* x_22; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_21 = lean_box(0); +x_22 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_22, 0, x_21); +lean_ctor_set(x_22, 1, x_9); +return x_22; } } } @@ -6148,30 +6285,11 @@ return x_33; } } } -static lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string_from_bytes("choice", 6); -return x_1; -} -} -static lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_box(0); -x_2 = l_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___closed__1; -x_3 = l_Lean_Name_str___override(x_1, x_2); -return x_3; -} -} LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; lean_dec(x_3); -lean_dec(x_2); x_8 = l_Lean_Syntax_MonadTraverser_getCur___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__1___rarg(x_4, x_5, x_6, x_7); x_9 = lean_ctor_get(x_8, 0); lean_inc(x_9); @@ -6180,12 +6298,13 @@ lean_inc(x_10); lean_dec(x_8); lean_inc(x_9); x_11 = l_Lean_Syntax_getKind(x_9); -x_12 = l_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___closed__2; +x_12 = l_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer___closed__2; x_13 = lean_name_eq(x_11, x_12); if (x_13 == 0) { uint8_t x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_dec(x_9); +lean_dec(x_2); x_14 = 1; lean_inc(x_1); x_15 = l_Lean_Name_toString(x_1, x_14); @@ -6257,9 +6376,12 @@ lean_dec(x_9); x_29 = lean_array_get_size(x_28); lean_dec(x_28); lean_inc(x_29); -x_30 = lean_alloc_closure((void*)(l_Nat_forM_loop___at_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___spec__1___boxed), 7, 2); -lean_closure_set(x_30, 0, x_29); -lean_closure_set(x_30, 1, x_29); +lean_inc(x_1); +x_30 = lean_alloc_closure((void*)(l_Nat_forM_loop___at_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___spec__1___boxed), 9, 4); +lean_closure_set(x_30, 0, x_1); +lean_closure_set(x_30, 1, x_2); +lean_closure_set(x_30, 2, x_29); +lean_closure_set(x_30, 3, x_29); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); @@ -6311,13 +6433,13 @@ return x_38; } } } -LEAN_EXPORT lean_object* l_Nat_forM_loop___at_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +LEAN_EXPORT lean_object* l_Nat_forM_loop___at_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { _start: { -lean_object* x_8; -x_8 = l_Nat_forM_loop___at_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___spec__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_1); -return x_8; +lean_object* x_10; +x_10 = l_Nat_forM_loop___at_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___spec__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +lean_dec(x_3); +return x_10; } } LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { @@ -9601,7 +9723,7 @@ x_10 = l_Lean_PrettyPrinter_Parenthesizer_ite___rarg(x_9, x_2, x_3, x_4, x_5, x_ return x_10; } } -LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_initFn____x40_Lean_PrettyPrinter_Parenthesizer___hyg_5957_(lean_object* x_1) { +LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_Parenthesizer_initFn____x40_Lean_PrettyPrinter_Parenthesizer___hyg_6026_(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; uint8_t x_4; @@ -10221,7 +10343,7 @@ x_6 = l_Lean_PrettyPrinter_parenthesizeCategory(x_5, x_1, x_2, x_3, x_4); return x_6; } } -LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_initFn____x40_Lean_PrettyPrinter_Parenthesizer___hyg_6568_(lean_object* x_1) { +LEAN_EXPORT lean_object* l_Lean_PrettyPrinter_initFn____x40_Lean_PrettyPrinter_Parenthesizer___hyg_6637_(lean_object* x_1) { _start: { lean_object* x_2; uint8_t x_3; lean_object* x_4; @@ -10527,6 +10649,10 @@ l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__4 = _init_l_Lean_ lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__4); l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5 = _init_l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5(); lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_maybeParenthesize___closed__5); +l_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer___closed__1 = _init_l_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer___closed__1(); +lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer___closed__1); +l_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer___closed__2 = _init_l_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer___closed__2(); +lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer___closed__2); l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKindUnsafe___closed__1 = _init_l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKindUnsafe___closed__1(); lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKindUnsafe___closed__1); l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKindUnsafe___closed__2 = _init_l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKindUnsafe___closed__2(); @@ -10535,10 +10661,6 @@ l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKindUnsafe___closed__3 = _ini lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKindUnsafe___closed__3); l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKindUnsafe___closed__4 = _init_l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKindUnsafe___closed__4(); lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_parenthesizerForKindUnsafe___closed__4); -l_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___closed__1 = _init_l_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___closed__1(); -lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___closed__1); -l_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___closed__2 = _init_l_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___closed__2(); -lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_parenthesizeCategoryCore___closed__2); l_Lean_PrettyPrinter_Parenthesizer_categoryParser_parenthesizer___closed__1 = _init_l_Lean_PrettyPrinter_Parenthesizer_categoryParser_parenthesizer___closed__1(); lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_categoryParser_parenthesizer___closed__1); l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___lambda__1___closed__1 = _init_l_Lean_PrettyPrinter_Parenthesizer_term_parenthesizer___lambda__1___closed__1(); @@ -10649,7 +10771,7 @@ l_Lean_PrettyPrinter_Parenthesizer_interpolatedStr_parenthesizer___closed__1 = _ lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_interpolatedStr_parenthesizer___closed__1); l_Lean_PrettyPrinter_Parenthesizer_interpolatedStr_parenthesizer___boxed__const__1 = _init_l_Lean_PrettyPrinter_Parenthesizer_interpolatedStr_parenthesizer___boxed__const__1(); lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_interpolatedStr_parenthesizer___boxed__const__1); -if (builtin) {res = l_Lean_PrettyPrinter_Parenthesizer_initFn____x40_Lean_PrettyPrinter_Parenthesizer___hyg_5957_(lean_io_mk_world()); +if (builtin) {res = l_Lean_PrettyPrinter_Parenthesizer_initFn____x40_Lean_PrettyPrinter_Parenthesizer___hyg_6026_(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; l_Lean_PrettyPrinter_Parenthesizer_parenthesizerAliasesRef = lean_io_result_get_value(res); lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_parenthesizerAliasesRef); @@ -10668,7 +10790,7 @@ l_Lean_PrettyPrinter_parenthesizeCommand___closed__1 = _init_l_Lean_PrettyPrinte lean_mark_persistent(l_Lean_PrettyPrinter_parenthesizeCommand___closed__1); l_Lean_PrettyPrinter_parenthesizeCommand___closed__2 = _init_l_Lean_PrettyPrinter_parenthesizeCommand___closed__2(); lean_mark_persistent(l_Lean_PrettyPrinter_parenthesizeCommand___closed__2); -res = l_Lean_PrettyPrinter_initFn____x40_Lean_PrettyPrinter_Parenthesizer___hyg_6568_(lean_io_mk_world()); +res = l_Lean_PrettyPrinter_initFn____x40_Lean_PrettyPrinter_Parenthesizer___hyg_6637_(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); return lean_io_result_mk_ok(lean_box(0)); diff --git a/stage0/stdlib/Lean/Server/Completion.c b/stage0/stdlib/Lean/Server/Completion.c index 3e7e6622a5..4d2610e871 100644 --- a/stage0/stdlib/Lean/Server/Completion.c +++ b/stage0/stdlib/Lean/Server/Completion.c @@ -19,7 +19,6 @@ lean_object* l_String_csize(uint32_t); size_t lean_usize_add(size_t, size_t); LEAN_EXPORT lean_object* l___private_Lean_Server_Completion_0__Lean_Server_Completion_consumeImplicitPrefix(lean_object*); LEAN_EXPORT lean_object* l_Array_foldlMUnsafe_fold___at___private_Lean_Server_Completion_0__Lean_Server_Completion_idCompletionCore___spec__14(lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_withoutModifyingState___at___private_Lean_Server_Completion_0__Lean_Server_Completion_isTypeApplicable___spec__1___at___private_Lean_Server_Completion_0__Lean_Server_Completion_isTypeApplicable___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_erase_macro_scopes(lean_object*); LEAN_EXPORT lean_object* l_Lean_PersistentHashMap_foldlMAux___at___private_Lean_Server_Completion_0__Lean_Server_Completion_idCompletionCore___spec__13___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_stringToMessageData(lean_object*); @@ -283,6 +282,7 @@ LEAN_EXPORT lean_object* l_Lean_PersistentArray_forInAux___at___private_Lean_Ser LEAN_EXPORT lean_object* l_Lean_Server_Completion_State_itemsMain___default; LEAN_EXPORT lean_object* l___private_Lean_Server_Completion_0__Lean_Server_Completion_dotCompletion(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Server_Completion_0__Lean_Server_Completion_tacticCompletion(lean_object*, lean_object*); +lean_object* l_Lean_Meta_isDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_LocalDecl_type(lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Server_Completion_0__Lean_Server_Completion_addCompletionItem___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Server_Completion_0__Lean_Server_Completion_isBlackListed___closed__1; @@ -373,7 +373,6 @@ lean_object* l_Lean_KVMap_findCore(lean_object*, lean_object*); lean_object* l_Lean_mkTagDeclarationExtension(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_List_allM___at___private_Lean_Server_Completion_0__Lean_Server_Completion_getCompletionKindForDecl___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_PersistentHashMap_foldlM___at___private_Lean_Server_Completion_0__Lean_Server_Completion_idCompletionCore___spec__12(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_isExprDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Server_Completion_0__Lean_Server_Completion_fieldIdCompletion___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Server_Completion_0__Lean_Server_Completion_fieldIdCompletion___closed__4; LEAN_EXPORT lean_object* l___private_Lean_Server_Completion_0__Lean_Server_Completion_idCompletionCore_searchAlias(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -960,94 +959,6 @@ return x_24; } } } -LEAN_EXPORT lean_object* l_Lean_withoutModifyingState___at___private_Lean_Server_Completion_0__Lean_Server_Completion_isTypeApplicable___spec__1___at___private_Lean_Server_Completion_0__Lean_Server_Completion_isTypeApplicable___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { -_start: -{ -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; -x_8 = l_Lean_Meta_saveState___rarg(x_4, x_5, x_6, x_7); -x_9 = lean_ctor_get(x_8, 0); -lean_inc(x_9); -x_10 = lean_ctor_get(x_8, 1); -lean_inc(x_10); -lean_dec(x_8); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -x_11 = l_Lean_Meta_isExprDefEq(x_2, x_1, x_3, x_4, x_5, x_6, x_10); -if (lean_obj_tag(x_11) == 0) -{ -lean_object* x_12; lean_object* x_13; lean_object* x_14; uint8_t x_15; -x_12 = lean_ctor_get(x_11, 0); -lean_inc(x_12); -x_13 = lean_ctor_get(x_11, 1); -lean_inc(x_13); -lean_dec(x_11); -x_14 = l_Lean_Meta_SavedState_restore(x_9, x_3, x_4, x_5, x_6, x_13); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_9); -x_15 = !lean_is_exclusive(x_14); -if (x_15 == 0) -{ -lean_object* x_16; -x_16 = lean_ctor_get(x_14, 0); -lean_dec(x_16); -lean_ctor_set(x_14, 0, x_12); -return x_14; -} -else -{ -lean_object* x_17; lean_object* x_18; -x_17 = lean_ctor_get(x_14, 1); -lean_inc(x_17); -lean_dec(x_14); -x_18 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_18, 0, x_12); -lean_ctor_set(x_18, 1, x_17); -return x_18; -} -} -else -{ -lean_object* x_19; lean_object* x_20; lean_object* x_21; uint8_t x_22; -x_19 = lean_ctor_get(x_11, 0); -lean_inc(x_19); -x_20 = lean_ctor_get(x_11, 1); -lean_inc(x_20); -lean_dec(x_11); -x_21 = l_Lean_Meta_SavedState_restore(x_9, x_3, x_4, x_5, x_6, x_20); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_9); -x_22 = !lean_is_exclusive(x_21); -if (x_22 == 0) -{ -lean_object* x_23; -x_23 = lean_ctor_get(x_21, 0); -lean_dec(x_23); -lean_ctor_set_tag(x_21, 1); -lean_ctor_set(x_21, 0, x_19); -return x_21; -} -else -{ -lean_object* x_24; lean_object* x_25; -x_24 = lean_ctor_get(x_21, 1); -lean_inc(x_24); -lean_dec(x_21); -x_25 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_25, 0, x_19); -lean_ctor_set(x_25, 1, x_24); -return x_25; -} -} -} -} LEAN_EXPORT lean_object* l___private_Lean_Server_Completion_0__Lean_Server_Completion_isTypeApplicable___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { _start: { @@ -1070,27 +981,27 @@ lean_inc(x_14); x_15 = lean_ctor_get(x_14, 1); lean_inc(x_15); lean_dec(x_14); -x_16 = lean_ctor_get(x_5, 0); +x_16 = lean_ctor_get(x_13, 1); lean_inc(x_16); -x_17 = lean_ctor_get(x_13, 1); -lean_inc(x_17); lean_dec(x_13); -x_18 = lean_ctor_get(x_15, 1); -lean_inc(x_18); +x_17 = lean_ctor_get(x_15, 1); +lean_inc(x_17); lean_dec(x_15); +x_18 = lean_alloc_closure((void*)(l_Lean_Meta_isDefEq), 7, 2); +lean_closure_set(x_18, 0, x_17); +lean_closure_set(x_18, 1, x_2); x_19 = !lean_is_exclusive(x_5); if (x_19 == 0) { lean_object* x_20; uint8_t x_21; x_20 = lean_ctor_get(x_5, 0); -lean_dec(x_20); -x_21 = !lean_is_exclusive(x_16); +x_21 = !lean_is_exclusive(x_20); if (x_21 == 0) { uint8_t x_22; lean_object* x_23; x_22 = 2; -lean_ctor_set_uint8(x_16, 5, x_22); -x_23 = l_Lean_withoutModifyingState___at___private_Lean_Server_Completion_0__Lean_Server_Completion_isTypeApplicable___spec__1___at___private_Lean_Server_Completion_0__Lean_Server_Completion_isTypeApplicable___spec__2(x_2, x_18, x_5, x_6, x_7, x_8, x_17); +lean_ctor_set_uint8(x_20, 5, x_22); +x_23 = l_Lean_withoutModifyingState___at___private_Lean_Server_Completion_0__Lean_Server_Completion_isTypeApplicable___spec__1(x_18, x_5, x_6, x_7, x_8, x_16); if (lean_obj_tag(x_23) == 0) { uint8_t x_24; @@ -1150,20 +1061,20 @@ return x_36; else { uint8_t x_37; uint8_t x_38; uint8_t x_39; uint8_t x_40; uint8_t x_41; uint8_t x_42; uint8_t x_43; uint8_t x_44; uint8_t x_45; uint8_t x_46; uint8_t x_47; uint8_t x_48; uint8_t x_49; uint8_t x_50; lean_object* x_51; lean_object* x_52; -x_37 = lean_ctor_get_uint8(x_16, 0); -x_38 = lean_ctor_get_uint8(x_16, 1); -x_39 = lean_ctor_get_uint8(x_16, 2); -x_40 = lean_ctor_get_uint8(x_16, 3); -x_41 = lean_ctor_get_uint8(x_16, 4); -x_42 = lean_ctor_get_uint8(x_16, 6); -x_43 = lean_ctor_get_uint8(x_16, 7); -x_44 = lean_ctor_get_uint8(x_16, 8); -x_45 = lean_ctor_get_uint8(x_16, 9); -x_46 = lean_ctor_get_uint8(x_16, 10); -x_47 = lean_ctor_get_uint8(x_16, 11); -x_48 = lean_ctor_get_uint8(x_16, 12); -x_49 = lean_ctor_get_uint8(x_16, 13); -lean_dec(x_16); +x_37 = lean_ctor_get_uint8(x_20, 0); +x_38 = lean_ctor_get_uint8(x_20, 1); +x_39 = lean_ctor_get_uint8(x_20, 2); +x_40 = lean_ctor_get_uint8(x_20, 3); +x_41 = lean_ctor_get_uint8(x_20, 4); +x_42 = lean_ctor_get_uint8(x_20, 6); +x_43 = lean_ctor_get_uint8(x_20, 7); +x_44 = lean_ctor_get_uint8(x_20, 8); +x_45 = lean_ctor_get_uint8(x_20, 9); +x_46 = lean_ctor_get_uint8(x_20, 10); +x_47 = lean_ctor_get_uint8(x_20, 11); +x_48 = lean_ctor_get_uint8(x_20, 12); +x_49 = lean_ctor_get_uint8(x_20, 13); +lean_dec(x_20); x_50 = 2; x_51 = lean_alloc_ctor(0, 0, 14); lean_ctor_set_uint8(x_51, 0, x_37); @@ -1181,7 +1092,7 @@ lean_ctor_set_uint8(x_51, 11, x_47); lean_ctor_set_uint8(x_51, 12, x_48); lean_ctor_set_uint8(x_51, 13, x_49); lean_ctor_set(x_5, 0, x_51); -x_52 = l_Lean_withoutModifyingState___at___private_Lean_Server_Completion_0__Lean_Server_Completion_isTypeApplicable___spec__1___at___private_Lean_Server_Completion_0__Lean_Server_Completion_isTypeApplicable___spec__2(x_2, x_18, x_5, x_6, x_7, x_8, x_17); +x_52 = l_Lean_withoutModifyingState___at___private_Lean_Server_Completion_0__Lean_Server_Completion_isTypeApplicable___spec__1(x_18, x_5, x_6, x_7, x_8, x_16); if (lean_obj_tag(x_52) == 0) { lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; @@ -1238,144 +1149,146 @@ return x_62; } else { -lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; uint8_t x_68; uint8_t x_69; uint8_t x_70; uint8_t x_71; uint8_t x_72; uint8_t x_73; uint8_t x_74; uint8_t x_75; uint8_t x_76; uint8_t x_77; uint8_t x_78; uint8_t x_79; uint8_t x_80; lean_object* x_81; uint8_t x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; -x_63 = lean_ctor_get(x_5, 1); -x_64 = lean_ctor_get(x_5, 2); -x_65 = lean_ctor_get(x_5, 3); -x_66 = lean_ctor_get(x_5, 4); -x_67 = lean_ctor_get(x_5, 5); +lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; uint8_t x_69; uint8_t x_70; uint8_t x_71; uint8_t x_72; uint8_t x_73; uint8_t x_74; uint8_t x_75; uint8_t x_76; uint8_t x_77; uint8_t x_78; uint8_t x_79; uint8_t x_80; uint8_t x_81; lean_object* x_82; uint8_t x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; +x_63 = lean_ctor_get(x_5, 0); +x_64 = lean_ctor_get(x_5, 1); +x_65 = lean_ctor_get(x_5, 2); +x_66 = lean_ctor_get(x_5, 3); +x_67 = lean_ctor_get(x_5, 4); +x_68 = lean_ctor_get(x_5, 5); +lean_inc(x_68); lean_inc(x_67); lean_inc(x_66); lean_inc(x_65); lean_inc(x_64); lean_inc(x_63); lean_dec(x_5); -x_68 = lean_ctor_get_uint8(x_16, 0); -x_69 = lean_ctor_get_uint8(x_16, 1); -x_70 = lean_ctor_get_uint8(x_16, 2); -x_71 = lean_ctor_get_uint8(x_16, 3); -x_72 = lean_ctor_get_uint8(x_16, 4); -x_73 = lean_ctor_get_uint8(x_16, 6); -x_74 = lean_ctor_get_uint8(x_16, 7); -x_75 = lean_ctor_get_uint8(x_16, 8); -x_76 = lean_ctor_get_uint8(x_16, 9); -x_77 = lean_ctor_get_uint8(x_16, 10); -x_78 = lean_ctor_get_uint8(x_16, 11); -x_79 = lean_ctor_get_uint8(x_16, 12); -x_80 = lean_ctor_get_uint8(x_16, 13); -if (lean_is_exclusive(x_16)) { - x_81 = x_16; +x_69 = lean_ctor_get_uint8(x_63, 0); +x_70 = lean_ctor_get_uint8(x_63, 1); +x_71 = lean_ctor_get_uint8(x_63, 2); +x_72 = lean_ctor_get_uint8(x_63, 3); +x_73 = lean_ctor_get_uint8(x_63, 4); +x_74 = lean_ctor_get_uint8(x_63, 6); +x_75 = lean_ctor_get_uint8(x_63, 7); +x_76 = lean_ctor_get_uint8(x_63, 8); +x_77 = lean_ctor_get_uint8(x_63, 9); +x_78 = lean_ctor_get_uint8(x_63, 10); +x_79 = lean_ctor_get_uint8(x_63, 11); +x_80 = lean_ctor_get_uint8(x_63, 12); +x_81 = lean_ctor_get_uint8(x_63, 13); +if (lean_is_exclusive(x_63)) { + x_82 = x_63; } else { - lean_dec_ref(x_16); - x_81 = lean_box(0); + lean_dec_ref(x_63); + x_82 = lean_box(0); } -x_82 = 2; -if (lean_is_scalar(x_81)) { - x_83 = lean_alloc_ctor(0, 0, 14); +x_83 = 2; +if (lean_is_scalar(x_82)) { + x_84 = lean_alloc_ctor(0, 0, 14); } else { - x_83 = x_81; + x_84 = x_82; } -lean_ctor_set_uint8(x_83, 0, x_68); -lean_ctor_set_uint8(x_83, 1, x_69); -lean_ctor_set_uint8(x_83, 2, x_70); -lean_ctor_set_uint8(x_83, 3, x_71); -lean_ctor_set_uint8(x_83, 4, x_72); -lean_ctor_set_uint8(x_83, 5, x_82); -lean_ctor_set_uint8(x_83, 6, x_73); -lean_ctor_set_uint8(x_83, 7, x_74); -lean_ctor_set_uint8(x_83, 8, x_75); -lean_ctor_set_uint8(x_83, 9, x_76); -lean_ctor_set_uint8(x_83, 10, x_77); -lean_ctor_set_uint8(x_83, 11, x_78); -lean_ctor_set_uint8(x_83, 12, x_79); -lean_ctor_set_uint8(x_83, 13, x_80); -x_84 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_84, 0, x_83); -lean_ctor_set(x_84, 1, x_63); -lean_ctor_set(x_84, 2, x_64); -lean_ctor_set(x_84, 3, x_65); -lean_ctor_set(x_84, 4, x_66); -lean_ctor_set(x_84, 5, x_67); -x_85 = l_Lean_withoutModifyingState___at___private_Lean_Server_Completion_0__Lean_Server_Completion_isTypeApplicable___spec__1___at___private_Lean_Server_Completion_0__Lean_Server_Completion_isTypeApplicable___spec__2(x_2, x_18, x_84, x_6, x_7, x_8, x_17); -if (lean_obj_tag(x_85) == 0) +lean_ctor_set_uint8(x_84, 0, x_69); +lean_ctor_set_uint8(x_84, 1, x_70); +lean_ctor_set_uint8(x_84, 2, x_71); +lean_ctor_set_uint8(x_84, 3, x_72); +lean_ctor_set_uint8(x_84, 4, x_73); +lean_ctor_set_uint8(x_84, 5, x_83); +lean_ctor_set_uint8(x_84, 6, x_74); +lean_ctor_set_uint8(x_84, 7, x_75); +lean_ctor_set_uint8(x_84, 8, x_76); +lean_ctor_set_uint8(x_84, 9, x_77); +lean_ctor_set_uint8(x_84, 10, x_78); +lean_ctor_set_uint8(x_84, 11, x_79); +lean_ctor_set_uint8(x_84, 12, x_80); +lean_ctor_set_uint8(x_84, 13, x_81); +x_85 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_85, 0, x_84); +lean_ctor_set(x_85, 1, x_64); +lean_ctor_set(x_85, 2, x_65); +lean_ctor_set(x_85, 3, x_66); +lean_ctor_set(x_85, 4, x_67); +lean_ctor_set(x_85, 5, x_68); +x_86 = l_Lean_withoutModifyingState___at___private_Lean_Server_Completion_0__Lean_Server_Completion_isTypeApplicable___spec__1(x_18, x_85, x_6, x_7, x_8, x_16); +if (lean_obj_tag(x_86) == 0) { -lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; -x_86 = lean_ctor_get(x_85, 0); -lean_inc(x_86); -x_87 = lean_ctor_get(x_85, 1); +lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; +x_87 = lean_ctor_get(x_86, 0); lean_inc(x_87); -if (lean_is_exclusive(x_85)) { - lean_ctor_release(x_85, 0); - lean_ctor_release(x_85, 1); - x_88 = x_85; +x_88 = lean_ctor_get(x_86, 1); +lean_inc(x_88); +if (lean_is_exclusive(x_86)) { + lean_ctor_release(x_86, 0); + lean_ctor_release(x_86, 1); + x_89 = x_86; } else { - lean_dec_ref(x_85); - x_88 = lean_box(0); + lean_dec_ref(x_86); + x_89 = lean_box(0); } -x_89 = lean_box(0); -x_90 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_90, 0, x_86); -lean_ctor_set(x_90, 1, x_89); -if (lean_is_scalar(x_88)) { - x_91 = lean_alloc_ctor(0, 2, 0); +x_90 = lean_box(0); +x_91 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_91, 0, x_87); +lean_ctor_set(x_91, 1, x_90); +if (lean_is_scalar(x_89)) { + x_92 = lean_alloc_ctor(0, 2, 0); } else { - x_91 = x_88; + x_92 = x_89; } -lean_ctor_set(x_91, 0, x_90); -lean_ctor_set(x_91, 1, x_87); -return x_91; +lean_ctor_set(x_92, 0, x_91); +lean_ctor_set(x_92, 1, x_88); +return x_92; } else { -lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; -x_92 = lean_ctor_get(x_85, 0); -lean_inc(x_92); -x_93 = lean_ctor_get(x_85, 1); +lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; +x_93 = lean_ctor_get(x_86, 0); lean_inc(x_93); -if (lean_is_exclusive(x_85)) { - lean_ctor_release(x_85, 0); - lean_ctor_release(x_85, 1); - x_94 = x_85; +x_94 = lean_ctor_get(x_86, 1); +lean_inc(x_94); +if (lean_is_exclusive(x_86)) { + lean_ctor_release(x_86, 0); + lean_ctor_release(x_86, 1); + x_95 = x_86; } else { - lean_dec_ref(x_85); - x_94 = lean_box(0); + lean_dec_ref(x_86); + x_95 = lean_box(0); } -if (lean_is_scalar(x_94)) { - x_95 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_95)) { + x_96 = lean_alloc_ctor(1, 2, 0); } else { - x_95 = x_94; + x_96 = x_95; } -lean_ctor_set(x_95, 0, x_92); -lean_ctor_set(x_95, 1, x_93); -return x_95; +lean_ctor_set(x_96, 0, x_93); +lean_ctor_set(x_96, 1, x_94); +return x_96; } } } else { -uint8_t x_96; +uint8_t x_97; lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_2); -x_96 = !lean_is_exclusive(x_13); -if (x_96 == 0) +x_97 = !lean_is_exclusive(x_13); +if (x_97 == 0) { return x_13; } else { -lean_object* x_97; lean_object* x_98; lean_object* x_99; -x_97 = lean_ctor_get(x_13, 0); -x_98 = lean_ctor_get(x_13, 1); +lean_object* x_98; lean_object* x_99; lean_object* x_100; +x_98 = lean_ctor_get(x_13, 0); +x_99 = lean_ctor_get(x_13, 1); +lean_inc(x_99); lean_inc(x_98); -lean_inc(x_97); lean_dec(x_13); -x_99 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_99, 0, x_97); -lean_ctor_set(x_99, 1, x_98); -return x_99; +x_100 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_100, 0, x_98); +lean_ctor_set(x_100, 1, x_99); +return x_100; } } } diff --git a/stage0/stdlib/Lean/Util/MonadBacktrack.c b/stage0/stdlib/Lean/Util/MonadBacktrack.c index ea8b4fd2a3..7c19ef7873 100644 --- a/stage0/stdlib/Lean/Util/MonadBacktrack.c +++ b/stage0/stdlib/Lean/Util/MonadBacktrack.c @@ -15,46 +15,62 @@ extern "C" { #endif LEAN_EXPORT lean_object* l_Lean_commitIfNoEx___rarg(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_withoutModifyingState___rarg___lambda__3___closed__1; +LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___rarg___lambda__6(lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_commitWhen___rarg___lambda__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_commitIfNoEx___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_commitWhen___rarg___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_commitWhen___rarg___lambda__3(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_instMonadBacktrackExceptT___rarg___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_withoutModifyingState___rarg(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_withoutModifyingState___rarg___lambda__1___boxed(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_instMonadBacktrackExceptT___rarg___lambda__1(lean_object*); LEAN_EXPORT lean_object* l_Lean_instMonadBacktrackExceptT(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_instMonadBacktrackExceptT___rarg___closed__1; -LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___rarg___lambda__3___boxed(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_observing_x3f___rarg(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_observing_x3f___rarg___lambda__2(lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___rarg___lambda__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_commitWhen(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___rarg___lambda__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_commitWhen___rarg___lambda__3___boxed(lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_commitWhenSomeNoEx_x3f___rarg(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_commitWhen___rarg___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, uint8_t); -LEAN_EXPORT lean_object* l_Lean_observing_x3f___rarg___lambda__1(lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_observing_x3f___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_observing_x3f(lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_observing_x3f___rarg___lambda__2___closed__1; LEAN_EXPORT lean_object* l_Lean_commitIfNoEx(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_withoutModifyingState___rarg___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_observing_x3f___rarg___lambda__2___boxed(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___rarg___lambda__1(lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_observing_x3f___rarg___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_observing_x3f___rarg___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_withoutModifyingState(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___rarg___lambda__1___boxed(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_commitWhen___rarg___lambda__1___boxed(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_withoutModifyingState___rarg___lambda__2(lean_object*); +static lean_object* l_Lean_commitWhenSome_x3f___rarg___lambda__1___closed__1; LEAN_EXPORT lean_object* l_Lean_instMonadBacktrackExceptT___rarg(lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_observing_x3f___rarg___lambda__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_observing_x3f___rarg___lambda__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_observing_x3f___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___rarg(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_commitWhen___rarg___lambda__1(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_commitWhen___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_commitWhen___rarg___lambda__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_withoutModifyingState___rarg___lambda__1(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_withoutModifyingState___rarg___lambda__2___boxed(lean_object*); -LEAN_EXPORT lean_object* l_Lean_observing_x3f___rarg___lambda__4(lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_commitWhenSomeNoEx_x3f(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___rarg___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___rarg___lambda__3(lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___rarg___lambda__3(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_commitWhen___rarg___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___rarg___lambda__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___rarg___lambda__7(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* _init_l_Lean_commitWhenSome_x3f___rarg___lambda__1___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = lean_box(0); +x_3 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_3, 0, x_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; +} +} LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___rarg___lambda__1(lean_object* x_1, lean_object* x_2) { _start: { @@ -65,7 +81,7 @@ lean_dec(x_1); x_4 = lean_ctor_get(x_3, 1); lean_inc(x_4); lean_dec(x_3); -x_5 = lean_box(0); +x_5 = l_Lean_commitWhenSome_x3f___rarg___lambda__1___closed__1; x_6 = lean_apply_2(x_4, lean_box(0), x_5); return x_6; } @@ -94,58 +110,72 @@ lean_dec(x_1); x_10 = !lean_is_exclusive(x_5); if (x_10 == 0) { -lean_object* x_11; lean_object* x_12; lean_object* x_13; +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; x_11 = lean_ctor_get(x_3, 0); lean_inc(x_11); lean_dec(x_3); x_12 = lean_ctor_get(x_11, 1); lean_inc(x_12); lean_dec(x_11); -x_13 = lean_apply_2(x_12, lean_box(0), x_5); -return x_13; +x_13 = lean_box(0); +x_14 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_14, 0, x_5); +lean_ctor_set(x_14, 1, x_13); +x_15 = lean_apply_2(x_12, lean_box(0), x_14); +return x_15; } else { -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_14 = lean_ctor_get(x_5, 0); -lean_inc(x_14); -lean_dec(x_5); -x_15 = lean_ctor_get(x_3, 0); -lean_inc(x_15); -lean_dec(x_3); -x_16 = lean_ctor_get(x_15, 1); +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_16 = lean_ctor_get(x_5, 0); lean_inc(x_16); -lean_dec(x_15); -x_17 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_17, 0, x_14); -x_18 = lean_apply_2(x_16, lean_box(0), x_17); -return x_18; +lean_dec(x_5); +x_17 = lean_ctor_get(x_3, 0); +lean_inc(x_17); +lean_dec(x_3); +x_18 = lean_ctor_get(x_17, 1); +lean_inc(x_18); +lean_dec(x_17); +x_19 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_19, 0, x_16); +x_20 = lean_box(0); +x_21 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_21, 0, x_19); +lean_ctor_set(x_21, 1, x_20); +x_22 = lean_apply_2(x_18, lean_box(0), x_21); +return x_22; } } } } -LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___rarg___lambda__3(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___rarg___lambda__3(lean_object* x_1, lean_object* x_2) { _start: { -lean_object* x_4; lean_object* x_5; -x_4 = lean_ctor_get(x_1, 0); -lean_inc(x_4); +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_3 = lean_ctor_get(x_1, 0); +lean_inc(x_3); lean_dec(x_1); -x_5 = lean_apply_2(x_4, lean_box(0), x_2); -return x_5; +x_4 = lean_ctor_get(x_3, 1); +lean_inc(x_4); +lean_dec(x_3); +x_5 = lean_box(0); +x_6 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_6, 0, x_2); +lean_ctor_set(x_6, 1, x_5); +x_7 = lean_apply_2(x_4, lean_box(0), x_6); +return x_7; } } LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___rarg___lambda__4(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; -x_6 = lean_ctor_get(x_1, 1); +x_6 = lean_ctor_get(x_1, 0); lean_inc(x_6); lean_dec(x_1); -x_7 = lean_apply_1(x_6, x_2); -x_8 = lean_alloc_closure((void*)(l_Lean_commitWhenSome_x3f___rarg___lambda__3___boxed), 3, 2); +x_7 = lean_apply_2(x_6, lean_box(0), x_2); +x_8 = lean_alloc_closure((void*)(l_Lean_commitWhenSome_x3f___rarg___lambda__3), 2, 1); lean_closure_set(x_8, 0, x_3); -lean_closure_set(x_8, 1, x_5); x_9 = lean_apply_4(x_4, lean_box(0), lean_box(0), x_7, x_8); return x_9; } @@ -153,10 +183,46 @@ return x_9; LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___rarg___lambda__5(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_7 = lean_ctor_get(x_1, 1); +lean_inc(x_7); +lean_dec(x_1); +x_8 = lean_apply_1(x_7, x_2); +lean_inc(x_5); +x_9 = lean_alloc_closure((void*)(l_Lean_commitWhenSome_x3f___rarg___lambda__4___boxed), 5, 4); +lean_closure_set(x_9, 0, x_3); +lean_closure_set(x_9, 1, x_6); +lean_closure_set(x_9, 2, x_4); +lean_closure_set(x_9, 3, x_5); +x_10 = lean_apply_4(x_5, lean_box(0), lean_box(0), x_8, x_9); +return x_10; +} +} +LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___rarg___lambda__6(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; +x_3 = lean_ctor_get(x_2, 0); +lean_inc(x_3); +lean_dec(x_2); +x_4 = lean_ctor_get(x_1, 0); +lean_inc(x_4); +lean_dec(x_1); +x_5 = lean_ctor_get(x_4, 1); +lean_inc(x_5); +lean_dec(x_4); +x_6 = lean_apply_2(x_5, lean_box(0), x_3); +return x_6; +} +} +LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___rarg___lambda__7(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; x_7 = lean_ctor_get(x_1, 1); lean_inc(x_7); lean_inc(x_4); +lean_inc(x_3); lean_inc(x_6); lean_inc(x_2); x_8 = lean_alloc_closure((void*)(l_Lean_commitWhenSome_x3f___rarg___lambda__2), 5, 4); @@ -166,13 +232,19 @@ lean_closure_set(x_8, 2, x_3); lean_closure_set(x_8, 3, x_4); lean_inc(x_4); x_9 = lean_apply_4(x_4, lean_box(0), lean_box(0), x_5, x_8); -x_10 = lean_alloc_closure((void*)(l_Lean_commitWhenSome_x3f___rarg___lambda__4), 5, 4); +lean_inc(x_4); +lean_inc(x_3); +x_10 = lean_alloc_closure((void*)(l_Lean_commitWhenSome_x3f___rarg___lambda__5), 6, 5); lean_closure_set(x_10, 0, x_2); lean_closure_set(x_10, 1, x_6); lean_closure_set(x_10, 2, x_1); -lean_closure_set(x_10, 3, x_4); +lean_closure_set(x_10, 3, x_3); +lean_closure_set(x_10, 4, x_4); x_11 = lean_apply_3(x_7, lean_box(0), x_9, x_10); -return x_11; +x_12 = lean_alloc_closure((void*)(l_Lean_commitWhenSome_x3f___rarg___lambda__6), 2, 1); +lean_closure_set(x_12, 0, x_3); +x_13 = lean_apply_4(x_4, lean_box(0), lean_box(0), x_11, x_12); +return x_13; } } LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { @@ -184,7 +256,7 @@ lean_inc(x_5); x_6 = lean_ctor_get(x_2, 0); lean_inc(x_6); lean_inc(x_5); -x_7 = lean_alloc_closure((void*)(l_Lean_commitWhenSome_x3f___rarg___lambda__5), 6, 5); +x_7 = lean_alloc_closure((void*)(l_Lean_commitWhenSome_x3f___rarg___lambda__7), 6, 5); lean_closure_set(x_7, 0, x_3); lean_closure_set(x_7, 1, x_2); lean_closure_set(x_7, 2, x_1); @@ -211,13 +283,46 @@ lean_dec(x_2); return x_3; } } -LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___rarg___lambda__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +LEAN_EXPORT lean_object* l_Lean_commitWhenSome_x3f___rarg___lambda__4___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { -lean_object* x_4; -x_4 = l_Lean_commitWhenSome_x3f___rarg___lambda__3(x_1, x_2, x_3); -lean_dec(x_3); -return x_4; +lean_object* x_6; +x_6 = l_Lean_commitWhenSome_x3f___rarg___lambda__4(x_1, x_2, x_3, x_4, x_5); +lean_dec(x_5); +return x_6; +} +} +LEAN_EXPORT lean_object* l_Lean_commitWhenSomeNoEx_x3f___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_5 = lean_ctor_get(x_1, 1); +lean_inc(x_5); +x_6 = lean_ctor_get(x_3, 1); +lean_inc(x_6); +lean_inc(x_1); +x_7 = l_Lean_commitWhenSome_x3f___rarg(x_1, x_2, x_3, x_4); +lean_inc(x_1); +x_8 = lean_alloc_closure((void*)(l_Lean_commitWhenSome_x3f___rarg___lambda__3), 2, 1); +lean_closure_set(x_8, 0, x_1); +lean_inc(x_5); +x_9 = lean_apply_4(x_5, lean_box(0), lean_box(0), x_7, x_8); +lean_inc(x_1); +x_10 = lean_alloc_closure((void*)(l_Lean_commitWhenSome_x3f___rarg___lambda__1___boxed), 2, 1); +lean_closure_set(x_10, 0, x_1); +x_11 = lean_apply_3(x_6, lean_box(0), x_9, x_10); +x_12 = lean_alloc_closure((void*)(l_Lean_commitWhenSome_x3f___rarg___lambda__6), 2, 1); +lean_closure_set(x_12, 0, x_1); +x_13 = lean_apply_4(x_5, lean_box(0), lean_box(0), x_11, x_12); +return x_13; +} +} +LEAN_EXPORT lean_object* l_Lean_commitWhenSomeNoEx_x3f(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = lean_alloc_closure((void*)(l_Lean_commitWhenSomeNoEx_x3f___rarg), 4, 0); +return x_5; } } LEAN_EXPORT lean_object* l_Lean_commitWhen___rarg___lambda__1(lean_object* x_1, lean_object* x_2) { @@ -270,7 +375,33 @@ return x_14; } } } -LEAN_EXPORT lean_object* l_Lean_commitWhen___rarg___lambda__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +LEAN_EXPORT lean_object* l_Lean_commitWhen___rarg___lambda__3(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_5; +x_4 = lean_ctor_get(x_1, 0); +lean_inc(x_4); +lean_dec(x_1); +x_5 = lean_apply_2(x_4, lean_box(0), x_2); +return x_5; +} +} +LEAN_EXPORT lean_object* l_Lean_commitWhen___rarg___lambda__4(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_6 = lean_ctor_get(x_1, 1); +lean_inc(x_6); +lean_dec(x_1); +x_7 = lean_apply_1(x_6, x_2); +x_8 = lean_alloc_closure((void*)(l_Lean_commitWhen___rarg___lambda__3___boxed), 3, 2); +lean_closure_set(x_8, 0, x_3); +lean_closure_set(x_8, 1, x_5); +x_9 = lean_apply_4(x_4, lean_box(0), lean_box(0), x_7, x_8); +return x_9; +} +} +LEAN_EXPORT lean_object* l_Lean_commitWhen___rarg___lambda__5(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; @@ -286,7 +417,7 @@ lean_closure_set(x_8, 2, x_3); lean_closure_set(x_8, 3, x_4); lean_inc(x_4); x_9 = lean_apply_4(x_4, lean_box(0), lean_box(0), x_5, x_8); -x_10 = lean_alloc_closure((void*)(l_Lean_commitWhenSome_x3f___rarg___lambda__4), 5, 4); +x_10 = lean_alloc_closure((void*)(l_Lean_commitWhen___rarg___lambda__4), 5, 4); lean_closure_set(x_10, 0, x_2); lean_closure_set(x_10, 1, x_6); lean_closure_set(x_10, 2, x_1); @@ -304,7 +435,7 @@ lean_inc(x_5); x_6 = lean_ctor_get(x_2, 0); lean_inc(x_6); lean_inc(x_5); -x_7 = lean_alloc_closure((void*)(l_Lean_commitWhen___rarg___lambda__3), 6, 5); +x_7 = lean_alloc_closure((void*)(l_Lean_commitWhen___rarg___lambda__5), 6, 5); lean_closure_set(x_7, 0, x_3); lean_closure_set(x_7, 1, x_2); lean_closure_set(x_7, 2, x_1); @@ -341,13 +472,22 @@ x_7 = l_Lean_commitWhen___rarg___lambda__2(x_1, x_2, x_3, x_4, x_6); return x_7; } } +LEAN_EXPORT lean_object* l_Lean_commitWhen___rarg___lambda__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_commitWhen___rarg___lambda__3(x_1, x_2, x_3); +lean_dec(x_3); +return x_4; +} +} LEAN_EXPORT lean_object* l_Lean_commitIfNoEx___rarg___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { lean_object* x_6; lean_object* x_7; lean_object* x_8; x_6 = lean_ctor_get(x_1, 1); lean_inc(x_6); -x_7 = lean_alloc_closure((void*)(l_Lean_commitWhenSome_x3f___rarg___lambda__4), 5, 4); +x_7 = lean_alloc_closure((void*)(l_Lean_commitWhen___rarg___lambda__4), 5, 4); lean_closure_set(x_7, 0, x_2); lean_closure_set(x_7, 1, x_5); lean_closure_set(x_7, 2, x_1); @@ -476,52 +616,7 @@ lean_dec(x_1); return x_2; } } -LEAN_EXPORT lean_object* l_Lean_observing_x3f___rarg___lambda__1(lean_object* x_1, lean_object* x_2) { -_start: -{ -lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; -x_3 = lean_ctor_get(x_1, 0); -lean_inc(x_3); -lean_dec(x_1); -x_4 = lean_ctor_get(x_3, 1); -lean_inc(x_4); -lean_dec(x_3); -x_5 = lean_box(0); -x_6 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_6, 0, x_2); -lean_ctor_set(x_6, 1, x_5); -x_7 = lean_apply_2(x_4, lean_box(0), x_6); -return x_7; -} -} -static lean_object* _init_l_Lean_observing_x3f___rarg___lambda__2___closed__1() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_box(0); -x_2 = lean_box(0); -x_3 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_3, 0, x_1); -lean_ctor_set(x_3, 1, x_2); -return x_3; -} -} -LEAN_EXPORT lean_object* l_Lean_observing_x3f___rarg___lambda__2(lean_object* x_1, lean_object* x_2) { -_start: -{ -lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; -x_3 = lean_ctor_get(x_1, 0); -lean_inc(x_3); -lean_dec(x_1); -x_4 = lean_ctor_get(x_3, 1); -lean_inc(x_4); -lean_dec(x_3); -x_5 = l_Lean_observing_x3f___rarg___lambda__2___closed__1; -x_6 = lean_apply_2(x_4, lean_box(0), x_5); -return x_6; -} -} -LEAN_EXPORT lean_object* l_Lean_observing_x3f___rarg___lambda__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +LEAN_EXPORT lean_object* l_Lean_observing_x3f___rarg___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; @@ -529,13 +624,13 @@ x_6 = lean_ctor_get(x_1, 1); lean_inc(x_6); lean_dec(x_1); x_7 = lean_apply_1(x_6, x_2); -x_8 = lean_alloc_closure((void*)(l_Lean_observing_x3f___rarg___lambda__2___boxed), 2, 1); +x_8 = lean_alloc_closure((void*)(l_Lean_commitWhenSome_x3f___rarg___lambda__1___boxed), 2, 1); lean_closure_set(x_8, 0, x_3); x_9 = lean_apply_4(x_4, lean_box(0), lean_box(0), x_7, x_8); return x_9; } } -LEAN_EXPORT lean_object* l_Lean_observing_x3f___rarg___lambda__4(lean_object* x_1, lean_object* x_2) { +LEAN_EXPORT lean_object* l_Lean_observing_x3f___rarg___lambda__2(lean_object* x_1, lean_object* x_2) { _start: { if (lean_obj_tag(x_2) == 0) @@ -572,7 +667,7 @@ return x_11; } } } -LEAN_EXPORT lean_object* l_Lean_observing_x3f___rarg___lambda__5(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +LEAN_EXPORT lean_object* l_Lean_observing_x3f___rarg___lambda__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; @@ -580,19 +675,19 @@ x_7 = lean_ctor_get(x_1, 1); lean_inc(x_7); lean_dec(x_1); lean_inc(x_2); -x_8 = lean_alloc_closure((void*)(l_Lean_observing_x3f___rarg___lambda__1), 2, 1); +x_8 = lean_alloc_closure((void*)(l_Lean_commitWhenSome_x3f___rarg___lambda__3), 2, 1); lean_closure_set(x_8, 0, x_2); lean_inc(x_3); x_9 = lean_apply_4(x_3, lean_box(0), lean_box(0), x_4, x_8); lean_inc(x_3); lean_inc(x_2); -x_10 = lean_alloc_closure((void*)(l_Lean_observing_x3f___rarg___lambda__3___boxed), 5, 4); +x_10 = lean_alloc_closure((void*)(l_Lean_observing_x3f___rarg___lambda__1___boxed), 5, 4); lean_closure_set(x_10, 0, x_5); lean_closure_set(x_10, 1, x_6); lean_closure_set(x_10, 2, x_2); lean_closure_set(x_10, 3, x_3); x_11 = lean_apply_3(x_7, lean_box(0), x_9, x_10); -x_12 = lean_alloc_closure((void*)(l_Lean_observing_x3f___rarg___lambda__4), 2, 1); +x_12 = lean_alloc_closure((void*)(l_Lean_observing_x3f___rarg___lambda__2), 2, 1); lean_closure_set(x_12, 0, x_2); x_13 = lean_apply_4(x_3, lean_box(0), lean_box(0), x_11, x_12); return x_13; @@ -607,7 +702,7 @@ lean_inc(x_5); x_6 = lean_ctor_get(x_2, 0); lean_inc(x_6); lean_inc(x_5); -x_7 = lean_alloc_closure((void*)(l_Lean_observing_x3f___rarg___lambda__5), 6, 5); +x_7 = lean_alloc_closure((void*)(l_Lean_observing_x3f___rarg___lambda__3), 6, 5); lean_closure_set(x_7, 0, x_3); lean_closure_set(x_7, 1, x_1); lean_closure_set(x_7, 2, x_5); @@ -625,20 +720,11 @@ x_5 = lean_alloc_closure((void*)(l_Lean_observing_x3f___rarg), 4, 0); return x_5; } } -LEAN_EXPORT lean_object* l_Lean_observing_x3f___rarg___lambda__2___boxed(lean_object* x_1, lean_object* x_2) { -_start: -{ -lean_object* x_3; -x_3 = l_Lean_observing_x3f___rarg___lambda__2(x_1, x_2); -lean_dec(x_2); -return x_3; -} -} -LEAN_EXPORT lean_object* l_Lean_observing_x3f___rarg___lambda__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +LEAN_EXPORT lean_object* l_Lean_observing_x3f___rarg___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { lean_object* x_6; -x_6 = l_Lean_observing_x3f___rarg___lambda__3(x_1, x_2, x_3, x_4, x_5); +x_6 = l_Lean_observing_x3f___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5); lean_dec(x_5); return x_6; } @@ -717,10 +803,10 @@ _G_initialized = true; res = initialize_Init(builtin, lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); +l_Lean_commitWhenSome_x3f___rarg___lambda__1___closed__1 = _init_l_Lean_commitWhenSome_x3f___rarg___lambda__1___closed__1(); +lean_mark_persistent(l_Lean_commitWhenSome_x3f___rarg___lambda__1___closed__1); l_Lean_withoutModifyingState___rarg___lambda__3___closed__1 = _init_l_Lean_withoutModifyingState___rarg___lambda__3___closed__1(); lean_mark_persistent(l_Lean_withoutModifyingState___rarg___lambda__3___closed__1); -l_Lean_observing_x3f___rarg___lambda__2___closed__1 = _init_l_Lean_observing_x3f___rarg___lambda__2___closed__1(); -lean_mark_persistent(l_Lean_observing_x3f___rarg___lambda__2___closed__1); l_Lean_instMonadBacktrackExceptT___rarg___closed__1 = _init_l_Lean_instMonadBacktrackExceptT___rarg___closed__1(); lean_mark_persistent(l_Lean_instMonadBacktrackExceptT___rarg___closed__1); return lean_io_result_mk_ok(lean_box(0));