chore: update stage0
This commit is contained in:
Leonardo de Moura
parent
d1dcf0b067
commit
7b42588909
18 changed files with 15862 additions and 16053 deletions
17
stage0/src/Init/Prelude.lean
generated
17
stage0/src/Init/Prelude.lean
generated
|
|
@ -2114,24 +2114,9 @@ unsafe def getMethodsImp : MacroM Methods :=
|
|||
|
||||
@[implementedBy getMethodsImp] constant getMethods : MacroM Methods
|
||||
|
||||
structure MethodsOld where
|
||||
expandMacro? : Syntax → MacroM (Option Syntax)
|
||||
deriving Inhabited
|
||||
|
||||
unsafe def mkMethodsOldImp (descr : MethodsOld) : MethodsRef :=
|
||||
unsafeCast descr
|
||||
|
||||
@[implementedBy mkMethodsOldImp]
|
||||
constant mkMethodsOld (descr : MethodsOld) : MethodsRef
|
||||
|
||||
unsafe def getMethodsOldImp : MacroM MethodsOld :=
|
||||
bind read fun ctx => pure (unsafeCast (ctx.methodsOld))
|
||||
|
||||
@[implementedBy getMethodsOldImp] constant getMethodsOld : MacroM MethodsOld
|
||||
|
||||
/-- `expandMacro? stx` return `some stxNew` if `stx` is a macro, and `stxNew` is its expansion. -/
|
||||
def expandMacro? (stx : Syntax) : MacroM (Option Syntax) := do
|
||||
(← getMethodsOld).expandMacro? stx
|
||||
(← getMethods).expandMacro? stx
|
||||
|
||||
/-- Return `true` if the environment contains a declaration with name `declName` -/
|
||||
def hasDecl (declName : Name) : MacroM Bool := do
|
||||
|
|
|
|||
14
stage0/src/Lean/Elab/Util.lean
generated
14
stage0/src/Lean/Elab/Util.lean
generated
|
|
@ -157,17 +157,19 @@ private def expandMacro? (env : Environment) (stx : Syntax) : MacroM (Option Syn
|
|||
@[inline] def liftMacroM {α} {m : Type → Type} [Monad m] [MonadMacroAdapter m] [MonadEnv m] [MonadRecDepth m] [MonadError m] [MonadResolveName m] (x : MacroM α) : m α := do
|
||||
let env ← getEnv
|
||||
let currNamespace ← getCurrNamespace
|
||||
match x { methodsOld := Macro.mkMethodsOld { expandMacro? := expandMacro? env }
|
||||
let methods := Macro.mkMethods {
|
||||
expandMacro? := expandMacro? env
|
||||
hasDecl := fun declName => return env.contains declName
|
||||
getCurrNamespace := return currNamespace
|
||||
}
|
||||
match x { methodsOld := methods
|
||||
ref := ← getRef
|
||||
currMacroScope := ← MonadMacroAdapter.getCurrMacroScope
|
||||
mainModule := env.mainModule
|
||||
currRecDepth := ← MonadRecDepth.getRecDepth
|
||||
maxRecDepth := ← MonadRecDepth.getMaxRecDepth
|
||||
methods := Macro.mkMethods {
|
||||
expandMacro? := expandMacro? env
|
||||
hasDecl := fun declName => return env.contains declName
|
||||
getCurrNamespace := return currNamespace
|
||||
} }
|
||||
methods := methods
|
||||
}
|
||||
{ macroScope := (← MonadMacroAdapter.getNextMacroScope), extra := arbitrary } with
|
||||
| EStateM.Result.error Macro.Exception.unsupportedSyntax _ => throwUnsupportedSyntax
|
||||
| EStateM.Result.error (Macro.Exception.error ref msg) _ => throwErrorAt ref msg
|
||||
|
|
|
|||
117
stage0/stdlib/Init/Prelude.c
generated
117
stage0/stdlib/Init/Prelude.c
generated
|
|
@ -199,7 +199,6 @@ lean_object* l_Lean_Syntax_getTailPos_x3f_loop_match__1(lean_object*);
|
|||
lean_object* l_Applicative_seqRight___default___rarg___closed__1;
|
||||
lean_object* l_instDecidableEqFin_match__1___rarg(uint8_t, lean_object*, lean_object*);
|
||||
lean_object* l_Lean_Macro_instMonadQuotationMacroM;
|
||||
lean_object* l_Lean_Macro_getMethodsOld___rarg(lean_object*);
|
||||
lean_object* l_Lean_Syntax_getNumArgs___boxed(lean_object*);
|
||||
lean_object* l_cond_match__1___rarg(uint8_t, lean_object*, lean_object*);
|
||||
lean_object* l_readThe___rarg___boxed(lean_object*);
|
||||
|
|
@ -209,7 +208,6 @@ lean_object* l_Applicative_seqRight___default(lean_object*);
|
|||
lean_object* l_EStateM_adaptExcept(lean_object*, lean_object*, lean_object*, lean_object*);
|
||||
lean_object* l_instDecidableEqBool_match__1(lean_object*);
|
||||
lean_object* l_ReaderT_instMonadReaderT___rarg___lambda__8(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
|
||||
lean_object* l_Lean_Macro_getMethodsOld___boxed(lean_object*);
|
||||
lean_object* lean_string_utf8_byte_size(lean_object*);
|
||||
lean_object* l_cond___rarg(uint8_t, lean_object*, lean_object*);
|
||||
lean_object* l_List_hasDecEq_match__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*);
|
||||
|
|
@ -486,7 +484,6 @@ uint16_t lean_uint16_of_nat_mk(lean_object*);
|
|||
lean_object* l___private_Init_Prelude_0__Lean_assembleParts_match__1(lean_object*);
|
||||
lean_object* l_Lean_Syntax_setKind_match__1___rarg(lean_object*, lean_object*, lean_object*);
|
||||
lean_object* l___private_Init_Prelude_0__Lean_assembleParts(lean_object*, lean_object*);
|
||||
lean_object* l_Lean_Macro_instInhabitedMethodsOld___rarg(lean_object*);
|
||||
lean_object* l_EStateM_instOrElseEStateM(lean_object*, lean_object*, lean_object*, lean_object*);
|
||||
uint8_t l_instDecidableEqFin___rarg(lean_object*, lean_object*);
|
||||
uint8_t l_Fin_decLt___rarg(lean_object*, lean_object*);
|
||||
|
|
@ -654,14 +651,12 @@ uint8_t lean_nat_dec_le(lean_object*, lean_object*);
|
|||
lean_object* l_instHMul___rarg(lean_object*, lean_object*, lean_object*);
|
||||
lean_object* l_Nat_mul___boxed(lean_object*, lean_object*);
|
||||
lean_object* l_Lean_Macro_throwUnsupported___rarg(lean_object*);
|
||||
lean_object* l_Lean_Macro_mkMethodsOld(lean_object*);
|
||||
lean_object* l_instInhabitedExcept___rarg(lean_object*);
|
||||
lean_object* l_instInhabitedArrow__1(lean_object*, lean_object*);
|
||||
lean_object* l_EStateM_pure(lean_object*, lean_object*, lean_object*);
|
||||
lean_object* l_Lean_Macro_instMonadQuotationMacroM___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*);
|
||||
uint32_t l_Char_utf8Size(uint32_t);
|
||||
lean_object* l_EStateM_run_x27(lean_object*, lean_object*, lean_object*);
|
||||
lean_object* l_Lean_Macro_getMethodsOld(lean_object*);
|
||||
lean_object* l_getThe___rarg___boxed(lean_object*);
|
||||
lean_object* l_Array_setD(lean_object*);
|
||||
lean_object* l_instDecidableAnd(lean_object*, lean_object*);
|
||||
|
|
@ -670,7 +665,6 @@ uint32_t l_Char_utf8Size___closed__4;
|
|||
lean_object* l_Lean_MonadQuotation_addMacroScope___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*);
|
||||
lean_object* l_List_hasDecEq_match__3___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
|
||||
lean_object* l_Lean_Macro_getMethodsImp(lean_object*, lean_object*);
|
||||
lean_object* l_Lean_Macro_getMethodsOldImp(lean_object*, lean_object*);
|
||||
lean_object* l_Lean_Name_hasMacroScopes___closed__1;
|
||||
lean_object* l_Lean_instMonadQuotation___rarg(lean_object*, lean_object*, lean_object*);
|
||||
lean_object* lean_nat_mul(lean_object*, lean_object*);
|
||||
|
|
@ -756,12 +750,10 @@ lean_object* l_MonadExcept_orelse(lean_object*, lean_object*);
|
|||
lean_object* l_Fin_decLt___boxed(lean_object*);
|
||||
lean_object* l_Lean_instMonadRef___rarg___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
|
||||
lean_object* l_EStateM_get(lean_object*, lean_object*);
|
||||
lean_object* l_Lean_Macro_mkMethodsOld___boxed(lean_object*);
|
||||
lean_object* l_instDecidableEqFin___boxed(lean_object*);
|
||||
lean_object* l_Lean_Syntax_getHeadInfo_x3f_match__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
|
||||
lean_object* l_Lean_MonadRef_mkInfoFromRefPos___rarg___lambda__1(lean_object*, lean_object*);
|
||||
lean_object* l_Lean_withRef(lean_object*);
|
||||
lean_object* l_Lean_Macro_instInhabitedMethodsOld(lean_object*, lean_object*);
|
||||
lean_object* l_Lean_MonadRef_mkInfoFromRefPos___rarg___lambda__1___boxed(lean_object*, lean_object*);
|
||||
lean_object* l_List_concat(lean_object*);
|
||||
lean_object* l_Array_appendCore_loop_match__1(lean_object*);
|
||||
|
|
@ -807,7 +799,6 @@ lean_object* l_Lean_PrettyPrinter_instMonadQuotationUnexpandM___closed__3;
|
|||
lean_object* l_EStateM_bind(lean_object*, lean_object*, lean_object*, lean_object*);
|
||||
lean_object* l_UInt32_val___boxed(lean_object*);
|
||||
lean_object* l_dite___rarg(uint8_t, lean_object*, lean_object*);
|
||||
lean_object* l_Lean_Macro_mkMethodsOldImp(lean_object*);
|
||||
lean_object* l_unsafeCast(lean_object*, lean_object*, lean_object*);
|
||||
lean_object* lean_system_platform_nbits(lean_object*);
|
||||
lean_object* l_instMonadState___rarg___lambda__1(lean_object*, lean_object*, lean_object*);
|
||||
|
|
@ -835,7 +826,6 @@ lean_object* l_instHAndThen(lean_object*);
|
|||
uint8_t l_instDecidableLt(uint32_t, uint32_t);
|
||||
lean_object* l_instOfNatNat___boxed(lean_object*);
|
||||
lean_object* l_Lean_MonadQuotation_addMacroScope(lean_object*);
|
||||
lean_object* l_Lean_Macro_instInhabitedMethodsOld___boxed(lean_object*, lean_object*);
|
||||
uint32_t lean_uint32_of_nat(lean_object*);
|
||||
lean_object* l_instInhabitedSort;
|
||||
lean_object* l_Array_empty(lean_object*);
|
||||
|
|
@ -12138,115 +12128,22 @@ lean_dec(x_1);
|
|||
return x_2;
|
||||
}
|
||||
}
|
||||
lean_object* l_Lean_Macro_instInhabitedMethodsOld___rarg(lean_object* x_1) {
|
||||
_start:
|
||||
{
|
||||
lean_object* x_2; lean_object* x_3;
|
||||
x_2 = lean_box(0);
|
||||
x_3 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_3, 0, x_2);
|
||||
lean_ctor_set(x_3, 1, x_1);
|
||||
return x_3;
|
||||
}
|
||||
}
|
||||
lean_object* l_Lean_Macro_instInhabitedMethodsOld(lean_object* x_1, lean_object* x_2) {
|
||||
_start:
|
||||
{
|
||||
lean_object* x_3;
|
||||
x_3 = lean_alloc_closure((void*)(l_Lean_Macro_instInhabitedMethodsOld___rarg), 1, 0);
|
||||
return x_3;
|
||||
}
|
||||
}
|
||||
lean_object* l_Lean_Macro_instInhabitedMethodsOld___boxed(lean_object* x_1, lean_object* x_2) {
|
||||
_start:
|
||||
{
|
||||
lean_object* x_3;
|
||||
x_3 = l_Lean_Macro_instInhabitedMethodsOld(x_1, x_2);
|
||||
lean_dec(x_2);
|
||||
lean_dec(x_1);
|
||||
return x_3;
|
||||
}
|
||||
}
|
||||
lean_object* l_Lean_Macro_mkMethodsOldImp(lean_object* x_1) {
|
||||
_start:
|
||||
{
|
||||
lean_object* x_2;
|
||||
x_2 = x_1;
|
||||
return x_2;
|
||||
}
|
||||
}
|
||||
lean_object* l_Lean_Macro_mkMethodsOld(lean_object* x_1) {
|
||||
_start:
|
||||
{
|
||||
lean_object* x_2;
|
||||
x_2 = lean_box(0);
|
||||
return x_2;
|
||||
}
|
||||
}
|
||||
lean_object* l_Lean_Macro_mkMethodsOld___boxed(lean_object* x_1) {
|
||||
_start:
|
||||
{
|
||||
lean_object* x_2;
|
||||
x_2 = l_Lean_Macro_mkMethodsOld(x_1);
|
||||
lean_dec(x_1);
|
||||
return x_2;
|
||||
}
|
||||
}
|
||||
lean_object* l_Lean_Macro_getMethodsOldImp(lean_object* x_1, lean_object* x_2) {
|
||||
_start:
|
||||
{
|
||||
lean_object* x_3; lean_object* x_4; lean_object* x_5;
|
||||
x_3 = lean_ctor_get(x_1, 0);
|
||||
lean_inc(x_3);
|
||||
lean_dec(x_1);
|
||||
x_4 = x_3;
|
||||
x_5 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_5, 0, x_4);
|
||||
lean_ctor_set(x_5, 1, x_2);
|
||||
return x_5;
|
||||
}
|
||||
}
|
||||
lean_object* l_Lean_Macro_getMethodsOld___rarg(lean_object* x_1) {
|
||||
_start:
|
||||
{
|
||||
lean_object* x_2; lean_object* x_3;
|
||||
x_2 = l_Lean_Macro_instInhabitedMethods___closed__1;
|
||||
x_3 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_3, 0, x_2);
|
||||
lean_ctor_set(x_3, 1, x_1);
|
||||
return x_3;
|
||||
}
|
||||
}
|
||||
lean_object* l_Lean_Macro_getMethodsOld(lean_object* x_1) {
|
||||
_start:
|
||||
{
|
||||
lean_object* x_2;
|
||||
x_2 = lean_alloc_closure((void*)(l_Lean_Macro_getMethodsOld___rarg), 1, 0);
|
||||
return x_2;
|
||||
}
|
||||
}
|
||||
lean_object* l_Lean_Macro_getMethodsOld___boxed(lean_object* x_1) {
|
||||
_start:
|
||||
{
|
||||
lean_object* x_2;
|
||||
x_2 = l_Lean_Macro_getMethodsOld(x_1);
|
||||
lean_dec(x_1);
|
||||
return x_2;
|
||||
}
|
||||
}
|
||||
lean_object* l_Lean_Macro_expandMacro_x3f(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
|
||||
_start:
|
||||
{
|
||||
lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7;
|
||||
lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8;
|
||||
lean_inc(x_2);
|
||||
x_4 = l_Lean_Macro_getMethodsOldImp(x_2, x_3);
|
||||
x_4 = l_Lean_Macro_getMethodsImp(x_2, x_3);
|
||||
x_5 = lean_ctor_get(x_4, 0);
|
||||
lean_inc(x_5);
|
||||
x_6 = lean_ctor_get(x_4, 1);
|
||||
lean_inc(x_6);
|
||||
lean_dec(x_4);
|
||||
x_7 = lean_apply_3(x_5, x_1, x_2, x_6);
|
||||
return x_7;
|
||||
x_7 = lean_ctor_get(x_5, 0);
|
||||
lean_inc(x_7);
|
||||
lean_dec(x_5);
|
||||
x_8 = lean_apply_3(x_7, x_1, x_2, x_6);
|
||||
return x_8;
|
||||
}
|
||||
}
|
||||
lean_object* l_Lean_Macro_hasDecl(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
|
||||
|
|
|
|||
187
stage0/stdlib/Lean/Elab/Attributes.c
generated
187
stage0/stdlib/Lean/Elab/Attributes.c
generated
|
|
@ -561,90 +561,76 @@ return x_2;
|
|||
lean_object* l_Lean_Elab_elabAttr___rarg___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_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_inc(x_1);
|
||||
x_13 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_13, 0, x_1);
|
||||
lean_inc(x_13);
|
||||
x_14 = x_13;
|
||||
lean_inc(x_1);
|
||||
x_15 = lean_environment_main_module(x_1);
|
||||
x_16 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_16, 0, x_2);
|
||||
x_17 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_17, 0, x_1);
|
||||
x_18 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_18, 0, x_13);
|
||||
lean_ctor_set(x_18, 1, x_16);
|
||||
lean_ctor_set(x_18, 2, x_17);
|
||||
x_19 = x_18;
|
||||
x_20 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_20, 0, x_14);
|
||||
lean_ctor_set(x_20, 1, x_15);
|
||||
lean_ctor_set(x_20, 2, x_3);
|
||||
lean_ctor_set(x_20, 3, x_4);
|
||||
lean_ctor_set(x_20, 4, x_5);
|
||||
lean_ctor_set(x_20, 5, x_6);
|
||||
lean_ctor_set(x_20, 6, x_19);
|
||||
x_21 = lean_box(0);
|
||||
x_22 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_22, 0, x_12);
|
||||
lean_ctor_set(x_22, 1, x_21);
|
||||
x_23 = l_Lean_expandMacros(x_7, x_20, x_22);
|
||||
if (lean_obj_tag(x_23) == 0)
|
||||
lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17;
|
||||
x_13 = lean_environment_main_module(x_1);
|
||||
lean_inc(x_2);
|
||||
x_14 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_14, 0, x_2);
|
||||
lean_ctor_set(x_14, 1, x_13);
|
||||
lean_ctor_set(x_14, 2, x_3);
|
||||
lean_ctor_set(x_14, 3, x_4);
|
||||
lean_ctor_set(x_14, 4, x_5);
|
||||
lean_ctor_set(x_14, 5, x_6);
|
||||
lean_ctor_set(x_14, 6, x_2);
|
||||
x_15 = lean_box(0);
|
||||
x_16 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_16, 0, x_12);
|
||||
lean_ctor_set(x_16, 1, x_15);
|
||||
x_17 = l_Lean_expandMacros(x_7, x_14, x_16);
|
||||
if (lean_obj_tag(x_17) == 0)
|
||||
{
|
||||
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_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_11);
|
||||
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 = lean_ctor_get(x_8, 2);
|
||||
lean_inc(x_26);
|
||||
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_ctor_get(x_8, 2);
|
||||
lean_inc(x_20);
|
||||
lean_dec(x_8);
|
||||
x_27 = lean_ctor_get(x_25, 0);
|
||||
x_21 = lean_ctor_get(x_19, 0);
|
||||
lean_inc(x_21);
|
||||
lean_dec(x_19);
|
||||
x_22 = lean_apply_1(x_20, x_21);
|
||||
x_23 = lean_alloc_closure((void*)(l_ReaderT_instMonadReaderT___rarg___lambda__4___boxed), 3, 2);
|
||||
lean_closure_set(x_23, 0, x_9);
|
||||
lean_closure_set(x_23, 1, x_18);
|
||||
x_24 = lean_apply_4(x_10, lean_box(0), lean_box(0), x_22, x_23);
|
||||
return x_24;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_25;
|
||||
lean_dec(x_10);
|
||||
lean_dec(x_8);
|
||||
x_25 = lean_ctor_get(x_17, 0);
|
||||
lean_inc(x_25);
|
||||
lean_dec(x_17);
|
||||
if (lean_obj_tag(x_25) == 0)
|
||||
{
|
||||
lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30;
|
||||
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);
|
||||
x_28 = lean_apply_1(x_26, x_27);
|
||||
x_29 = lean_alloc_closure((void*)(l_ReaderT_instMonadReaderT___rarg___lambda__4___boxed), 3, 2);
|
||||
lean_closure_set(x_29, 0, x_9);
|
||||
lean_closure_set(x_29, 1, x_24);
|
||||
x_30 = lean_apply_4(x_10, lean_box(0), lean_box(0), x_28, x_29);
|
||||
x_28 = lean_alloc_ctor(2, 1, 0);
|
||||
lean_ctor_set(x_28, 0, x_27);
|
||||
x_29 = lean_alloc_ctor(0, 1, 0);
|
||||
lean_ctor_set(x_29, 0, x_28);
|
||||
x_30 = l_Lean_throwErrorAt___rarg(x_9, x_11, x_26, x_29);
|
||||
return x_30;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_31;
|
||||
lean_dec(x_10);
|
||||
lean_dec(x_8);
|
||||
x_31 = lean_ctor_get(x_23, 0);
|
||||
lean_inc(x_31);
|
||||
lean_dec(x_23);
|
||||
if (lean_obj_tag(x_31) == 0)
|
||||
{
|
||||
lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36;
|
||||
x_32 = lean_ctor_get(x_31, 0);
|
||||
lean_inc(x_32);
|
||||
x_33 = lean_ctor_get(x_31, 1);
|
||||
lean_inc(x_33);
|
||||
lean_dec(x_31);
|
||||
x_34 = lean_alloc_ctor(2, 1, 0);
|
||||
lean_ctor_set(x_34, 0, x_33);
|
||||
x_35 = lean_alloc_ctor(0, 1, 0);
|
||||
lean_ctor_set(x_35, 0, x_34);
|
||||
x_36 = l_Lean_throwErrorAt___rarg(x_9, x_11, x_32, x_35);
|
||||
return x_36;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_37; lean_object* x_38;
|
||||
lean_object* x_31; lean_object* x_32;
|
||||
lean_dec(x_9);
|
||||
x_37 = lean_ctor_get(x_11, 0);
|
||||
lean_inc(x_37);
|
||||
x_31 = lean_ctor_get(x_11, 0);
|
||||
lean_inc(x_31);
|
||||
lean_dec(x_11);
|
||||
x_38 = l_Lean_Elab_throwUnsupportedSyntax___rarg(x_37);
|
||||
return x_38;
|
||||
x_32 = l_Lean_Elab_throwUnsupportedSyntax___rarg(x_31);
|
||||
return x_32;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
@ -741,24 +727,37 @@ return x_12;
|
|||
lean_object* l_Lean_Elab_elabAttr___rarg___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:
|
||||
{
|
||||
lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12;
|
||||
x_9 = lean_ctor_get(x_1, 1);
|
||||
lean_inc(x_9);
|
||||
x_10 = lean_ctor_get(x_9, 0);
|
||||
lean_inc(x_10);
|
||||
lean_dec(x_9);
|
||||
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_inc(x_1);
|
||||
x_9 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_9, 0, x_1);
|
||||
x_10 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_10, 0, x_8);
|
||||
lean_inc(x_1);
|
||||
x_11 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_11, 0, x_1);
|
||||
x_12 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_12, 0, x_9);
|
||||
lean_ctor_set(x_12, 1, x_10);
|
||||
lean_ctor_set(x_12, 2, x_11);
|
||||
x_13 = x_12;
|
||||
x_14 = lean_ctor_get(x_2, 1);
|
||||
lean_inc(x_14);
|
||||
x_15 = lean_ctor_get(x_14, 0);
|
||||
lean_inc(x_15);
|
||||
lean_dec(x_14);
|
||||
lean_inc(x_7);
|
||||
x_11 = lean_alloc_closure((void*)(l_Lean_Elab_elabAttr___rarg___lambda__5), 9, 8);
|
||||
lean_closure_set(x_11, 0, x_2);
|
||||
lean_closure_set(x_11, 1, x_3);
|
||||
lean_closure_set(x_11, 2, x_4);
|
||||
lean_closure_set(x_11, 3, x_8);
|
||||
lean_closure_set(x_11, 4, x_5);
|
||||
lean_closure_set(x_11, 5, x_6);
|
||||
lean_closure_set(x_11, 6, x_7);
|
||||
lean_closure_set(x_11, 7, x_1);
|
||||
x_12 = lean_apply_4(x_7, lean_box(0), lean_box(0), x_10, x_11);
|
||||
return x_12;
|
||||
x_16 = lean_alloc_closure((void*)(l_Lean_Elab_elabAttr___rarg___lambda__5), 9, 8);
|
||||
lean_closure_set(x_16, 0, x_3);
|
||||
lean_closure_set(x_16, 1, x_4);
|
||||
lean_closure_set(x_16, 2, x_1);
|
||||
lean_closure_set(x_16, 3, x_13);
|
||||
lean_closure_set(x_16, 4, x_5);
|
||||
lean_closure_set(x_16, 5, x_6);
|
||||
lean_closure_set(x_16, 6, x_7);
|
||||
lean_closure_set(x_16, 7, x_2);
|
||||
x_17 = lean_apply_4(x_7, lean_box(0), lean_box(0), x_15, x_16);
|
||||
return x_17;
|
||||
}
|
||||
}
|
||||
lean_object* l_Lean_Elab_elabAttr___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, lean_object* x_7, lean_object* x_8) {
|
||||
|
|
@ -770,10 +769,10 @@ lean_inc(x_9);
|
|||
lean_dec(x_1);
|
||||
lean_inc(x_7);
|
||||
x_10 = lean_alloc_closure((void*)(l_Lean_Elab_elabAttr___rarg___lambda__6), 8, 7);
|
||||
lean_closure_set(x_10, 0, x_2);
|
||||
lean_closure_set(x_10, 1, x_3);
|
||||
lean_closure_set(x_10, 2, x_4);
|
||||
lean_closure_set(x_10, 3, x_8);
|
||||
lean_closure_set(x_10, 0, x_8);
|
||||
lean_closure_set(x_10, 1, x_2);
|
||||
lean_closure_set(x_10, 2, x_3);
|
||||
lean_closure_set(x_10, 3, x_4);
|
||||
lean_closure_set(x_10, 4, x_5);
|
||||
lean_closure_set(x_10, 5, x_6);
|
||||
lean_closure_set(x_10, 6, x_7);
|
||||
|
|
|
|||
896
stage0/stdlib/Lean/Elab/Binders.c
generated
896
stage0/stdlib/Lean/Elab/Binders.c
generated
File diff suppressed because it is too large
Load diff
1086
stage0/stdlib/Lean/Elab/BuiltinNotation.c
generated
1086
stage0/stdlib/Lean/Elab/BuiltinNotation.c
generated
File diff suppressed because it is too large
Load diff
2495
stage0/stdlib/Lean/Elab/Command.c
generated
2495
stage0/stdlib/Lean/Elab/Command.c
generated
File diff suppressed because it is too large
Load diff
606
stage0/stdlib/Lean/Elab/DefView.c
generated
606
stage0/stdlib/Lean/Elab/DefView.c
generated
|
|
@ -4296,7 +4296,7 @@ return x_25;
|
|||
lean_object* l_Lean_Elab_Command_MkInstanceName_main(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_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; 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; 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_5; lean_object* x_6; 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; 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; 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;
|
||||
x_24 = lean_st_ref_get(x_3, x_4);
|
||||
x_25 = lean_ctor_get(x_24, 0);
|
||||
lean_inc(x_25);
|
||||
|
|
@ -4315,196 +4315,195 @@ lean_dec(x_28);
|
|||
x_31 = lean_ctor_get(x_29, 2);
|
||||
lean_inc(x_31);
|
||||
lean_dec(x_29);
|
||||
x_32 = l_Lean_Elab_Command_getRef(x_2, x_3, x_30);
|
||||
x_33 = lean_ctor_get(x_32, 0);
|
||||
lean_inc(x_33);
|
||||
x_34 = lean_ctor_get(x_32, 1);
|
||||
lean_inc(x_34);
|
||||
lean_dec(x_32);
|
||||
x_35 = l_Lean_Elab_Command_getCurrMacroScope(x_2, x_3, x_34);
|
||||
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);
|
||||
x_38 = lean_ctor_get(x_2, 2);
|
||||
lean_inc(x_27);
|
||||
x_32 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_32, 0, x_27);
|
||||
x_33 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_33, 0, x_31);
|
||||
lean_inc(x_27);
|
||||
x_34 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_34, 0, x_27);
|
||||
x_35 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_35, 0, x_32);
|
||||
lean_ctor_set(x_35, 1, x_33);
|
||||
lean_ctor_set(x_35, 2, x_34);
|
||||
x_36 = x_35;
|
||||
x_37 = l_Lean_Elab_Command_getRef(x_2, x_3, x_30);
|
||||
x_38 = lean_ctor_get(x_37, 0);
|
||||
lean_inc(x_38);
|
||||
x_39 = lean_st_ref_get(x_3, x_37);
|
||||
x_40 = lean_ctor_get(x_39, 0);
|
||||
lean_inc(x_40);
|
||||
x_41 = lean_ctor_get(x_39, 1);
|
||||
x_39 = lean_ctor_get(x_37, 1);
|
||||
lean_inc(x_39);
|
||||
lean_dec(x_37);
|
||||
x_40 = l_Lean_Elab_Command_getCurrMacroScope(x_2, x_3, x_39);
|
||||
x_41 = lean_ctor_get(x_40, 0);
|
||||
lean_inc(x_41);
|
||||
lean_dec(x_39);
|
||||
x_42 = lean_ctor_get(x_40, 4);
|
||||
x_42 = lean_ctor_get(x_40, 1);
|
||||
lean_inc(x_42);
|
||||
lean_dec(x_40);
|
||||
x_43 = lean_st_ref_get(x_3, x_41);
|
||||
x_44 = lean_ctor_get(x_43, 0);
|
||||
lean_inc(x_44);
|
||||
x_45 = lean_ctor_get(x_43, 1);
|
||||
x_43 = lean_ctor_get(x_2, 2);
|
||||
lean_inc(x_43);
|
||||
x_44 = lean_st_ref_get(x_3, x_42);
|
||||
x_45 = lean_ctor_get(x_44, 0);
|
||||
lean_inc(x_45);
|
||||
lean_dec(x_43);
|
||||
x_46 = lean_ctor_get(x_44, 3);
|
||||
x_46 = lean_ctor_get(x_44, 1);
|
||||
lean_inc(x_46);
|
||||
lean_dec(x_44);
|
||||
lean_inc(x_27);
|
||||
x_47 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_47, 0, x_27);
|
||||
x_47 = lean_ctor_get(x_45, 4);
|
||||
lean_inc(x_47);
|
||||
x_48 = x_47;
|
||||
lean_inc(x_27);
|
||||
x_49 = lean_environment_main_module(x_27);
|
||||
x_50 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_50, 0, x_31);
|
||||
x_51 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_51, 0, x_27);
|
||||
x_52 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_52, 0, x_47);
|
||||
lean_ctor_set(x_52, 1, x_50);
|
||||
lean_ctor_set(x_52, 2, x_51);
|
||||
x_53 = x_52;
|
||||
x_54 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_54, 0, x_48);
|
||||
lean_ctor_set(x_54, 1, x_49);
|
||||
lean_ctor_set(x_54, 2, x_36);
|
||||
lean_ctor_set(x_54, 3, x_38);
|
||||
lean_ctor_set(x_54, 4, x_42);
|
||||
lean_ctor_set(x_54, 5, x_33);
|
||||
lean_ctor_set(x_54, 6, x_53);
|
||||
x_55 = lean_box(0);
|
||||
x_56 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_56, 0, x_46);
|
||||
lean_ctor_set(x_56, 1, x_55);
|
||||
x_57 = l_Lean_expandMacros(x_1, x_54, x_56);
|
||||
if (lean_obj_tag(x_57) == 0)
|
||||
lean_dec(x_45);
|
||||
x_48 = lean_st_ref_get(x_3, x_46);
|
||||
x_49 = lean_ctor_get(x_48, 0);
|
||||
lean_inc(x_49);
|
||||
x_50 = lean_ctor_get(x_48, 1);
|
||||
lean_inc(x_50);
|
||||
lean_dec(x_48);
|
||||
x_51 = lean_ctor_get(x_49, 3);
|
||||
lean_inc(x_51);
|
||||
lean_dec(x_49);
|
||||
x_52 = lean_environment_main_module(x_27);
|
||||
lean_inc(x_36);
|
||||
x_53 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_53, 0, x_36);
|
||||
lean_ctor_set(x_53, 1, x_52);
|
||||
lean_ctor_set(x_53, 2, x_41);
|
||||
lean_ctor_set(x_53, 3, x_43);
|
||||
lean_ctor_set(x_53, 4, x_47);
|
||||
lean_ctor_set(x_53, 5, x_38);
|
||||
lean_ctor_set(x_53, 6, x_36);
|
||||
x_54 = lean_box(0);
|
||||
x_55 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_55, 0, x_51);
|
||||
lean_ctor_set(x_55, 1, x_54);
|
||||
x_56 = l_Lean_expandMacros(x_1, x_53, x_55);
|
||||
if (lean_obj_tag(x_56) == 0)
|
||||
{
|
||||
lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; uint8_t x_64;
|
||||
x_58 = lean_ctor_get(x_57, 0);
|
||||
lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; uint8_t x_63;
|
||||
x_57 = lean_ctor_get(x_56, 0);
|
||||
lean_inc(x_57);
|
||||
x_58 = lean_ctor_get(x_56, 1);
|
||||
lean_inc(x_58);
|
||||
x_59 = lean_ctor_get(x_57, 1);
|
||||
lean_dec(x_56);
|
||||
x_59 = lean_ctor_get(x_58, 0);
|
||||
lean_inc(x_59);
|
||||
lean_dec(x_57);
|
||||
x_60 = lean_ctor_get(x_59, 0);
|
||||
lean_inc(x_60);
|
||||
lean_dec(x_59);
|
||||
x_61 = lean_st_ref_take(x_3, x_45);
|
||||
x_62 = lean_ctor_get(x_61, 0);
|
||||
lean_dec(x_58);
|
||||
x_60 = lean_st_ref_take(x_3, x_50);
|
||||
x_61 = lean_ctor_get(x_60, 0);
|
||||
lean_inc(x_61);
|
||||
x_62 = lean_ctor_get(x_60, 1);
|
||||
lean_inc(x_62);
|
||||
x_63 = lean_ctor_get(x_61, 1);
|
||||
lean_inc(x_63);
|
||||
lean_dec(x_61);
|
||||
x_64 = !lean_is_exclusive(x_62);
|
||||
if (x_64 == 0)
|
||||
lean_dec(x_60);
|
||||
x_63 = !lean_is_exclusive(x_61);
|
||||
if (x_63 == 0)
|
||||
{
|
||||
lean_object* x_65; lean_object* x_66; lean_object* x_67;
|
||||
x_65 = lean_ctor_get(x_62, 3);
|
||||
lean_object* x_64; lean_object* x_65; lean_object* x_66;
|
||||
x_64 = lean_ctor_get(x_61, 3);
|
||||
lean_dec(x_64);
|
||||
lean_ctor_set(x_61, 3, x_59);
|
||||
x_65 = lean_st_ref_set(x_3, x_61, x_62);
|
||||
x_66 = lean_ctor_get(x_65, 1);
|
||||
lean_inc(x_66);
|
||||
lean_dec(x_65);
|
||||
lean_ctor_set(x_62, 3, x_60);
|
||||
x_66 = lean_st_ref_set(x_3, x_62, x_63);
|
||||
x_67 = lean_ctor_get(x_66, 1);
|
||||
lean_inc(x_67);
|
||||
lean_dec(x_66);
|
||||
x_5 = x_58;
|
||||
x_6 = x_67;
|
||||
x_5 = x_57;
|
||||
x_6 = x_66;
|
||||
goto block_23;
|
||||
}
|
||||
else
|
||||
{
|
||||
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; lean_object* x_77;
|
||||
x_68 = lean_ctor_get(x_62, 0);
|
||||
x_69 = lean_ctor_get(x_62, 1);
|
||||
x_70 = lean_ctor_get(x_62, 2);
|
||||
x_71 = lean_ctor_get(x_62, 4);
|
||||
x_72 = lean_ctor_get(x_62, 5);
|
||||
x_73 = lean_ctor_get(x_62, 6);
|
||||
x_74 = lean_ctor_get(x_62, 7);
|
||||
lean_inc(x_74);
|
||||
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_67 = lean_ctor_get(x_61, 0);
|
||||
x_68 = lean_ctor_get(x_61, 1);
|
||||
x_69 = lean_ctor_get(x_61, 2);
|
||||
x_70 = lean_ctor_get(x_61, 4);
|
||||
x_71 = lean_ctor_get(x_61, 5);
|
||||
x_72 = lean_ctor_get(x_61, 6);
|
||||
x_73 = lean_ctor_get(x_61, 7);
|
||||
lean_inc(x_73);
|
||||
lean_inc(x_72);
|
||||
lean_inc(x_71);
|
||||
lean_inc(x_70);
|
||||
lean_inc(x_69);
|
||||
lean_inc(x_68);
|
||||
lean_dec(x_62);
|
||||
x_75 = lean_alloc_ctor(0, 8, 0);
|
||||
lean_ctor_set(x_75, 0, x_68);
|
||||
lean_ctor_set(x_75, 1, x_69);
|
||||
lean_ctor_set(x_75, 2, x_70);
|
||||
lean_ctor_set(x_75, 3, x_60);
|
||||
lean_ctor_set(x_75, 4, x_71);
|
||||
lean_ctor_set(x_75, 5, x_72);
|
||||
lean_ctor_set(x_75, 6, x_73);
|
||||
lean_ctor_set(x_75, 7, x_74);
|
||||
x_76 = lean_st_ref_set(x_3, x_75, x_63);
|
||||
x_77 = lean_ctor_get(x_76, 1);
|
||||
lean_inc(x_77);
|
||||
lean_dec(x_76);
|
||||
x_5 = x_58;
|
||||
x_6 = x_77;
|
||||
lean_inc(x_67);
|
||||
lean_dec(x_61);
|
||||
x_74 = lean_alloc_ctor(0, 8, 0);
|
||||
lean_ctor_set(x_74, 0, x_67);
|
||||
lean_ctor_set(x_74, 1, x_68);
|
||||
lean_ctor_set(x_74, 2, x_69);
|
||||
lean_ctor_set(x_74, 3, x_59);
|
||||
lean_ctor_set(x_74, 4, x_70);
|
||||
lean_ctor_set(x_74, 5, x_71);
|
||||
lean_ctor_set(x_74, 6, x_72);
|
||||
lean_ctor_set(x_74, 7, x_73);
|
||||
x_75 = lean_st_ref_set(x_3, x_74, x_62);
|
||||
x_76 = lean_ctor_get(x_75, 1);
|
||||
lean_inc(x_76);
|
||||
lean_dec(x_75);
|
||||
x_5 = x_57;
|
||||
x_6 = x_76;
|
||||
goto block_23;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_78;
|
||||
x_78 = lean_ctor_get(x_57, 0);
|
||||
lean_object* x_77;
|
||||
x_77 = lean_ctor_get(x_56, 0);
|
||||
lean_inc(x_77);
|
||||
lean_dec(x_56);
|
||||
if (lean_obj_tag(x_77) == 0)
|
||||
{
|
||||
lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; uint8_t x_83;
|
||||
x_78 = lean_ctor_get(x_77, 0);
|
||||
lean_inc(x_78);
|
||||
lean_dec(x_57);
|
||||
if (lean_obj_tag(x_78) == 0)
|
||||
{
|
||||
lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; uint8_t x_84;
|
||||
x_79 = lean_ctor_get(x_78, 0);
|
||||
x_79 = lean_ctor_get(x_77, 1);
|
||||
lean_inc(x_79);
|
||||
x_80 = lean_ctor_get(x_78, 1);
|
||||
lean_inc(x_80);
|
||||
lean_dec(x_78);
|
||||
x_81 = lean_alloc_ctor(2, 1, 0);
|
||||
lean_dec(x_77);
|
||||
x_80 = lean_alloc_ctor(2, 1, 0);
|
||||
lean_ctor_set(x_80, 0, x_79);
|
||||
x_81 = lean_alloc_ctor(0, 1, 0);
|
||||
lean_ctor_set(x_81, 0, x_80);
|
||||
x_82 = lean_alloc_ctor(0, 1, 0);
|
||||
lean_ctor_set(x_82, 0, x_81);
|
||||
x_83 = l_Lean_throwErrorAt___at_Lean_Elab_Command_elabCommand___spec__13(x_79, x_82, x_2, x_3, x_45);
|
||||
lean_dec(x_79);
|
||||
x_84 = !lean_is_exclusive(x_83);
|
||||
if (x_84 == 0)
|
||||
x_82 = l_Lean_throwErrorAt___at_Lean_Elab_Command_elabCommand___spec__13(x_78, x_81, x_2, x_3, x_50);
|
||||
lean_dec(x_78);
|
||||
x_83 = !lean_is_exclusive(x_82);
|
||||
if (x_83 == 0)
|
||||
{
|
||||
return x_83;
|
||||
return x_82;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_85; lean_object* x_86; lean_object* x_87;
|
||||
x_85 = lean_ctor_get(x_83, 0);
|
||||
x_86 = lean_ctor_get(x_83, 1);
|
||||
lean_inc(x_86);
|
||||
lean_object* x_84; lean_object* x_85; lean_object* x_86;
|
||||
x_84 = lean_ctor_get(x_82, 0);
|
||||
x_85 = lean_ctor_get(x_82, 1);
|
||||
lean_inc(x_85);
|
||||
lean_dec(x_83);
|
||||
x_87 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_87, 0, x_85);
|
||||
lean_ctor_set(x_87, 1, x_86);
|
||||
lean_inc(x_84);
|
||||
lean_dec(x_82);
|
||||
x_86 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_86, 0, x_84);
|
||||
lean_ctor_set(x_86, 1, x_85);
|
||||
return x_86;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_87; uint8_t x_88;
|
||||
lean_dec(x_2);
|
||||
x_87 = l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Command_elabCommand___spec__15___rarg(x_50);
|
||||
x_88 = !lean_is_exclusive(x_87);
|
||||
if (x_88 == 0)
|
||||
{
|
||||
return x_87;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_88; uint8_t x_89;
|
||||
lean_dec(x_2);
|
||||
x_88 = l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Command_elabCommand___spec__15___rarg(x_45);
|
||||
x_89 = !lean_is_exclusive(x_88);
|
||||
if (x_89 == 0)
|
||||
{
|
||||
return x_88;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_90; lean_object* x_91; lean_object* x_92;
|
||||
x_90 = lean_ctor_get(x_88, 0);
|
||||
x_91 = lean_ctor_get(x_88, 1);
|
||||
lean_inc(x_91);
|
||||
lean_object* x_89; lean_object* x_90; lean_object* x_91;
|
||||
x_89 = lean_ctor_get(x_87, 0);
|
||||
x_90 = lean_ctor_get(x_87, 1);
|
||||
lean_inc(x_90);
|
||||
lean_dec(x_88);
|
||||
x_92 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_92, 0, x_90);
|
||||
lean_ctor_set(x_92, 1, x_91);
|
||||
return x_92;
|
||||
lean_inc(x_89);
|
||||
lean_dec(x_87);
|
||||
x_91 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_91, 0, x_89);
|
||||
lean_ctor_set(x_91, 1, x_90);
|
||||
return x_91;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
@ -5035,7 +5034,7 @@ x_8 = l_Lean_Elab_toAttributeKind___at_Lean_Elab_Command_mkDefViewOfInstance___s
|
|||
lean_dec(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_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; 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_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_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; 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; 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_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;
|
||||
x_9 = lean_ctor_get(x_8, 0);
|
||||
lean_inc(x_9);
|
||||
x_10 = lean_ctor_get(x_8, 1);
|
||||
|
|
@ -5061,202 +5060,201 @@ lean_dec(x_70);
|
|||
x_73 = lean_ctor_get(x_71, 2);
|
||||
lean_inc(x_73);
|
||||
lean_dec(x_71);
|
||||
x_74 = l_Lean_Elab_Command_getRef(x_3, x_4, x_72);
|
||||
x_75 = lean_ctor_get(x_74, 0);
|
||||
lean_inc(x_75);
|
||||
x_76 = lean_ctor_get(x_74, 1);
|
||||
lean_inc(x_76);
|
||||
lean_dec(x_74);
|
||||
x_77 = l_Lean_Elab_Command_getCurrMacroScope(x_3, x_4, x_76);
|
||||
x_78 = lean_ctor_get(x_77, 0);
|
||||
lean_inc(x_78);
|
||||
x_79 = lean_ctor_get(x_77, 1);
|
||||
lean_inc(x_79);
|
||||
lean_dec(x_77);
|
||||
x_80 = lean_ctor_get(x_3, 2);
|
||||
lean_inc(x_69);
|
||||
x_74 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_74, 0, x_69);
|
||||
x_75 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_75, 0, x_73);
|
||||
lean_inc(x_69);
|
||||
x_76 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_76, 0, x_69);
|
||||
x_77 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_77, 0, x_74);
|
||||
lean_ctor_set(x_77, 1, x_75);
|
||||
lean_ctor_set(x_77, 2, x_76);
|
||||
x_78 = x_77;
|
||||
x_79 = l_Lean_Elab_Command_getRef(x_3, x_4, x_72);
|
||||
x_80 = lean_ctor_get(x_79, 0);
|
||||
lean_inc(x_80);
|
||||
x_81 = lean_st_ref_get(x_4, x_79);
|
||||
x_82 = lean_ctor_get(x_81, 0);
|
||||
lean_inc(x_82);
|
||||
x_83 = lean_ctor_get(x_81, 1);
|
||||
x_81 = lean_ctor_get(x_79, 1);
|
||||
lean_inc(x_81);
|
||||
lean_dec(x_79);
|
||||
x_82 = l_Lean_Elab_Command_getCurrMacroScope(x_3, x_4, x_81);
|
||||
x_83 = lean_ctor_get(x_82, 0);
|
||||
lean_inc(x_83);
|
||||
lean_dec(x_81);
|
||||
x_84 = lean_ctor_get(x_82, 4);
|
||||
x_84 = lean_ctor_get(x_82, 1);
|
||||
lean_inc(x_84);
|
||||
lean_dec(x_82);
|
||||
x_85 = lean_st_ref_get(x_4, x_83);
|
||||
x_86 = lean_ctor_get(x_85, 0);
|
||||
lean_inc(x_86);
|
||||
x_87 = lean_ctor_get(x_85, 1);
|
||||
x_85 = lean_ctor_get(x_3, 2);
|
||||
lean_inc(x_85);
|
||||
x_86 = lean_st_ref_get(x_4, x_84);
|
||||
x_87 = lean_ctor_get(x_86, 0);
|
||||
lean_inc(x_87);
|
||||
lean_dec(x_85);
|
||||
x_88 = lean_ctor_get(x_86, 3);
|
||||
x_88 = lean_ctor_get(x_86, 1);
|
||||
lean_inc(x_88);
|
||||
lean_dec(x_86);
|
||||
lean_inc(x_69);
|
||||
x_89 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_89, 0, x_69);
|
||||
x_89 = lean_ctor_get(x_87, 4);
|
||||
lean_inc(x_89);
|
||||
x_90 = x_89;
|
||||
lean_inc(x_69);
|
||||
x_91 = lean_environment_main_module(x_69);
|
||||
x_92 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_92, 0, x_73);
|
||||
x_93 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_93, 0, x_69);
|
||||
x_94 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_94, 0, x_89);
|
||||
lean_ctor_set(x_94, 1, x_92);
|
||||
lean_ctor_set(x_94, 2, x_93);
|
||||
x_95 = x_94;
|
||||
x_96 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_96, 0, x_90);
|
||||
lean_ctor_set(x_96, 1, x_91);
|
||||
lean_ctor_set(x_96, 2, x_78);
|
||||
lean_ctor_set(x_96, 3, x_80);
|
||||
lean_ctor_set(x_96, 4, x_84);
|
||||
lean_ctor_set(x_96, 5, x_75);
|
||||
lean_ctor_set(x_96, 6, x_95);
|
||||
x_97 = lean_box(0);
|
||||
x_98 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_98, 0, x_88);
|
||||
lean_ctor_set(x_98, 1, x_97);
|
||||
x_99 = l_Lean_Elab_expandOptNamedPrio(x_65, x_96, x_98);
|
||||
lean_dec(x_87);
|
||||
x_90 = lean_st_ref_get(x_4, x_88);
|
||||
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_ctor_get(x_91, 3);
|
||||
lean_inc(x_93);
|
||||
lean_dec(x_91);
|
||||
x_94 = lean_environment_main_module(x_69);
|
||||
lean_inc(x_78);
|
||||
x_95 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_95, 0, x_78);
|
||||
lean_ctor_set(x_95, 1, x_94);
|
||||
lean_ctor_set(x_95, 2, x_83);
|
||||
lean_ctor_set(x_95, 3, x_85);
|
||||
lean_ctor_set(x_95, 4, x_89);
|
||||
lean_ctor_set(x_95, 5, x_80);
|
||||
lean_ctor_set(x_95, 6, x_78);
|
||||
x_96 = lean_box(0);
|
||||
x_97 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_97, 0, x_93);
|
||||
lean_ctor_set(x_97, 1, x_96);
|
||||
x_98 = l_Lean_Elab_expandOptNamedPrio(x_65, x_95, x_97);
|
||||
lean_dec(x_65);
|
||||
if (lean_obj_tag(x_99) == 0)
|
||||
if (lean_obj_tag(x_98) == 0)
|
||||
{
|
||||
lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; uint8_t x_106;
|
||||
x_100 = lean_ctor_get(x_99, 0);
|
||||
lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; uint8_t x_105;
|
||||
x_99 = lean_ctor_get(x_98, 0);
|
||||
lean_inc(x_99);
|
||||
x_100 = lean_ctor_get(x_98, 1);
|
||||
lean_inc(x_100);
|
||||
x_101 = lean_ctor_get(x_99, 1);
|
||||
lean_dec(x_98);
|
||||
x_101 = lean_ctor_get(x_100, 0);
|
||||
lean_inc(x_101);
|
||||
lean_dec(x_99);
|
||||
x_102 = lean_ctor_get(x_101, 0);
|
||||
lean_inc(x_102);
|
||||
lean_dec(x_101);
|
||||
x_103 = lean_st_ref_take(x_4, x_87);
|
||||
x_104 = lean_ctor_get(x_103, 0);
|
||||
lean_dec(x_100);
|
||||
x_102 = lean_st_ref_take(x_4, x_92);
|
||||
x_103 = lean_ctor_get(x_102, 0);
|
||||
lean_inc(x_103);
|
||||
x_104 = lean_ctor_get(x_102, 1);
|
||||
lean_inc(x_104);
|
||||
x_105 = lean_ctor_get(x_103, 1);
|
||||
lean_inc(x_105);
|
||||
lean_dec(x_103);
|
||||
x_106 = !lean_is_exclusive(x_104);
|
||||
if (x_106 == 0)
|
||||
lean_dec(x_102);
|
||||
x_105 = !lean_is_exclusive(x_103);
|
||||
if (x_105 == 0)
|
||||
{
|
||||
lean_object* x_107; lean_object* x_108; lean_object* x_109;
|
||||
x_107 = lean_ctor_get(x_104, 3);
|
||||
lean_object* x_106; lean_object* x_107; lean_object* x_108;
|
||||
x_106 = lean_ctor_get(x_103, 3);
|
||||
lean_dec(x_106);
|
||||
lean_ctor_set(x_103, 3, x_101);
|
||||
x_107 = lean_st_ref_set(x_4, x_103, x_104);
|
||||
x_108 = lean_ctor_get(x_107, 1);
|
||||
lean_inc(x_108);
|
||||
lean_dec(x_107);
|
||||
lean_ctor_set(x_104, 3, x_102);
|
||||
x_108 = lean_st_ref_set(x_4, x_104, x_105);
|
||||
x_109 = lean_ctor_get(x_108, 1);
|
||||
lean_inc(x_109);
|
||||
lean_dec(x_108);
|
||||
x_11 = x_100;
|
||||
x_12 = x_109;
|
||||
x_11 = x_99;
|
||||
x_12 = x_108;
|
||||
goto block_63;
|
||||
}
|
||||
else
|
||||
{
|
||||
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;
|
||||
x_110 = lean_ctor_get(x_104, 0);
|
||||
x_111 = lean_ctor_get(x_104, 1);
|
||||
x_112 = lean_ctor_get(x_104, 2);
|
||||
x_113 = lean_ctor_get(x_104, 4);
|
||||
x_114 = lean_ctor_get(x_104, 5);
|
||||
x_115 = lean_ctor_get(x_104, 6);
|
||||
x_116 = lean_ctor_get(x_104, 7);
|
||||
lean_inc(x_116);
|
||||
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;
|
||||
x_109 = lean_ctor_get(x_103, 0);
|
||||
x_110 = lean_ctor_get(x_103, 1);
|
||||
x_111 = lean_ctor_get(x_103, 2);
|
||||
x_112 = lean_ctor_get(x_103, 4);
|
||||
x_113 = lean_ctor_get(x_103, 5);
|
||||
x_114 = lean_ctor_get(x_103, 6);
|
||||
x_115 = lean_ctor_get(x_103, 7);
|
||||
lean_inc(x_115);
|
||||
lean_inc(x_114);
|
||||
lean_inc(x_113);
|
||||
lean_inc(x_112);
|
||||
lean_inc(x_111);
|
||||
lean_inc(x_110);
|
||||
lean_dec(x_104);
|
||||
x_117 = lean_alloc_ctor(0, 8, 0);
|
||||
lean_ctor_set(x_117, 0, x_110);
|
||||
lean_ctor_set(x_117, 1, x_111);
|
||||
lean_ctor_set(x_117, 2, x_112);
|
||||
lean_ctor_set(x_117, 3, x_102);
|
||||
lean_ctor_set(x_117, 4, x_113);
|
||||
lean_ctor_set(x_117, 5, x_114);
|
||||
lean_ctor_set(x_117, 6, x_115);
|
||||
lean_ctor_set(x_117, 7, x_116);
|
||||
x_118 = lean_st_ref_set(x_4, x_117, x_105);
|
||||
x_119 = lean_ctor_get(x_118, 1);
|
||||
lean_inc(x_119);
|
||||
lean_dec(x_118);
|
||||
x_11 = x_100;
|
||||
x_12 = x_119;
|
||||
lean_inc(x_109);
|
||||
lean_dec(x_103);
|
||||
x_116 = lean_alloc_ctor(0, 8, 0);
|
||||
lean_ctor_set(x_116, 0, x_109);
|
||||
lean_ctor_set(x_116, 1, x_110);
|
||||
lean_ctor_set(x_116, 2, x_111);
|
||||
lean_ctor_set(x_116, 3, x_101);
|
||||
lean_ctor_set(x_116, 4, x_112);
|
||||
lean_ctor_set(x_116, 5, x_113);
|
||||
lean_ctor_set(x_116, 6, x_114);
|
||||
lean_ctor_set(x_116, 7, x_115);
|
||||
x_117 = lean_st_ref_set(x_4, x_116, x_104);
|
||||
x_118 = lean_ctor_get(x_117, 1);
|
||||
lean_inc(x_118);
|
||||
lean_dec(x_117);
|
||||
x_11 = x_99;
|
||||
x_12 = x_118;
|
||||
goto block_63;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_120;
|
||||
lean_object* x_119;
|
||||
lean_dec(x_9);
|
||||
lean_dec(x_2);
|
||||
lean_dec(x_1);
|
||||
x_120 = lean_ctor_get(x_99, 0);
|
||||
x_119 = lean_ctor_get(x_98, 0);
|
||||
lean_inc(x_119);
|
||||
lean_dec(x_98);
|
||||
if (lean_obj_tag(x_119) == 0)
|
||||
{
|
||||
lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; uint8_t x_125;
|
||||
x_120 = lean_ctor_get(x_119, 0);
|
||||
lean_inc(x_120);
|
||||
lean_dec(x_99);
|
||||
if (lean_obj_tag(x_120) == 0)
|
||||
{
|
||||
lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; uint8_t x_126;
|
||||
x_121 = lean_ctor_get(x_120, 0);
|
||||
x_121 = lean_ctor_get(x_119, 1);
|
||||
lean_inc(x_121);
|
||||
x_122 = lean_ctor_get(x_120, 1);
|
||||
lean_inc(x_122);
|
||||
lean_dec(x_120);
|
||||
x_123 = lean_alloc_ctor(2, 1, 0);
|
||||
lean_dec(x_119);
|
||||
x_122 = lean_alloc_ctor(2, 1, 0);
|
||||
lean_ctor_set(x_122, 0, x_121);
|
||||
x_123 = lean_alloc_ctor(0, 1, 0);
|
||||
lean_ctor_set(x_123, 0, x_122);
|
||||
x_124 = lean_alloc_ctor(0, 1, 0);
|
||||
lean_ctor_set(x_124, 0, x_123);
|
||||
x_125 = l_Lean_throwErrorAt___at_Lean_Elab_Command_mkDefViewOfInstance___spec__2(x_121, x_124, x_3, x_4, x_87);
|
||||
x_124 = l_Lean_throwErrorAt___at_Lean_Elab_Command_mkDefViewOfInstance___spec__2(x_120, x_123, x_3, x_4, x_92);
|
||||
lean_dec(x_4);
|
||||
lean_dec(x_121);
|
||||
x_126 = !lean_is_exclusive(x_125);
|
||||
if (x_126 == 0)
|
||||
lean_dec(x_120);
|
||||
x_125 = !lean_is_exclusive(x_124);
|
||||
if (x_125 == 0)
|
||||
{
|
||||
return x_125;
|
||||
return x_124;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_127; lean_object* x_128; lean_object* x_129;
|
||||
x_127 = lean_ctor_get(x_125, 0);
|
||||
x_128 = lean_ctor_get(x_125, 1);
|
||||
lean_inc(x_128);
|
||||
lean_object* x_126; lean_object* x_127; lean_object* x_128;
|
||||
x_126 = lean_ctor_get(x_124, 0);
|
||||
x_127 = lean_ctor_get(x_124, 1);
|
||||
lean_inc(x_127);
|
||||
lean_dec(x_125);
|
||||
x_129 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_129, 0, x_127);
|
||||
lean_ctor_set(x_129, 1, x_128);
|
||||
return x_129;
|
||||
lean_inc(x_126);
|
||||
lean_dec(x_124);
|
||||
x_128 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_128, 0, x_126);
|
||||
lean_ctor_set(x_128, 1, x_127);
|
||||
return x_128;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_130; uint8_t x_131;
|
||||
lean_object* x_129; uint8_t x_130;
|
||||
lean_dec(x_4);
|
||||
lean_dec(x_3);
|
||||
x_130 = l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Command_mkDefViewOfInstance___spec__4___rarg(x_87);
|
||||
x_131 = !lean_is_exclusive(x_130);
|
||||
if (x_131 == 0)
|
||||
x_129 = l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Command_mkDefViewOfInstance___spec__4___rarg(x_92);
|
||||
x_130 = !lean_is_exclusive(x_129);
|
||||
if (x_130 == 0)
|
||||
{
|
||||
return x_130;
|
||||
return x_129;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_132; lean_object* x_133; lean_object* x_134;
|
||||
x_132 = lean_ctor_get(x_130, 0);
|
||||
x_133 = lean_ctor_get(x_130, 1);
|
||||
lean_inc(x_133);
|
||||
lean_object* x_131; lean_object* x_132; lean_object* x_133;
|
||||
x_131 = lean_ctor_get(x_129, 0);
|
||||
x_132 = lean_ctor_get(x_129, 1);
|
||||
lean_inc(x_132);
|
||||
lean_dec(x_130);
|
||||
x_134 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_134, 0, x_132);
|
||||
lean_ctor_set(x_134, 1, x_133);
|
||||
return x_134;
|
||||
lean_inc(x_131);
|
||||
lean_dec(x_129);
|
||||
x_133 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_133, 0, x_131);
|
||||
lean_ctor_set(x_133, 1, x_132);
|
||||
return x_133;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
@ -5390,28 +5388,28 @@ return x_62;
|
|||
}
|
||||
else
|
||||
{
|
||||
uint8_t x_135;
|
||||
uint8_t x_134;
|
||||
lean_dec(x_4);
|
||||
lean_dec(x_3);
|
||||
lean_dec(x_2);
|
||||
lean_dec(x_1);
|
||||
x_135 = !lean_is_exclusive(x_8);
|
||||
if (x_135 == 0)
|
||||
x_134 = !lean_is_exclusive(x_8);
|
||||
if (x_134 == 0)
|
||||
{
|
||||
return x_8;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_136; lean_object* x_137; lean_object* x_138;
|
||||
x_136 = lean_ctor_get(x_8, 0);
|
||||
x_137 = lean_ctor_get(x_8, 1);
|
||||
lean_inc(x_137);
|
||||
lean_object* x_135; lean_object* x_136; lean_object* x_137;
|
||||
x_135 = lean_ctor_get(x_8, 0);
|
||||
x_136 = lean_ctor_get(x_8, 1);
|
||||
lean_inc(x_136);
|
||||
lean_inc(x_135);
|
||||
lean_dec(x_8);
|
||||
x_138 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_138, 0, x_136);
|
||||
lean_ctor_set(x_138, 1, x_137);
|
||||
return x_138;
|
||||
x_137 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_137, 0, x_135);
|
||||
lean_ctor_set(x_137, 1, x_136);
|
||||
return x_137;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
|
|||
14948
stage0/stdlib/Lean/Elab/Do.c
generated
14948
stage0/stdlib/Lean/Elab/Do.c
generated
File diff suppressed because one or more lines are too long
580
stage0/stdlib/Lean/Elab/LetRec.c
generated
580
stage0/stdlib/Lean/Elab/LetRec.c
generated
|
|
@ -1385,7 +1385,7 @@ x_11 = l_Lean_Elab_toAttributeKind___at___private_Lean_Elab_LetRec_0__Lean_Elab_
|
|||
lean_dec(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_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; 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_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63;
|
||||
lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; 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; 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_object* x_60; lean_object* x_61; lean_object* x_62;
|
||||
x_12 = lean_ctor_get(x_11, 0);
|
||||
lean_inc(x_12);
|
||||
x_13 = lean_ctor_get(x_11, 1);
|
||||
|
|
@ -1404,183 +1404,182 @@ lean_inc(x_41);
|
|||
lean_dec(x_39);
|
||||
x_42 = lean_ctor_get(x_6, 4);
|
||||
lean_inc(x_42);
|
||||
x_43 = lean_ctor_get(x_6, 3);
|
||||
lean_inc(x_43);
|
||||
x_44 = l_Lean_Elab_Term_getCurrMacroScope(x_2, x_3, x_4, x_5, x_6, x_7, x_40);
|
||||
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 = lean_ctor_get(x_6, 1);
|
||||
lean_inc(x_47);
|
||||
x_48 = lean_ctor_get(x_6, 2);
|
||||
lean_inc(x_41);
|
||||
x_43 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_43, 0, x_41);
|
||||
x_44 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_44, 0, x_42);
|
||||
lean_inc(x_41);
|
||||
x_45 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_45, 0, x_41);
|
||||
x_46 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_46, 0, x_43);
|
||||
lean_ctor_set(x_46, 1, x_44);
|
||||
lean_ctor_set(x_46, 2, x_45);
|
||||
x_47 = x_46;
|
||||
x_48 = lean_ctor_get(x_6, 3);
|
||||
lean_inc(x_48);
|
||||
x_49 = lean_st_ref_get(x_7, x_46);
|
||||
x_49 = l_Lean_Elab_Term_getCurrMacroScope(x_2, x_3, x_4, x_5, x_6, x_7, x_40);
|
||||
x_50 = lean_ctor_get(x_49, 0);
|
||||
lean_inc(x_50);
|
||||
x_51 = lean_ctor_get(x_49, 1);
|
||||
lean_inc(x_51);
|
||||
lean_dec(x_49);
|
||||
x_52 = lean_ctor_get(x_50, 1);
|
||||
x_52 = lean_ctor_get(x_6, 1);
|
||||
lean_inc(x_52);
|
||||
lean_dec(x_50);
|
||||
lean_inc(x_41);
|
||||
x_53 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_53, 0, x_41);
|
||||
x_53 = lean_ctor_get(x_6, 2);
|
||||
lean_inc(x_53);
|
||||
x_54 = x_53;
|
||||
lean_inc(x_41);
|
||||
x_55 = lean_environment_main_module(x_41);
|
||||
x_56 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_56, 0, x_42);
|
||||
x_57 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_57, 0, x_41);
|
||||
x_58 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_58, 0, x_53);
|
||||
lean_ctor_set(x_58, 1, x_56);
|
||||
lean_ctor_set(x_58, 2, x_57);
|
||||
x_59 = x_58;
|
||||
x_60 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_60, 0, x_54);
|
||||
lean_ctor_set(x_60, 1, x_55);
|
||||
lean_ctor_set(x_60, 2, x_45);
|
||||
lean_ctor_set(x_60, 3, x_47);
|
||||
lean_ctor_set(x_60, 4, x_48);
|
||||
lean_ctor_set(x_60, 5, x_43);
|
||||
lean_ctor_set(x_60, 6, x_59);
|
||||
x_61 = lean_box(0);
|
||||
x_62 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_62, 0, x_52);
|
||||
lean_ctor_set(x_62, 1, x_61);
|
||||
x_63 = l_Lean_expandMacros(x_37, x_60, x_62);
|
||||
if (lean_obj_tag(x_63) == 0)
|
||||
x_54 = lean_st_ref_get(x_7, x_51);
|
||||
x_55 = lean_ctor_get(x_54, 0);
|
||||
lean_inc(x_55);
|
||||
x_56 = lean_ctor_get(x_54, 1);
|
||||
lean_inc(x_56);
|
||||
lean_dec(x_54);
|
||||
x_57 = lean_ctor_get(x_55, 1);
|
||||
lean_inc(x_57);
|
||||
lean_dec(x_55);
|
||||
x_58 = lean_environment_main_module(x_41);
|
||||
lean_inc(x_47);
|
||||
x_59 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_59, 0, x_47);
|
||||
lean_ctor_set(x_59, 1, x_58);
|
||||
lean_ctor_set(x_59, 2, x_50);
|
||||
lean_ctor_set(x_59, 3, x_52);
|
||||
lean_ctor_set(x_59, 4, x_53);
|
||||
lean_ctor_set(x_59, 5, x_48);
|
||||
lean_ctor_set(x_59, 6, x_47);
|
||||
x_60 = lean_box(0);
|
||||
x_61 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_61, 0, x_57);
|
||||
lean_ctor_set(x_61, 1, x_60);
|
||||
x_62 = l_Lean_expandMacros(x_37, x_59, x_61);
|
||||
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; uint8_t x_70;
|
||||
x_64 = lean_ctor_get(x_63, 0);
|
||||
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;
|
||||
x_63 = lean_ctor_get(x_62, 0);
|
||||
lean_inc(x_63);
|
||||
x_64 = lean_ctor_get(x_62, 1);
|
||||
lean_inc(x_64);
|
||||
x_65 = lean_ctor_get(x_63, 1);
|
||||
lean_dec(x_62);
|
||||
x_65 = lean_ctor_get(x_64, 0);
|
||||
lean_inc(x_65);
|
||||
lean_dec(x_63);
|
||||
x_66 = lean_ctor_get(x_65, 0);
|
||||
lean_inc(x_66);
|
||||
lean_dec(x_65);
|
||||
x_67 = lean_st_ref_take(x_7, x_51);
|
||||
x_68 = lean_ctor_get(x_67, 0);
|
||||
lean_dec(x_64);
|
||||
x_66 = lean_st_ref_take(x_7, x_56);
|
||||
x_67 = lean_ctor_get(x_66, 0);
|
||||
lean_inc(x_67);
|
||||
x_68 = lean_ctor_get(x_66, 1);
|
||||
lean_inc(x_68);
|
||||
x_69 = lean_ctor_get(x_67, 1);
|
||||
lean_inc(x_69);
|
||||
lean_dec(x_67);
|
||||
x_70 = !lean_is_exclusive(x_68);
|
||||
if (x_70 == 0)
|
||||
lean_dec(x_66);
|
||||
x_69 = !lean_is_exclusive(x_67);
|
||||
if (x_69 == 0)
|
||||
{
|
||||
lean_object* x_71; lean_object* x_72; lean_object* x_73;
|
||||
x_71 = lean_ctor_get(x_68, 1);
|
||||
lean_object* x_70; lean_object* x_71; lean_object* x_72;
|
||||
x_70 = lean_ctor_get(x_67, 1);
|
||||
lean_dec(x_70);
|
||||
lean_ctor_set(x_67, 1, x_65);
|
||||
x_71 = lean_st_ref_set(x_7, x_67, x_68);
|
||||
x_72 = lean_ctor_get(x_71, 1);
|
||||
lean_inc(x_72);
|
||||
lean_dec(x_71);
|
||||
lean_ctor_set(x_68, 1, x_66);
|
||||
x_72 = lean_st_ref_set(x_7, x_68, x_69);
|
||||
x_73 = lean_ctor_get(x_72, 1);
|
||||
lean_inc(x_73);
|
||||
lean_dec(x_72);
|
||||
x_14 = x_64;
|
||||
x_15 = x_73;
|
||||
x_14 = x_63;
|
||||
x_15 = x_72;
|
||||
goto block_35;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79;
|
||||
x_74 = lean_ctor_get(x_68, 0);
|
||||
x_75 = lean_ctor_get(x_68, 2);
|
||||
x_76 = lean_ctor_get(x_68, 3);
|
||||
lean_inc(x_76);
|
||||
lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78;
|
||||
x_73 = lean_ctor_get(x_67, 0);
|
||||
x_74 = lean_ctor_get(x_67, 2);
|
||||
x_75 = lean_ctor_get(x_67, 3);
|
||||
lean_inc(x_75);
|
||||
lean_inc(x_74);
|
||||
lean_dec(x_68);
|
||||
x_77 = lean_alloc_ctor(0, 4, 0);
|
||||
lean_ctor_set(x_77, 0, x_74);
|
||||
lean_ctor_set(x_77, 1, x_66);
|
||||
lean_ctor_set(x_77, 2, x_75);
|
||||
lean_ctor_set(x_77, 3, x_76);
|
||||
x_78 = lean_st_ref_set(x_7, x_77, x_69);
|
||||
x_79 = lean_ctor_get(x_78, 1);
|
||||
lean_inc(x_79);
|
||||
lean_dec(x_78);
|
||||
x_14 = x_64;
|
||||
x_15 = x_79;
|
||||
lean_inc(x_73);
|
||||
lean_dec(x_67);
|
||||
x_76 = lean_alloc_ctor(0, 4, 0);
|
||||
lean_ctor_set(x_76, 0, x_73);
|
||||
lean_ctor_set(x_76, 1, x_65);
|
||||
lean_ctor_set(x_76, 2, x_74);
|
||||
lean_ctor_set(x_76, 3, x_75);
|
||||
x_77 = lean_st_ref_set(x_7, x_76, x_68);
|
||||
x_78 = lean_ctor_get(x_77, 1);
|
||||
lean_inc(x_78);
|
||||
lean_dec(x_77);
|
||||
x_14 = x_63;
|
||||
x_15 = x_78;
|
||||
goto block_35;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_80;
|
||||
lean_object* x_79;
|
||||
lean_dec(x_12);
|
||||
x_80 = lean_ctor_get(x_63, 0);
|
||||
lean_inc(x_80);
|
||||
lean_dec(x_63);
|
||||
if (lean_obj_tag(x_80) == 0)
|
||||
x_79 = lean_ctor_get(x_62, 0);
|
||||
lean_inc(x_79);
|
||||
lean_dec(x_62);
|
||||
if (lean_obj_tag(x_79) == 0)
|
||||
{
|
||||
lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; uint8_t x_86;
|
||||
x_81 = lean_ctor_get(x_80, 0);
|
||||
lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; uint8_t x_85;
|
||||
x_80 = lean_ctor_get(x_79, 0);
|
||||
lean_inc(x_80);
|
||||
x_81 = lean_ctor_get(x_79, 1);
|
||||
lean_inc(x_81);
|
||||
x_82 = lean_ctor_get(x_80, 1);
|
||||
lean_inc(x_82);
|
||||
lean_dec(x_80);
|
||||
x_83 = lean_alloc_ctor(2, 1, 0);
|
||||
lean_dec(x_79);
|
||||
x_82 = lean_alloc_ctor(2, 1, 0);
|
||||
lean_ctor_set(x_82, 0, x_81);
|
||||
x_83 = lean_alloc_ctor(0, 1, 0);
|
||||
lean_ctor_set(x_83, 0, x_82);
|
||||
x_84 = lean_alloc_ctor(0, 1, 0);
|
||||
lean_ctor_set(x_84, 0, x_83);
|
||||
x_85 = l_Lean_throwErrorAt___at___private_Lean_Elab_Term_0__Lean_Elab_Term_elabTermAux___spec__3(x_81, x_84, x_2, x_3, x_4, x_5, x_6, x_7, x_51);
|
||||
x_84 = l_Lean_throwErrorAt___at___private_Lean_Elab_Term_0__Lean_Elab_Term_elabTermAux___spec__3(x_80, x_83, x_2, x_3, x_4, x_5, x_6, x_7, x_56);
|
||||
lean_dec(x_7);
|
||||
lean_dec(x_5);
|
||||
lean_dec(x_4);
|
||||
lean_dec(x_3);
|
||||
lean_dec(x_81);
|
||||
x_86 = !lean_is_exclusive(x_85);
|
||||
if (x_86 == 0)
|
||||
lean_dec(x_80);
|
||||
x_85 = !lean_is_exclusive(x_84);
|
||||
if (x_85 == 0)
|
||||
{
|
||||
return x_85;
|
||||
return x_84;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_87; lean_object* x_88; lean_object* x_89;
|
||||
x_87 = lean_ctor_get(x_85, 0);
|
||||
x_88 = lean_ctor_get(x_85, 1);
|
||||
lean_inc(x_88);
|
||||
lean_object* x_86; lean_object* x_87; lean_object* x_88;
|
||||
x_86 = lean_ctor_get(x_84, 0);
|
||||
x_87 = lean_ctor_get(x_84, 1);
|
||||
lean_inc(x_87);
|
||||
lean_dec(x_85);
|
||||
x_89 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_89, 0, x_87);
|
||||
lean_ctor_set(x_89, 1, x_88);
|
||||
return x_89;
|
||||
lean_inc(x_86);
|
||||
lean_dec(x_84);
|
||||
x_88 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_88, 0, x_86);
|
||||
lean_ctor_set(x_88, 1, x_87);
|
||||
return x_88;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_90; uint8_t x_91;
|
||||
lean_object* x_89; uint8_t x_90;
|
||||
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_90 = l_Lean_Elab_throwUnsupportedSyntax___at___private_Lean_Elab_Term_0__Lean_Elab_Term_elabTermAux___spec__5___rarg(x_51);
|
||||
x_91 = !lean_is_exclusive(x_90);
|
||||
if (x_91 == 0)
|
||||
x_89 = l_Lean_Elab_throwUnsupportedSyntax___at___private_Lean_Elab_Term_0__Lean_Elab_Term_elabTermAux___spec__5___rarg(x_56);
|
||||
x_90 = !lean_is_exclusive(x_89);
|
||||
if (x_90 == 0)
|
||||
{
|
||||
return x_90;
|
||||
return x_89;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_92; lean_object* x_93; lean_object* x_94;
|
||||
x_92 = lean_ctor_get(x_90, 0);
|
||||
x_93 = lean_ctor_get(x_90, 1);
|
||||
lean_inc(x_93);
|
||||
lean_object* x_91; lean_object* x_92; lean_object* x_93;
|
||||
x_91 = lean_ctor_get(x_89, 0);
|
||||
x_92 = lean_ctor_get(x_89, 1);
|
||||
lean_inc(x_92);
|
||||
lean_dec(x_90);
|
||||
x_94 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_94, 0, x_92);
|
||||
lean_ctor_set(x_94, 1, x_93);
|
||||
return x_94;
|
||||
lean_inc(x_91);
|
||||
lean_dec(x_89);
|
||||
x_93 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_93, 0, x_91);
|
||||
lean_ctor_set(x_93, 1, x_92);
|
||||
return x_93;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
@ -1665,30 +1664,30 @@ return x_34;
|
|||
}
|
||||
else
|
||||
{
|
||||
uint8_t x_95;
|
||||
uint8_t x_94;
|
||||
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_95 = !lean_is_exclusive(x_11);
|
||||
if (x_95 == 0)
|
||||
x_94 = !lean_is_exclusive(x_11);
|
||||
if (x_94 == 0)
|
||||
{
|
||||
return x_11;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_96; lean_object* x_97; lean_object* x_98;
|
||||
x_96 = lean_ctor_get(x_11, 0);
|
||||
x_97 = lean_ctor_get(x_11, 1);
|
||||
lean_inc(x_97);
|
||||
lean_object* x_95; lean_object* x_96; lean_object* x_97;
|
||||
x_95 = lean_ctor_get(x_11, 0);
|
||||
x_96 = lean_ctor_get(x_11, 1);
|
||||
lean_inc(x_96);
|
||||
lean_inc(x_95);
|
||||
lean_dec(x_11);
|
||||
x_98 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_98, 0, x_96);
|
||||
lean_ctor_set(x_98, 1, x_97);
|
||||
return x_98;
|
||||
x_97 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_97, 0, x_95);
|
||||
lean_ctor_set(x_97, 1, x_96);
|
||||
return x_97;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
@ -2050,13 +2049,13 @@ lean_inc(x_14);
|
|||
x_18 = l_Lean_Syntax_isOfKind(x_14, x_17);
|
||||
if (x_18 == 0)
|
||||
{
|
||||
lean_object* x_121; uint8_t x_122;
|
||||
x_121 = l_Lean_Parser_Term_letEqnsDecl___closed__2;
|
||||
lean_object* x_120; uint8_t x_121;
|
||||
x_120 = l_Lean_Parser_Term_letEqnsDecl___closed__2;
|
||||
lean_inc(x_14);
|
||||
x_122 = l_Lean_Syntax_isOfKind(x_14, x_121);
|
||||
if (x_122 == 0)
|
||||
x_121 = l_Lean_Syntax_isOfKind(x_14, x_120);
|
||||
if (x_121 == 0)
|
||||
{
|
||||
lean_object* x_123;
|
||||
lean_object* x_122;
|
||||
lean_dec(x_14);
|
||||
lean_dec(x_9);
|
||||
lean_dec(x_8);
|
||||
|
|
@ -2066,25 +2065,25 @@ lean_dec(x_5);
|
|||
lean_dec(x_4);
|
||||
lean_dec(x_3);
|
||||
lean_dec(x_2);
|
||||
x_123 = l_Lean_Elab_throwUnsupportedSyntax___at___private_Lean_Elab_LetRec_0__Lean_Elab_Term_mkLetRecDeclView___spec__10___rarg(x_10);
|
||||
return x_123;
|
||||
x_122 = l_Lean_Elab_throwUnsupportedSyntax___at___private_Lean_Elab_LetRec_0__Lean_Elab_Term_mkLetRecDeclView___spec__10___rarg(x_10);
|
||||
return x_122;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_123;
|
||||
x_123 = lean_box(0);
|
||||
x_19 = x_123;
|
||||
goto block_119;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_124;
|
||||
x_124 = lean_box(0);
|
||||
x_19 = x_124;
|
||||
goto block_120;
|
||||
goto block_119;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_125;
|
||||
x_125 = lean_box(0);
|
||||
x_19 = x_125;
|
||||
goto block_120;
|
||||
}
|
||||
block_120:
|
||||
block_119:
|
||||
{
|
||||
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_dec(x_19);
|
||||
|
|
@ -2098,21 +2097,21 @@ lean_inc(x_24);
|
|||
lean_dec(x_22);
|
||||
if (lean_obj_tag(x_23) == 0)
|
||||
{
|
||||
lean_object* x_118;
|
||||
x_118 = lean_box(0);
|
||||
x_25 = x_118;
|
||||
goto block_117;
|
||||
lean_object* x_117;
|
||||
x_117 = lean_box(0);
|
||||
x_25 = x_117;
|
||||
goto block_116;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_119;
|
||||
x_119 = lean_ctor_get(x_23, 0);
|
||||
lean_inc(x_119);
|
||||
lean_object* x_118;
|
||||
x_118 = lean_ctor_get(x_23, 0);
|
||||
lean_inc(x_118);
|
||||
lean_dec(x_23);
|
||||
x_25 = x_119;
|
||||
goto block_117;
|
||||
x_25 = x_118;
|
||||
goto block_116;
|
||||
}
|
||||
block_117:
|
||||
block_116:
|
||||
{
|
||||
lean_object* x_26; lean_object* x_27;
|
||||
lean_inc(x_21);
|
||||
|
|
@ -2188,7 +2187,7 @@ lean_inc(x_6);
|
|||
x_50 = l___private_Lean_Meta_Basic_0__Lean_Meta_mkFreshExprMVarImpl(x_47, x_48, x_49, x_6, x_7, x_8, x_9, x_44);
|
||||
if (x_18 == 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; 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; 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; lean_object* x_77; lean_object* x_78; lean_object* x_79; uint8_t 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; uint8_t x_88;
|
||||
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_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; lean_object* x_77; lean_object* x_78; uint8_t 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; uint8_t x_87;
|
||||
x_51 = lean_ctor_get(x_50, 0);
|
||||
lean_inc(x_51);
|
||||
x_52 = lean_ctor_get(x_50, 1);
|
||||
|
|
@ -2207,143 +2206,142 @@ lean_inc(x_58);
|
|||
lean_dec(x_56);
|
||||
x_59 = lean_ctor_get(x_8, 4);
|
||||
lean_inc(x_59);
|
||||
x_60 = lean_ctor_get(x_8, 3);
|
||||
lean_inc(x_60);
|
||||
x_61 = l_Lean_Elab_Term_getCurrMacroScope(x_4, x_5, x_6, x_7, x_8, x_9, x_57);
|
||||
x_62 = lean_ctor_get(x_61, 0);
|
||||
lean_inc(x_62);
|
||||
x_63 = lean_ctor_get(x_61, 1);
|
||||
lean_inc(x_63);
|
||||
lean_dec(x_61);
|
||||
x_64 = lean_ctor_get(x_8, 1);
|
||||
lean_inc(x_64);
|
||||
x_65 = lean_ctor_get(x_8, 2);
|
||||
lean_inc(x_58);
|
||||
x_60 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_60, 0, x_58);
|
||||
x_61 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_61, 0, x_59);
|
||||
lean_inc(x_58);
|
||||
x_62 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_62, 0, x_58);
|
||||
x_63 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_63, 0, x_60);
|
||||
lean_ctor_set(x_63, 1, x_61);
|
||||
lean_ctor_set(x_63, 2, x_62);
|
||||
x_64 = x_63;
|
||||
x_65 = lean_ctor_get(x_8, 3);
|
||||
lean_inc(x_65);
|
||||
x_66 = lean_st_ref_get(x_9, x_63);
|
||||
x_66 = l_Lean_Elab_Term_getCurrMacroScope(x_4, x_5, x_6, x_7, x_8, x_9, x_57);
|
||||
x_67 = lean_ctor_get(x_66, 0);
|
||||
lean_inc(x_67);
|
||||
x_68 = lean_ctor_get(x_66, 1);
|
||||
lean_inc(x_68);
|
||||
lean_dec(x_66);
|
||||
x_69 = lean_ctor_get(x_67, 1);
|
||||
x_69 = lean_ctor_get(x_8, 1);
|
||||
lean_inc(x_69);
|
||||
lean_dec(x_67);
|
||||
lean_inc(x_58);
|
||||
x_70 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_70, 0, x_58);
|
||||
x_70 = lean_ctor_get(x_8, 2);
|
||||
lean_inc(x_70);
|
||||
x_71 = x_70;
|
||||
lean_inc(x_58);
|
||||
x_72 = lean_environment_main_module(x_58);
|
||||
x_73 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_73, 0, x_59);
|
||||
x_74 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_74, 0, x_58);
|
||||
x_75 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_75, 0, x_70);
|
||||
lean_ctor_set(x_75, 1, x_73);
|
||||
lean_ctor_set(x_75, 2, x_74);
|
||||
x_76 = x_75;
|
||||
x_77 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_77, 0, x_71);
|
||||
lean_ctor_set(x_77, 1, x_72);
|
||||
lean_ctor_set(x_77, 2, x_62);
|
||||
lean_ctor_set(x_77, 3, x_64);
|
||||
lean_ctor_set(x_77, 4, x_65);
|
||||
lean_ctor_set(x_77, 5, x_60);
|
||||
lean_ctor_set(x_77, 6, x_76);
|
||||
x_78 = lean_box(0);
|
||||
x_79 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_79, 0, x_69);
|
||||
lean_ctor_set(x_79, 1, x_78);
|
||||
x_80 = 0;
|
||||
x_81 = l_Lean_Elab_Term_expandMatchAltsIntoMatch(x_14, x_54, x_80, x_77, x_79);
|
||||
x_82 = lean_ctor_get(x_81, 0);
|
||||
x_71 = lean_st_ref_get(x_9, x_68);
|
||||
x_72 = lean_ctor_get(x_71, 0);
|
||||
lean_inc(x_72);
|
||||
x_73 = lean_ctor_get(x_71, 1);
|
||||
lean_inc(x_73);
|
||||
lean_dec(x_71);
|
||||
x_74 = lean_ctor_get(x_72, 1);
|
||||
lean_inc(x_74);
|
||||
lean_dec(x_72);
|
||||
x_75 = lean_environment_main_module(x_58);
|
||||
lean_inc(x_64);
|
||||
x_76 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_76, 0, x_64);
|
||||
lean_ctor_set(x_76, 1, x_75);
|
||||
lean_ctor_set(x_76, 2, x_67);
|
||||
lean_ctor_set(x_76, 3, x_69);
|
||||
lean_ctor_set(x_76, 4, x_70);
|
||||
lean_ctor_set(x_76, 5, x_65);
|
||||
lean_ctor_set(x_76, 6, x_64);
|
||||
x_77 = lean_box(0);
|
||||
x_78 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_78, 0, x_74);
|
||||
lean_ctor_set(x_78, 1, x_77);
|
||||
x_79 = 0;
|
||||
x_80 = l_Lean_Elab_Term_expandMatchAltsIntoMatch(x_14, x_54, x_79, x_76, x_78);
|
||||
x_81 = lean_ctor_get(x_80, 0);
|
||||
lean_inc(x_81);
|
||||
x_82 = lean_ctor_get(x_80, 1);
|
||||
lean_inc(x_82);
|
||||
x_83 = lean_ctor_get(x_81, 1);
|
||||
lean_dec(x_80);
|
||||
x_83 = lean_ctor_get(x_82, 0);
|
||||
lean_inc(x_83);
|
||||
lean_dec(x_81);
|
||||
x_84 = lean_ctor_get(x_83, 0);
|
||||
lean_inc(x_84);
|
||||
lean_dec(x_83);
|
||||
x_85 = lean_st_ref_take(x_9, x_68);
|
||||
x_86 = lean_ctor_get(x_85, 0);
|
||||
lean_dec(x_82);
|
||||
x_84 = lean_st_ref_take(x_9, x_73);
|
||||
x_85 = lean_ctor_get(x_84, 0);
|
||||
lean_inc(x_85);
|
||||
x_86 = lean_ctor_get(x_84, 1);
|
||||
lean_inc(x_86);
|
||||
x_87 = lean_ctor_get(x_85, 1);
|
||||
lean_inc(x_87);
|
||||
lean_dec(x_85);
|
||||
x_88 = !lean_is_exclusive(x_86);
|
||||
if (x_88 == 0)
|
||||
lean_dec(x_84);
|
||||
x_87 = !lean_is_exclusive(x_85);
|
||||
if (x_87 == 0)
|
||||
{
|
||||
lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92;
|
||||
x_89 = lean_ctor_get(x_86, 1);
|
||||
lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91;
|
||||
x_88 = lean_ctor_get(x_85, 1);
|
||||
lean_dec(x_88);
|
||||
lean_ctor_set(x_85, 1, x_83);
|
||||
x_89 = lean_st_ref_set(x_9, x_85, x_86);
|
||||
x_90 = lean_ctor_get(x_89, 1);
|
||||
lean_inc(x_90);
|
||||
lean_dec(x_89);
|
||||
lean_ctor_set(x_86, 1, x_84);
|
||||
x_90 = lean_st_ref_set(x_9, x_86, x_87);
|
||||
x_91 = lean_ctor_get(x_90, 1);
|
||||
lean_inc(x_91);
|
||||
lean_dec(x_90);
|
||||
x_92 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_LetRec_0__Lean_Elab_Term_mkLetRecDeclView___spec__19___lambda__2(x_14, x_3, x_21, x_26, x_46, x_45, x_51, x_82, x_4, x_5, x_6, x_7, x_8, x_9, x_91);
|
||||
x_91 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_LetRec_0__Lean_Elab_Term_mkLetRecDeclView___spec__19___lambda__2(x_14, x_3, x_21, x_26, x_46, x_45, x_51, x_81, x_4, x_5, x_6, x_7, x_8, x_9, x_90);
|
||||
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_92;
|
||||
return x_91;
|
||||
}
|
||||
else
|
||||
{
|
||||
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;
|
||||
x_93 = lean_ctor_get(x_86, 0);
|
||||
x_94 = lean_ctor_get(x_86, 2);
|
||||
x_95 = lean_ctor_get(x_86, 3);
|
||||
lean_inc(x_95);
|
||||
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;
|
||||
x_92 = lean_ctor_get(x_85, 0);
|
||||
x_93 = lean_ctor_get(x_85, 2);
|
||||
x_94 = lean_ctor_get(x_85, 3);
|
||||
lean_inc(x_94);
|
||||
lean_inc(x_93);
|
||||
lean_dec(x_86);
|
||||
x_96 = lean_alloc_ctor(0, 4, 0);
|
||||
lean_ctor_set(x_96, 0, x_93);
|
||||
lean_ctor_set(x_96, 1, x_84);
|
||||
lean_ctor_set(x_96, 2, x_94);
|
||||
lean_ctor_set(x_96, 3, x_95);
|
||||
x_97 = lean_st_ref_set(x_9, x_96, x_87);
|
||||
x_98 = lean_ctor_get(x_97, 1);
|
||||
lean_inc(x_98);
|
||||
lean_dec(x_97);
|
||||
x_99 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_LetRec_0__Lean_Elab_Term_mkLetRecDeclView___spec__19___lambda__2(x_14, x_3, x_21, x_26, x_46, x_45, x_51, x_82, x_4, x_5, x_6, x_7, x_8, x_9, x_98);
|
||||
lean_inc(x_92);
|
||||
lean_dec(x_85);
|
||||
x_95 = lean_alloc_ctor(0, 4, 0);
|
||||
lean_ctor_set(x_95, 0, x_92);
|
||||
lean_ctor_set(x_95, 1, x_83);
|
||||
lean_ctor_set(x_95, 2, x_93);
|
||||
lean_ctor_set(x_95, 3, x_94);
|
||||
x_96 = lean_st_ref_set(x_9, x_95, x_86);
|
||||
x_97 = lean_ctor_get(x_96, 1);
|
||||
lean_inc(x_97);
|
||||
lean_dec(x_96);
|
||||
x_98 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_LetRec_0__Lean_Elab_Term_mkLetRecDeclView___spec__19___lambda__2(x_14, x_3, x_21, x_26, x_46, x_45, x_51, x_81, x_4, x_5, x_6, x_7, x_8, x_9, x_97);
|
||||
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_99;
|
||||
return x_98;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104;
|
||||
x_100 = lean_ctor_get(x_50, 0);
|
||||
lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103;
|
||||
x_99 = lean_ctor_get(x_50, 0);
|
||||
lean_inc(x_99);
|
||||
x_100 = lean_ctor_get(x_50, 1);
|
||||
lean_inc(x_100);
|
||||
x_101 = lean_ctor_get(x_50, 1);
|
||||
lean_inc(x_101);
|
||||
lean_dec(x_50);
|
||||
x_102 = lean_unsigned_to_nat(4u);
|
||||
x_103 = l_Lean_Syntax_getArg(x_14, x_102);
|
||||
x_104 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_LetRec_0__Lean_Elab_Term_mkLetRecDeclView___spec__19___lambda__2(x_14, x_3, x_21, x_26, x_46, x_45, x_100, x_103, x_4, x_5, x_6, x_7, x_8, x_9, x_101);
|
||||
x_101 = lean_unsigned_to_nat(4u);
|
||||
x_102 = l_Lean_Syntax_getArg(x_14, x_101);
|
||||
x_103 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_LetRec_0__Lean_Elab_Term_mkLetRecDeclView___spec__19___lambda__2(x_14, x_3, x_21, x_26, x_46, x_45, x_99, x_102, x_4, x_5, x_6, x_7, x_8, x_9, x_100);
|
||||
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_104;
|
||||
return x_103;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
uint8_t x_105;
|
||||
uint8_t x_104;
|
||||
lean_dec(x_26);
|
||||
lean_dec(x_21);
|
||||
lean_dec(x_14);
|
||||
|
|
@ -2354,29 +2352,29 @@ lean_dec(x_6);
|
|||
lean_dec(x_5);
|
||||
lean_dec(x_4);
|
||||
lean_dec(x_3);
|
||||
x_105 = !lean_is_exclusive(x_42);
|
||||
if (x_105 == 0)
|
||||
x_104 = !lean_is_exclusive(x_42);
|
||||
if (x_104 == 0)
|
||||
{
|
||||
return x_42;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_106; lean_object* x_107; lean_object* x_108;
|
||||
x_106 = lean_ctor_get(x_42, 0);
|
||||
x_107 = lean_ctor_get(x_42, 1);
|
||||
lean_inc(x_107);
|
||||
lean_object* x_105; lean_object* x_106; lean_object* x_107;
|
||||
x_105 = lean_ctor_get(x_42, 0);
|
||||
x_106 = lean_ctor_get(x_42, 1);
|
||||
lean_inc(x_106);
|
||||
lean_inc(x_105);
|
||||
lean_dec(x_42);
|
||||
x_108 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_108, 0, x_106);
|
||||
lean_ctor_set(x_108, 1, x_107);
|
||||
return x_108;
|
||||
x_107 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_107, 0, x_105);
|
||||
lean_ctor_set(x_107, 1, x_106);
|
||||
return x_107;
|
||||
}
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
uint8_t x_109;
|
||||
uint8_t x_108;
|
||||
lean_dec(x_26);
|
||||
lean_dec(x_21);
|
||||
lean_dec(x_20);
|
||||
|
|
@ -2389,29 +2387,29 @@ lean_dec(x_5);
|
|||
lean_dec(x_4);
|
||||
lean_dec(x_3);
|
||||
lean_dec(x_2);
|
||||
x_109 = !lean_is_exclusive(x_30);
|
||||
if (x_109 == 0)
|
||||
x_108 = !lean_is_exclusive(x_30);
|
||||
if (x_108 == 0)
|
||||
{
|
||||
return x_30;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_110; lean_object* x_111; lean_object* x_112;
|
||||
x_110 = lean_ctor_get(x_30, 0);
|
||||
x_111 = lean_ctor_get(x_30, 1);
|
||||
lean_inc(x_111);
|
||||
lean_object* x_109; lean_object* x_110; lean_object* x_111;
|
||||
x_109 = lean_ctor_get(x_30, 0);
|
||||
x_110 = lean_ctor_get(x_30, 1);
|
||||
lean_inc(x_110);
|
||||
lean_inc(x_109);
|
||||
lean_dec(x_30);
|
||||
x_112 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_112, 0, x_110);
|
||||
lean_ctor_set(x_112, 1, x_111);
|
||||
return x_112;
|
||||
x_111 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_111, 0, x_109);
|
||||
lean_ctor_set(x_111, 1, x_110);
|
||||
return x_111;
|
||||
}
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
uint8_t x_113;
|
||||
uint8_t x_112;
|
||||
lean_dec(x_26);
|
||||
lean_dec(x_21);
|
||||
lean_dec(x_20);
|
||||
|
|
@ -2424,23 +2422,23 @@ lean_dec(x_5);
|
|||
lean_dec(x_4);
|
||||
lean_dec(x_3);
|
||||
lean_dec(x_2);
|
||||
x_113 = !lean_is_exclusive(x_27);
|
||||
if (x_113 == 0)
|
||||
x_112 = !lean_is_exclusive(x_27);
|
||||
if (x_112 == 0)
|
||||
{
|
||||
return x_27;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_114; lean_object* x_115; lean_object* x_116;
|
||||
x_114 = lean_ctor_get(x_27, 0);
|
||||
x_115 = lean_ctor_get(x_27, 1);
|
||||
lean_inc(x_115);
|
||||
lean_object* x_113; lean_object* x_114; lean_object* x_115;
|
||||
x_113 = lean_ctor_get(x_27, 0);
|
||||
x_114 = lean_ctor_get(x_27, 1);
|
||||
lean_inc(x_114);
|
||||
lean_inc(x_113);
|
||||
lean_dec(x_27);
|
||||
x_116 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_116, 0, x_114);
|
||||
lean_ctor_set(x_116, 1, x_115);
|
||||
return x_116;
|
||||
x_115 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_115, 0, x_113);
|
||||
lean_ctor_set(x_115, 1, x_114);
|
||||
return x_115;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
@ -2448,17 +2446,17 @@ return x_116;
|
|||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_126; lean_object* x_127;
|
||||
lean_object* x_125; lean_object* x_126;
|
||||
lean_dec(x_3);
|
||||
lean_dec(x_2);
|
||||
x_126 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_LetRec_0__Lean_Elab_Term_mkLetRecDeclView___spec__19___lambda__3___closed__2;
|
||||
x_127 = l_Lean_throwErrorAt___at___private_Lean_Elab_LetRec_0__Lean_Elab_Term_mkLetRecDeclView___spec__11(x_14, x_126, x_4, x_5, x_6, x_7, x_8, x_9, x_10);
|
||||
x_125 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_LetRec_0__Lean_Elab_Term_mkLetRecDeclView___spec__19___lambda__3___closed__2;
|
||||
x_126 = l_Lean_throwErrorAt___at___private_Lean_Elab_LetRec_0__Lean_Elab_Term_mkLetRecDeclView___spec__11(x_14, x_125, x_4, x_5, x_6, x_7, x_8, x_9, x_10);
|
||||
lean_dec(x_9);
|
||||
lean_dec(x_7);
|
||||
lean_dec(x_6);
|
||||
lean_dec(x_5);
|
||||
lean_dec(x_14);
|
||||
return x_127;
|
||||
return x_126;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
|
|||
787
stage0/stdlib/Lean/Elab/Match.c
generated
787
stage0/stdlib/Lean/Elab/Match.c
generated
File diff suppressed because it is too large
Load diff
560
stage0/stdlib/Lean/Elab/MutualDef.c
generated
560
stage0/stdlib/Lean/Elab/MutualDef.c
generated
|
|
@ -6639,172 +6639,171 @@ return x_15;
|
|||
lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_MutualDef_0__Lean_Elab_Term_elabFunValues___spec__2___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_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_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_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_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30;
|
||||
x_10 = lean_ctor_get(x_7, 4);
|
||||
lean_inc(x_10);
|
||||
x_11 = lean_ctor_get(x_7, 3);
|
||||
lean_inc(x_11);
|
||||
x_12 = l_Lean_Elab_Term_getCurrMacroScope(x_3, x_4, x_5, x_6, x_7, x_8, x_9);
|
||||
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_ctor_get(x_7, 1);
|
||||
lean_inc(x_15);
|
||||
x_16 = lean_ctor_get(x_7, 2);
|
||||
lean_inc(x_2);
|
||||
x_11 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_11, 0, x_2);
|
||||
x_12 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_12, 0, x_10);
|
||||
lean_inc(x_2);
|
||||
x_13 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_13, 0, x_2);
|
||||
x_14 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_14, 0, x_11);
|
||||
lean_ctor_set(x_14, 1, x_12);
|
||||
lean_ctor_set(x_14, 2, x_13);
|
||||
x_15 = x_14;
|
||||
x_16 = lean_ctor_get(x_7, 3);
|
||||
lean_inc(x_16);
|
||||
x_17 = lean_st_ref_get(x_8, x_14);
|
||||
x_17 = l_Lean_Elab_Term_getCurrMacroScope(x_3, x_4, x_5, x_6, x_7, x_8, x_9);
|
||||
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_ctor_get(x_18, 1);
|
||||
x_20 = lean_ctor_get(x_7, 1);
|
||||
lean_inc(x_20);
|
||||
lean_dec(x_18);
|
||||
lean_inc(x_2);
|
||||
x_21 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_21, 0, x_2);
|
||||
x_21 = lean_ctor_get(x_7, 2);
|
||||
lean_inc(x_21);
|
||||
x_22 = x_21;
|
||||
lean_inc(x_2);
|
||||
x_23 = lean_environment_main_module(x_2);
|
||||
x_24 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_24, 0, x_10);
|
||||
x_25 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_25, 0, x_2);
|
||||
x_26 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_26, 0, x_21);
|
||||
lean_ctor_set(x_26, 1, x_24);
|
||||
lean_ctor_set(x_26, 2, x_25);
|
||||
x_27 = x_26;
|
||||
x_28 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_28, 0, x_22);
|
||||
lean_ctor_set(x_28, 1, x_23);
|
||||
lean_ctor_set(x_28, 2, x_13);
|
||||
lean_ctor_set(x_28, 3, x_15);
|
||||
lean_ctor_set(x_28, 4, x_16);
|
||||
lean_ctor_set(x_28, 5, x_11);
|
||||
lean_ctor_set(x_28, 6, x_27);
|
||||
x_29 = lean_box(0);
|
||||
x_30 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_30, 0, x_20);
|
||||
lean_ctor_set(x_30, 1, x_29);
|
||||
x_31 = l___private_Lean_Elab_MutualDef_0__Lean_Elab_Term_declValToTerm(x_1, x_28, x_30);
|
||||
if (lean_obj_tag(x_31) == 0)
|
||||
x_22 = lean_st_ref_get(x_8, x_19);
|
||||
x_23 = lean_ctor_get(x_22, 0);
|
||||
lean_inc(x_23);
|
||||
x_24 = lean_ctor_get(x_22, 1);
|
||||
lean_inc(x_24);
|
||||
lean_dec(x_22);
|
||||
x_25 = lean_ctor_get(x_23, 1);
|
||||
lean_inc(x_25);
|
||||
lean_dec(x_23);
|
||||
x_26 = lean_environment_main_module(x_2);
|
||||
lean_inc(x_15);
|
||||
x_27 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_27, 0, x_15);
|
||||
lean_ctor_set(x_27, 1, x_26);
|
||||
lean_ctor_set(x_27, 2, x_18);
|
||||
lean_ctor_set(x_27, 3, x_20);
|
||||
lean_ctor_set(x_27, 4, x_21);
|
||||
lean_ctor_set(x_27, 5, x_16);
|
||||
lean_ctor_set(x_27, 6, x_15);
|
||||
x_28 = lean_box(0);
|
||||
x_29 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_29, 0, x_25);
|
||||
lean_ctor_set(x_29, 1, x_28);
|
||||
x_30 = l___private_Lean_Elab_MutualDef_0__Lean_Elab_Term_declValToTerm(x_1, x_27, x_29);
|
||||
if (lean_obj_tag(x_30) == 0)
|
||||
{
|
||||
lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; uint8_t x_38;
|
||||
lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; uint8_t x_37;
|
||||
lean_dec(x_7);
|
||||
lean_dec(x_3);
|
||||
x_32 = lean_ctor_get(x_31, 0);
|
||||
x_31 = lean_ctor_get(x_30, 0);
|
||||
lean_inc(x_31);
|
||||
x_32 = lean_ctor_get(x_30, 1);
|
||||
lean_inc(x_32);
|
||||
x_33 = lean_ctor_get(x_31, 1);
|
||||
lean_dec(x_30);
|
||||
x_33 = lean_ctor_get(x_32, 0);
|
||||
lean_inc(x_33);
|
||||
lean_dec(x_31);
|
||||
x_34 = lean_ctor_get(x_33, 0);
|
||||
lean_inc(x_34);
|
||||
lean_dec(x_33);
|
||||
x_35 = lean_st_ref_take(x_8, x_19);
|
||||
x_36 = lean_ctor_get(x_35, 0);
|
||||
lean_dec(x_32);
|
||||
x_34 = lean_st_ref_take(x_8, x_24);
|
||||
x_35 = lean_ctor_get(x_34, 0);
|
||||
lean_inc(x_35);
|
||||
x_36 = lean_ctor_get(x_34, 1);
|
||||
lean_inc(x_36);
|
||||
x_37 = lean_ctor_get(x_35, 1);
|
||||
lean_inc(x_37);
|
||||
lean_dec(x_35);
|
||||
x_38 = !lean_is_exclusive(x_36);
|
||||
if (x_38 == 0)
|
||||
lean_dec(x_34);
|
||||
x_37 = !lean_is_exclusive(x_35);
|
||||
if (x_37 == 0)
|
||||
{
|
||||
lean_object* x_39; lean_object* x_40; uint8_t x_41;
|
||||
x_39 = lean_ctor_get(x_36, 1);
|
||||
lean_object* x_38; lean_object* x_39; uint8_t x_40;
|
||||
x_38 = lean_ctor_get(x_35, 1);
|
||||
lean_dec(x_38);
|
||||
lean_ctor_set(x_35, 1, x_33);
|
||||
x_39 = lean_st_ref_set(x_8, x_35, x_36);
|
||||
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(x_39, 0, x_31);
|
||||
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);
|
||||
lean_ctor_set(x_36, 1, x_34);
|
||||
x_40 = lean_st_ref_set(x_8, x_36, x_37);
|
||||
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(x_40, 0, x_32);
|
||||
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(0, 2, 0);
|
||||
lean_ctor_set(x_44, 0, x_32);
|
||||
lean_ctor_set(x_44, 1, x_43);
|
||||
return x_44;
|
||||
x_43 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_43, 0, x_31);
|
||||
lean_ctor_set(x_43, 1, x_42);
|
||||
return x_43;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
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;
|
||||
x_45 = lean_ctor_get(x_36, 0);
|
||||
x_46 = lean_ctor_get(x_36, 2);
|
||||
x_47 = lean_ctor_get(x_36, 3);
|
||||
lean_inc(x_47);
|
||||
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;
|
||||
x_44 = lean_ctor_get(x_35, 0);
|
||||
x_45 = lean_ctor_get(x_35, 2);
|
||||
x_46 = lean_ctor_get(x_35, 3);
|
||||
lean_inc(x_46);
|
||||
lean_inc(x_45);
|
||||
lean_dec(x_36);
|
||||
x_48 = lean_alloc_ctor(0, 4, 0);
|
||||
lean_ctor_set(x_48, 0, x_45);
|
||||
lean_ctor_set(x_48, 1, x_34);
|
||||
lean_ctor_set(x_48, 2, x_46);
|
||||
lean_ctor_set(x_48, 3, x_47);
|
||||
x_49 = lean_st_ref_set(x_8, x_48, x_37);
|
||||
x_50 = lean_ctor_get(x_49, 1);
|
||||
lean_inc(x_50);
|
||||
if (lean_is_exclusive(x_49)) {
|
||||
lean_ctor_release(x_49, 0);
|
||||
lean_ctor_release(x_49, 1);
|
||||
x_51 = x_49;
|
||||
lean_inc(x_44);
|
||||
lean_dec(x_35);
|
||||
x_47 = lean_alloc_ctor(0, 4, 0);
|
||||
lean_ctor_set(x_47, 0, x_44);
|
||||
lean_ctor_set(x_47, 1, x_33);
|
||||
lean_ctor_set(x_47, 2, x_45);
|
||||
lean_ctor_set(x_47, 3, x_46);
|
||||
x_48 = lean_st_ref_set(x_8, x_47, x_36);
|
||||
x_49 = lean_ctor_get(x_48, 1);
|
||||
lean_inc(x_49);
|
||||
if (lean_is_exclusive(x_48)) {
|
||||
lean_ctor_release(x_48, 0);
|
||||
lean_ctor_release(x_48, 1);
|
||||
x_50 = x_48;
|
||||
} else {
|
||||
lean_dec_ref(x_49);
|
||||
x_51 = lean_box(0);
|
||||
lean_dec_ref(x_48);
|
||||
x_50 = lean_box(0);
|
||||
}
|
||||
if (lean_is_scalar(x_51)) {
|
||||
x_52 = lean_alloc_ctor(0, 2, 0);
|
||||
if (lean_is_scalar(x_50)) {
|
||||
x_51 = lean_alloc_ctor(0, 2, 0);
|
||||
} else {
|
||||
x_52 = x_51;
|
||||
x_51 = x_50;
|
||||
}
|
||||
lean_ctor_set(x_52, 0, x_32);
|
||||
lean_ctor_set(x_52, 1, x_50);
|
||||
return x_52;
|
||||
lean_ctor_set(x_51, 0, x_31);
|
||||
lean_ctor_set(x_51, 1, x_49);
|
||||
return x_51;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_53;
|
||||
x_53 = lean_ctor_get(x_31, 0);
|
||||
lean_object* x_52;
|
||||
x_52 = lean_ctor_get(x_30, 0);
|
||||
lean_inc(x_52);
|
||||
lean_dec(x_30);
|
||||
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;
|
||||
x_53 = lean_ctor_get(x_52, 0);
|
||||
lean_inc(x_53);
|
||||
lean_dec(x_31);
|
||||
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;
|
||||
x_54 = lean_ctor_get(x_53, 0);
|
||||
x_54 = lean_ctor_get(x_52, 1);
|
||||
lean_inc(x_54);
|
||||
x_55 = lean_ctor_get(x_53, 1);
|
||||
lean_inc(x_55);
|
||||
lean_dec(x_53);
|
||||
x_56 = lean_alloc_ctor(2, 1, 0);
|
||||
lean_dec(x_52);
|
||||
x_55 = lean_alloc_ctor(2, 1, 0);
|
||||
lean_ctor_set(x_55, 0, x_54);
|
||||
x_56 = lean_alloc_ctor(0, 1, 0);
|
||||
lean_ctor_set(x_56, 0, x_55);
|
||||
x_57 = lean_alloc_ctor(0, 1, 0);
|
||||
lean_ctor_set(x_57, 0, x_56);
|
||||
x_58 = l_Lean_throwErrorAt___at___private_Lean_Elab_Term_0__Lean_Elab_Term_elabTermAux___spec__3(x_54, x_57, x_3, x_4, x_5, x_6, x_7, x_8, x_19);
|
||||
lean_dec(x_54);
|
||||
return x_58;
|
||||
x_57 = l_Lean_throwErrorAt___at___private_Lean_Elab_Term_0__Lean_Elab_Term_elabTermAux___spec__3(x_53, x_56, x_3, x_4, x_5, x_6, x_7, x_8, x_24);
|
||||
lean_dec(x_53);
|
||||
return x_57;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_59;
|
||||
lean_object* x_58;
|
||||
lean_dec(x_7);
|
||||
lean_dec(x_3);
|
||||
x_59 = l_Lean_Elab_throwUnsupportedSyntax___at___private_Lean_Elab_Term_0__Lean_Elab_Term_elabTermAux___spec__5___rarg(x_19);
|
||||
return x_59;
|
||||
x_58 = l_Lean_Elab_throwUnsupportedSyntax___at___private_Lean_Elab_Term_0__Lean_Elab_Term_elabTermAux___spec__5___rarg(x_24);
|
||||
return x_58;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
@ -19172,7 +19171,7 @@ x_7 = l_Lean_Elab_toAttributeKind___at_Lean_Elab_Command_mkDefViewOfInstance___s
|
|||
lean_dec(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_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; 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; 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; lean_object* x_67;
|
||||
lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; 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; 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; 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_8 = lean_ctor_get(x_7, 0);
|
||||
lean_inc(x_8);
|
||||
x_9 = lean_ctor_get(x_7, 1);
|
||||
|
|
@ -19198,199 +19197,198 @@ lean_dec(x_38);
|
|||
x_41 = lean_ctor_get(x_39, 2);
|
||||
lean_inc(x_41);
|
||||
lean_dec(x_39);
|
||||
x_42 = l_Lean_Elab_Command_getRef(x_2, x_3, x_40);
|
||||
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 = l_Lean_Elab_Command_getCurrMacroScope(x_2, x_3, x_44);
|
||||
x_46 = lean_ctor_get(x_45, 0);
|
||||
lean_inc(x_46);
|
||||
x_47 = lean_ctor_get(x_45, 1);
|
||||
lean_inc(x_47);
|
||||
lean_dec(x_45);
|
||||
x_48 = lean_ctor_get(x_2, 2);
|
||||
lean_inc(x_37);
|
||||
x_42 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_42, 0, x_37);
|
||||
x_43 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_43, 0, x_41);
|
||||
lean_inc(x_37);
|
||||
x_44 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_44, 0, x_37);
|
||||
x_45 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_45, 0, x_42);
|
||||
lean_ctor_set(x_45, 1, x_43);
|
||||
lean_ctor_set(x_45, 2, x_44);
|
||||
x_46 = x_45;
|
||||
x_47 = l_Lean_Elab_Command_getRef(x_2, x_3, x_40);
|
||||
x_48 = lean_ctor_get(x_47, 0);
|
||||
lean_inc(x_48);
|
||||
x_49 = lean_st_ref_get(x_3, x_47);
|
||||
x_50 = lean_ctor_get(x_49, 0);
|
||||
lean_inc(x_50);
|
||||
x_51 = lean_ctor_get(x_49, 1);
|
||||
x_49 = lean_ctor_get(x_47, 1);
|
||||
lean_inc(x_49);
|
||||
lean_dec(x_47);
|
||||
x_50 = l_Lean_Elab_Command_getCurrMacroScope(x_2, x_3, x_49);
|
||||
x_51 = lean_ctor_get(x_50, 0);
|
||||
lean_inc(x_51);
|
||||
lean_dec(x_49);
|
||||
x_52 = lean_ctor_get(x_50, 4);
|
||||
x_52 = lean_ctor_get(x_50, 1);
|
||||
lean_inc(x_52);
|
||||
lean_dec(x_50);
|
||||
x_53 = lean_st_ref_get(x_3, x_51);
|
||||
x_54 = lean_ctor_get(x_53, 0);
|
||||
lean_inc(x_54);
|
||||
x_55 = lean_ctor_get(x_53, 1);
|
||||
x_53 = lean_ctor_get(x_2, 2);
|
||||
lean_inc(x_53);
|
||||
x_54 = lean_st_ref_get(x_3, x_52);
|
||||
x_55 = lean_ctor_get(x_54, 0);
|
||||
lean_inc(x_55);
|
||||
lean_dec(x_53);
|
||||
x_56 = lean_ctor_get(x_54, 3);
|
||||
x_56 = lean_ctor_get(x_54, 1);
|
||||
lean_inc(x_56);
|
||||
lean_dec(x_54);
|
||||
lean_inc(x_37);
|
||||
x_57 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_57, 0, x_37);
|
||||
x_57 = lean_ctor_get(x_55, 4);
|
||||
lean_inc(x_57);
|
||||
x_58 = x_57;
|
||||
lean_inc(x_37);
|
||||
x_59 = lean_environment_main_module(x_37);
|
||||
x_60 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_60, 0, x_41);
|
||||
x_61 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_61, 0, x_37);
|
||||
x_62 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_62, 0, x_57);
|
||||
lean_ctor_set(x_62, 1, x_60);
|
||||
lean_ctor_set(x_62, 2, x_61);
|
||||
x_63 = x_62;
|
||||
x_64 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_64, 0, x_58);
|
||||
lean_ctor_set(x_64, 1, x_59);
|
||||
lean_ctor_set(x_64, 2, x_46);
|
||||
lean_ctor_set(x_64, 3, x_48);
|
||||
lean_ctor_set(x_64, 4, x_52);
|
||||
lean_ctor_set(x_64, 5, x_43);
|
||||
lean_ctor_set(x_64, 6, x_63);
|
||||
x_65 = lean_box(0);
|
||||
x_66 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_66, 0, x_56);
|
||||
lean_ctor_set(x_66, 1, x_65);
|
||||
x_67 = l_Lean_expandMacros(x_33, x_64, x_66);
|
||||
if (lean_obj_tag(x_67) == 0)
|
||||
lean_dec(x_55);
|
||||
x_58 = lean_st_ref_get(x_3, x_56);
|
||||
x_59 = lean_ctor_get(x_58, 0);
|
||||
lean_inc(x_59);
|
||||
x_60 = lean_ctor_get(x_58, 1);
|
||||
lean_inc(x_60);
|
||||
lean_dec(x_58);
|
||||
x_61 = lean_ctor_get(x_59, 3);
|
||||
lean_inc(x_61);
|
||||
lean_dec(x_59);
|
||||
x_62 = lean_environment_main_module(x_37);
|
||||
lean_inc(x_46);
|
||||
x_63 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_63, 0, x_46);
|
||||
lean_ctor_set(x_63, 1, x_62);
|
||||
lean_ctor_set(x_63, 2, x_51);
|
||||
lean_ctor_set(x_63, 3, x_53);
|
||||
lean_ctor_set(x_63, 4, x_57);
|
||||
lean_ctor_set(x_63, 5, x_48);
|
||||
lean_ctor_set(x_63, 6, x_46);
|
||||
x_64 = lean_box(0);
|
||||
x_65 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_65, 0, x_61);
|
||||
lean_ctor_set(x_65, 1, x_64);
|
||||
x_66 = l_Lean_expandMacros(x_33, x_63, x_65);
|
||||
if (lean_obj_tag(x_66) == 0)
|
||||
{
|
||||
lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; uint8_t x_74;
|
||||
x_68 = lean_ctor_get(x_67, 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; uint8_t x_73;
|
||||
x_67 = lean_ctor_get(x_66, 0);
|
||||
lean_inc(x_67);
|
||||
x_68 = lean_ctor_get(x_66, 1);
|
||||
lean_inc(x_68);
|
||||
x_69 = lean_ctor_get(x_67, 1);
|
||||
lean_dec(x_66);
|
||||
x_69 = lean_ctor_get(x_68, 0);
|
||||
lean_inc(x_69);
|
||||
lean_dec(x_67);
|
||||
x_70 = lean_ctor_get(x_69, 0);
|
||||
lean_inc(x_70);
|
||||
lean_dec(x_69);
|
||||
x_71 = lean_st_ref_take(x_3, x_55);
|
||||
x_72 = lean_ctor_get(x_71, 0);
|
||||
lean_dec(x_68);
|
||||
x_70 = lean_st_ref_take(x_3, x_60);
|
||||
x_71 = lean_ctor_get(x_70, 0);
|
||||
lean_inc(x_71);
|
||||
x_72 = lean_ctor_get(x_70, 1);
|
||||
lean_inc(x_72);
|
||||
x_73 = lean_ctor_get(x_71, 1);
|
||||
lean_inc(x_73);
|
||||
lean_dec(x_71);
|
||||
x_74 = !lean_is_exclusive(x_72);
|
||||
if (x_74 == 0)
|
||||
lean_dec(x_70);
|
||||
x_73 = !lean_is_exclusive(x_71);
|
||||
if (x_73 == 0)
|
||||
{
|
||||
lean_object* x_75; lean_object* x_76; lean_object* x_77;
|
||||
x_75 = lean_ctor_get(x_72, 3);
|
||||
lean_object* x_74; lean_object* x_75; lean_object* x_76;
|
||||
x_74 = lean_ctor_get(x_71, 3);
|
||||
lean_dec(x_74);
|
||||
lean_ctor_set(x_71, 3, x_69);
|
||||
x_75 = lean_st_ref_set(x_3, x_71, x_72);
|
||||
x_76 = lean_ctor_get(x_75, 1);
|
||||
lean_inc(x_76);
|
||||
lean_dec(x_75);
|
||||
lean_ctor_set(x_72, 3, x_70);
|
||||
x_76 = lean_st_ref_set(x_3, x_72, x_73);
|
||||
x_77 = lean_ctor_get(x_76, 1);
|
||||
lean_inc(x_77);
|
||||
lean_dec(x_76);
|
||||
x_10 = x_68;
|
||||
x_11 = x_77;
|
||||
x_10 = x_67;
|
||||
x_11 = x_76;
|
||||
goto block_31;
|
||||
}
|
||||
else
|
||||
{
|
||||
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;
|
||||
x_78 = lean_ctor_get(x_72, 0);
|
||||
x_79 = lean_ctor_get(x_72, 1);
|
||||
x_80 = lean_ctor_get(x_72, 2);
|
||||
x_81 = lean_ctor_get(x_72, 4);
|
||||
x_82 = lean_ctor_get(x_72, 5);
|
||||
x_83 = lean_ctor_get(x_72, 6);
|
||||
x_84 = lean_ctor_get(x_72, 7);
|
||||
lean_inc(x_84);
|
||||
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;
|
||||
x_77 = lean_ctor_get(x_71, 0);
|
||||
x_78 = lean_ctor_get(x_71, 1);
|
||||
x_79 = lean_ctor_get(x_71, 2);
|
||||
x_80 = lean_ctor_get(x_71, 4);
|
||||
x_81 = lean_ctor_get(x_71, 5);
|
||||
x_82 = lean_ctor_get(x_71, 6);
|
||||
x_83 = lean_ctor_get(x_71, 7);
|
||||
lean_inc(x_83);
|
||||
lean_inc(x_82);
|
||||
lean_inc(x_81);
|
||||
lean_inc(x_80);
|
||||
lean_inc(x_79);
|
||||
lean_inc(x_78);
|
||||
lean_dec(x_72);
|
||||
x_85 = lean_alloc_ctor(0, 8, 0);
|
||||
lean_ctor_set(x_85, 0, x_78);
|
||||
lean_ctor_set(x_85, 1, x_79);
|
||||
lean_ctor_set(x_85, 2, x_80);
|
||||
lean_ctor_set(x_85, 3, x_70);
|
||||
lean_ctor_set(x_85, 4, x_81);
|
||||
lean_ctor_set(x_85, 5, x_82);
|
||||
lean_ctor_set(x_85, 6, x_83);
|
||||
lean_ctor_set(x_85, 7, x_84);
|
||||
x_86 = lean_st_ref_set(x_3, x_85, x_73);
|
||||
x_87 = lean_ctor_get(x_86, 1);
|
||||
lean_inc(x_87);
|
||||
lean_dec(x_86);
|
||||
x_10 = x_68;
|
||||
x_11 = x_87;
|
||||
lean_inc(x_77);
|
||||
lean_dec(x_71);
|
||||
x_84 = lean_alloc_ctor(0, 8, 0);
|
||||
lean_ctor_set(x_84, 0, x_77);
|
||||
lean_ctor_set(x_84, 1, x_78);
|
||||
lean_ctor_set(x_84, 2, x_79);
|
||||
lean_ctor_set(x_84, 3, x_69);
|
||||
lean_ctor_set(x_84, 4, x_80);
|
||||
lean_ctor_set(x_84, 5, x_81);
|
||||
lean_ctor_set(x_84, 6, x_82);
|
||||
lean_ctor_set(x_84, 7, x_83);
|
||||
x_85 = lean_st_ref_set(x_3, x_84, x_72);
|
||||
x_86 = lean_ctor_get(x_85, 1);
|
||||
lean_inc(x_86);
|
||||
lean_dec(x_85);
|
||||
x_10 = x_67;
|
||||
x_11 = x_86;
|
||||
goto block_31;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_88;
|
||||
lean_object* x_87;
|
||||
lean_dec(x_8);
|
||||
x_88 = lean_ctor_get(x_67, 0);
|
||||
x_87 = lean_ctor_get(x_66, 0);
|
||||
lean_inc(x_87);
|
||||
lean_dec(x_66);
|
||||
if (lean_obj_tag(x_87) == 0)
|
||||
{
|
||||
lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; uint8_t x_93;
|
||||
x_88 = lean_ctor_get(x_87, 0);
|
||||
lean_inc(x_88);
|
||||
lean_dec(x_67);
|
||||
if (lean_obj_tag(x_88) == 0)
|
||||
{
|
||||
lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; uint8_t x_94;
|
||||
x_89 = lean_ctor_get(x_88, 0);
|
||||
x_89 = lean_ctor_get(x_87, 1);
|
||||
lean_inc(x_89);
|
||||
x_90 = lean_ctor_get(x_88, 1);
|
||||
lean_inc(x_90);
|
||||
lean_dec(x_88);
|
||||
x_91 = lean_alloc_ctor(2, 1, 0);
|
||||
lean_dec(x_87);
|
||||
x_90 = lean_alloc_ctor(2, 1, 0);
|
||||
lean_ctor_set(x_90, 0, x_89);
|
||||
x_91 = lean_alloc_ctor(0, 1, 0);
|
||||
lean_ctor_set(x_91, 0, x_90);
|
||||
x_92 = lean_alloc_ctor(0, 1, 0);
|
||||
lean_ctor_set(x_92, 0, x_91);
|
||||
x_93 = l_Lean_throwErrorAt___at_Lean_Elab_Command_elabCommand___spec__13(x_89, x_92, x_2, x_3, x_55);
|
||||
x_92 = l_Lean_throwErrorAt___at_Lean_Elab_Command_elabCommand___spec__13(x_88, x_91, x_2, x_3, x_60);
|
||||
lean_dec(x_3);
|
||||
lean_dec(x_89);
|
||||
x_94 = !lean_is_exclusive(x_93);
|
||||
if (x_94 == 0)
|
||||
lean_dec(x_88);
|
||||
x_93 = !lean_is_exclusive(x_92);
|
||||
if (x_93 == 0)
|
||||
{
|
||||
return x_93;
|
||||
return x_92;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_95; lean_object* x_96; lean_object* x_97;
|
||||
x_95 = lean_ctor_get(x_93, 0);
|
||||
x_96 = lean_ctor_get(x_93, 1);
|
||||
lean_inc(x_96);
|
||||
lean_object* x_94; lean_object* x_95; lean_object* x_96;
|
||||
x_94 = lean_ctor_get(x_92, 0);
|
||||
x_95 = lean_ctor_get(x_92, 1);
|
||||
lean_inc(x_95);
|
||||
lean_dec(x_93);
|
||||
x_97 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_97, 0, x_95);
|
||||
lean_ctor_set(x_97, 1, x_96);
|
||||
return x_97;
|
||||
lean_inc(x_94);
|
||||
lean_dec(x_92);
|
||||
x_96 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_96, 0, x_94);
|
||||
lean_ctor_set(x_96, 1, x_95);
|
||||
return x_96;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_98; uint8_t x_99;
|
||||
lean_object* x_97; uint8_t x_98;
|
||||
lean_dec(x_3);
|
||||
lean_dec(x_2);
|
||||
x_98 = l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Command_elabCommand___spec__15___rarg(x_55);
|
||||
x_99 = !lean_is_exclusive(x_98);
|
||||
if (x_99 == 0)
|
||||
x_97 = l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Command_elabCommand___spec__15___rarg(x_60);
|
||||
x_98 = !lean_is_exclusive(x_97);
|
||||
if (x_98 == 0)
|
||||
{
|
||||
return x_98;
|
||||
return x_97;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_100; lean_object* x_101; lean_object* x_102;
|
||||
x_100 = lean_ctor_get(x_98, 0);
|
||||
x_101 = lean_ctor_get(x_98, 1);
|
||||
lean_inc(x_101);
|
||||
lean_object* x_99; lean_object* x_100; lean_object* x_101;
|
||||
x_99 = lean_ctor_get(x_97, 0);
|
||||
x_100 = lean_ctor_get(x_97, 1);
|
||||
lean_inc(x_100);
|
||||
lean_dec(x_98);
|
||||
x_102 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_102, 0, x_100);
|
||||
lean_ctor_set(x_102, 1, x_101);
|
||||
return x_102;
|
||||
lean_inc(x_99);
|
||||
lean_dec(x_97);
|
||||
x_101 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_101, 0, x_99);
|
||||
lean_ctor_set(x_101, 1, x_100);
|
||||
return x_101;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
@ -19464,26 +19462,26 @@ return x_30;
|
|||
}
|
||||
else
|
||||
{
|
||||
uint8_t x_103;
|
||||
uint8_t x_102;
|
||||
lean_dec(x_3);
|
||||
lean_dec(x_2);
|
||||
x_103 = !lean_is_exclusive(x_7);
|
||||
if (x_103 == 0)
|
||||
x_102 = !lean_is_exclusive(x_7);
|
||||
if (x_102 == 0)
|
||||
{
|
||||
return x_7;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_104; lean_object* x_105; lean_object* x_106;
|
||||
x_104 = lean_ctor_get(x_7, 0);
|
||||
x_105 = lean_ctor_get(x_7, 1);
|
||||
lean_inc(x_105);
|
||||
lean_object* x_103; lean_object* x_104; lean_object* x_105;
|
||||
x_103 = lean_ctor_get(x_7, 0);
|
||||
x_104 = lean_ctor_get(x_7, 1);
|
||||
lean_inc(x_104);
|
||||
lean_inc(x_103);
|
||||
lean_dec(x_7);
|
||||
x_106 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_106, 0, x_104);
|
||||
lean_ctor_set(x_106, 1, x_105);
|
||||
return x_106;
|
||||
x_105 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_105, 0, x_103);
|
||||
lean_ctor_set(x_105, 1, x_104);
|
||||
return x_105;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
|
|||
271
stage0/stdlib/Lean/Elab/Structure.c
generated
271
stage0/stdlib/Lean/Elab/Structure.c
generated
|
|
@ -1132,7 +1132,7 @@ x_11 = l_Lean_Elab_toAttributeKind___at___private_Lean_Elab_Structure_0__Lean_El
|
|||
lean_dec(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_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; 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_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63;
|
||||
lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; 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; 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_object* x_60; lean_object* x_61; lean_object* x_62;
|
||||
x_12 = lean_ctor_get(x_11, 0);
|
||||
lean_inc(x_12);
|
||||
x_13 = lean_ctor_get(x_11, 1);
|
||||
|
|
@ -1151,183 +1151,182 @@ lean_inc(x_41);
|
|||
lean_dec(x_39);
|
||||
x_42 = lean_ctor_get(x_6, 4);
|
||||
lean_inc(x_42);
|
||||
x_43 = lean_ctor_get(x_6, 3);
|
||||
lean_inc(x_43);
|
||||
x_44 = l_Lean_Elab_Term_getCurrMacroScope(x_2, x_3, x_4, x_5, x_6, x_7, x_40);
|
||||
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 = lean_ctor_get(x_6, 1);
|
||||
lean_inc(x_47);
|
||||
x_48 = lean_ctor_get(x_6, 2);
|
||||
lean_inc(x_41);
|
||||
x_43 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_43, 0, x_41);
|
||||
x_44 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_44, 0, x_42);
|
||||
lean_inc(x_41);
|
||||
x_45 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_45, 0, x_41);
|
||||
x_46 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_46, 0, x_43);
|
||||
lean_ctor_set(x_46, 1, x_44);
|
||||
lean_ctor_set(x_46, 2, x_45);
|
||||
x_47 = x_46;
|
||||
x_48 = lean_ctor_get(x_6, 3);
|
||||
lean_inc(x_48);
|
||||
x_49 = lean_st_ref_get(x_7, x_46);
|
||||
x_49 = l_Lean_Elab_Term_getCurrMacroScope(x_2, x_3, x_4, x_5, x_6, x_7, x_40);
|
||||
x_50 = lean_ctor_get(x_49, 0);
|
||||
lean_inc(x_50);
|
||||
x_51 = lean_ctor_get(x_49, 1);
|
||||
lean_inc(x_51);
|
||||
lean_dec(x_49);
|
||||
x_52 = lean_ctor_get(x_50, 1);
|
||||
x_52 = lean_ctor_get(x_6, 1);
|
||||
lean_inc(x_52);
|
||||
lean_dec(x_50);
|
||||
lean_inc(x_41);
|
||||
x_53 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_53, 0, x_41);
|
||||
x_53 = lean_ctor_get(x_6, 2);
|
||||
lean_inc(x_53);
|
||||
x_54 = x_53;
|
||||
lean_inc(x_41);
|
||||
x_55 = lean_environment_main_module(x_41);
|
||||
x_56 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_56, 0, x_42);
|
||||
x_57 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_57, 0, x_41);
|
||||
x_58 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_58, 0, x_53);
|
||||
lean_ctor_set(x_58, 1, x_56);
|
||||
lean_ctor_set(x_58, 2, x_57);
|
||||
x_59 = x_58;
|
||||
x_60 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_60, 0, x_54);
|
||||
lean_ctor_set(x_60, 1, x_55);
|
||||
lean_ctor_set(x_60, 2, x_45);
|
||||
lean_ctor_set(x_60, 3, x_47);
|
||||
lean_ctor_set(x_60, 4, x_48);
|
||||
lean_ctor_set(x_60, 5, x_43);
|
||||
lean_ctor_set(x_60, 6, x_59);
|
||||
x_61 = lean_box(0);
|
||||
x_62 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_62, 0, x_52);
|
||||
lean_ctor_set(x_62, 1, x_61);
|
||||
x_63 = l_Lean_expandMacros(x_37, x_60, x_62);
|
||||
if (lean_obj_tag(x_63) == 0)
|
||||
x_54 = lean_st_ref_get(x_7, x_51);
|
||||
x_55 = lean_ctor_get(x_54, 0);
|
||||
lean_inc(x_55);
|
||||
x_56 = lean_ctor_get(x_54, 1);
|
||||
lean_inc(x_56);
|
||||
lean_dec(x_54);
|
||||
x_57 = lean_ctor_get(x_55, 1);
|
||||
lean_inc(x_57);
|
||||
lean_dec(x_55);
|
||||
x_58 = lean_environment_main_module(x_41);
|
||||
lean_inc(x_47);
|
||||
x_59 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_59, 0, x_47);
|
||||
lean_ctor_set(x_59, 1, x_58);
|
||||
lean_ctor_set(x_59, 2, x_50);
|
||||
lean_ctor_set(x_59, 3, x_52);
|
||||
lean_ctor_set(x_59, 4, x_53);
|
||||
lean_ctor_set(x_59, 5, x_48);
|
||||
lean_ctor_set(x_59, 6, x_47);
|
||||
x_60 = lean_box(0);
|
||||
x_61 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_61, 0, x_57);
|
||||
lean_ctor_set(x_61, 1, x_60);
|
||||
x_62 = l_Lean_expandMacros(x_37, x_59, x_61);
|
||||
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; uint8_t x_70;
|
||||
x_64 = lean_ctor_get(x_63, 0);
|
||||
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;
|
||||
x_63 = lean_ctor_get(x_62, 0);
|
||||
lean_inc(x_63);
|
||||
x_64 = lean_ctor_get(x_62, 1);
|
||||
lean_inc(x_64);
|
||||
x_65 = lean_ctor_get(x_63, 1);
|
||||
lean_dec(x_62);
|
||||
x_65 = lean_ctor_get(x_64, 0);
|
||||
lean_inc(x_65);
|
||||
lean_dec(x_63);
|
||||
x_66 = lean_ctor_get(x_65, 0);
|
||||
lean_inc(x_66);
|
||||
lean_dec(x_65);
|
||||
x_67 = lean_st_ref_take(x_7, x_51);
|
||||
x_68 = lean_ctor_get(x_67, 0);
|
||||
lean_dec(x_64);
|
||||
x_66 = lean_st_ref_take(x_7, x_56);
|
||||
x_67 = lean_ctor_get(x_66, 0);
|
||||
lean_inc(x_67);
|
||||
x_68 = lean_ctor_get(x_66, 1);
|
||||
lean_inc(x_68);
|
||||
x_69 = lean_ctor_get(x_67, 1);
|
||||
lean_inc(x_69);
|
||||
lean_dec(x_67);
|
||||
x_70 = !lean_is_exclusive(x_68);
|
||||
if (x_70 == 0)
|
||||
lean_dec(x_66);
|
||||
x_69 = !lean_is_exclusive(x_67);
|
||||
if (x_69 == 0)
|
||||
{
|
||||
lean_object* x_71; lean_object* x_72; lean_object* x_73;
|
||||
x_71 = lean_ctor_get(x_68, 1);
|
||||
lean_object* x_70; lean_object* x_71; lean_object* x_72;
|
||||
x_70 = lean_ctor_get(x_67, 1);
|
||||
lean_dec(x_70);
|
||||
lean_ctor_set(x_67, 1, x_65);
|
||||
x_71 = lean_st_ref_set(x_7, x_67, x_68);
|
||||
x_72 = lean_ctor_get(x_71, 1);
|
||||
lean_inc(x_72);
|
||||
lean_dec(x_71);
|
||||
lean_ctor_set(x_68, 1, x_66);
|
||||
x_72 = lean_st_ref_set(x_7, x_68, x_69);
|
||||
x_73 = lean_ctor_get(x_72, 1);
|
||||
lean_inc(x_73);
|
||||
lean_dec(x_72);
|
||||
x_14 = x_64;
|
||||
x_15 = x_73;
|
||||
x_14 = x_63;
|
||||
x_15 = x_72;
|
||||
goto block_35;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79;
|
||||
x_74 = lean_ctor_get(x_68, 0);
|
||||
x_75 = lean_ctor_get(x_68, 2);
|
||||
x_76 = lean_ctor_get(x_68, 3);
|
||||
lean_inc(x_76);
|
||||
lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78;
|
||||
x_73 = lean_ctor_get(x_67, 0);
|
||||
x_74 = lean_ctor_get(x_67, 2);
|
||||
x_75 = lean_ctor_get(x_67, 3);
|
||||
lean_inc(x_75);
|
||||
lean_inc(x_74);
|
||||
lean_dec(x_68);
|
||||
x_77 = lean_alloc_ctor(0, 4, 0);
|
||||
lean_ctor_set(x_77, 0, x_74);
|
||||
lean_ctor_set(x_77, 1, x_66);
|
||||
lean_ctor_set(x_77, 2, x_75);
|
||||
lean_ctor_set(x_77, 3, x_76);
|
||||
x_78 = lean_st_ref_set(x_7, x_77, x_69);
|
||||
x_79 = lean_ctor_get(x_78, 1);
|
||||
lean_inc(x_79);
|
||||
lean_dec(x_78);
|
||||
x_14 = x_64;
|
||||
x_15 = x_79;
|
||||
lean_inc(x_73);
|
||||
lean_dec(x_67);
|
||||
x_76 = lean_alloc_ctor(0, 4, 0);
|
||||
lean_ctor_set(x_76, 0, x_73);
|
||||
lean_ctor_set(x_76, 1, x_65);
|
||||
lean_ctor_set(x_76, 2, x_74);
|
||||
lean_ctor_set(x_76, 3, x_75);
|
||||
x_77 = lean_st_ref_set(x_7, x_76, x_68);
|
||||
x_78 = lean_ctor_get(x_77, 1);
|
||||
lean_inc(x_78);
|
||||
lean_dec(x_77);
|
||||
x_14 = x_63;
|
||||
x_15 = x_78;
|
||||
goto block_35;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_80;
|
||||
lean_object* x_79;
|
||||
lean_dec(x_12);
|
||||
x_80 = lean_ctor_get(x_63, 0);
|
||||
lean_inc(x_80);
|
||||
lean_dec(x_63);
|
||||
if (lean_obj_tag(x_80) == 0)
|
||||
x_79 = lean_ctor_get(x_62, 0);
|
||||
lean_inc(x_79);
|
||||
lean_dec(x_62);
|
||||
if (lean_obj_tag(x_79) == 0)
|
||||
{
|
||||
lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; uint8_t x_86;
|
||||
x_81 = lean_ctor_get(x_80, 0);
|
||||
lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; uint8_t x_85;
|
||||
x_80 = lean_ctor_get(x_79, 0);
|
||||
lean_inc(x_80);
|
||||
x_81 = lean_ctor_get(x_79, 1);
|
||||
lean_inc(x_81);
|
||||
x_82 = lean_ctor_get(x_80, 1);
|
||||
lean_inc(x_82);
|
||||
lean_dec(x_80);
|
||||
x_83 = lean_alloc_ctor(2, 1, 0);
|
||||
lean_dec(x_79);
|
||||
x_82 = lean_alloc_ctor(2, 1, 0);
|
||||
lean_ctor_set(x_82, 0, x_81);
|
||||
x_83 = lean_alloc_ctor(0, 1, 0);
|
||||
lean_ctor_set(x_83, 0, x_82);
|
||||
x_84 = lean_alloc_ctor(0, 1, 0);
|
||||
lean_ctor_set(x_84, 0, x_83);
|
||||
x_85 = l_Lean_throwErrorAt___at___private_Lean_Elab_Term_0__Lean_Elab_Term_elabTermAux___spec__3(x_81, x_84, x_2, x_3, x_4, x_5, x_6, x_7, x_51);
|
||||
x_84 = l_Lean_throwErrorAt___at___private_Lean_Elab_Term_0__Lean_Elab_Term_elabTermAux___spec__3(x_80, x_83, x_2, x_3, x_4, x_5, x_6, x_7, x_56);
|
||||
lean_dec(x_7);
|
||||
lean_dec(x_5);
|
||||
lean_dec(x_4);
|
||||
lean_dec(x_3);
|
||||
lean_dec(x_81);
|
||||
x_86 = !lean_is_exclusive(x_85);
|
||||
if (x_86 == 0)
|
||||
lean_dec(x_80);
|
||||
x_85 = !lean_is_exclusive(x_84);
|
||||
if (x_85 == 0)
|
||||
{
|
||||
return x_85;
|
||||
return x_84;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_87; lean_object* x_88; lean_object* x_89;
|
||||
x_87 = lean_ctor_get(x_85, 0);
|
||||
x_88 = lean_ctor_get(x_85, 1);
|
||||
lean_inc(x_88);
|
||||
lean_object* x_86; lean_object* x_87; lean_object* x_88;
|
||||
x_86 = lean_ctor_get(x_84, 0);
|
||||
x_87 = lean_ctor_get(x_84, 1);
|
||||
lean_inc(x_87);
|
||||
lean_dec(x_85);
|
||||
x_89 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_89, 0, x_87);
|
||||
lean_ctor_set(x_89, 1, x_88);
|
||||
return x_89;
|
||||
lean_inc(x_86);
|
||||
lean_dec(x_84);
|
||||
x_88 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_88, 0, x_86);
|
||||
lean_ctor_set(x_88, 1, x_87);
|
||||
return x_88;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_90; uint8_t x_91;
|
||||
lean_object* x_89; uint8_t x_90;
|
||||
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_90 = l_Lean_Elab_throwUnsupportedSyntax___at___private_Lean_Elab_Term_0__Lean_Elab_Term_elabTermAux___spec__5___rarg(x_51);
|
||||
x_91 = !lean_is_exclusive(x_90);
|
||||
if (x_91 == 0)
|
||||
x_89 = l_Lean_Elab_throwUnsupportedSyntax___at___private_Lean_Elab_Term_0__Lean_Elab_Term_elabTermAux___spec__5___rarg(x_56);
|
||||
x_90 = !lean_is_exclusive(x_89);
|
||||
if (x_90 == 0)
|
||||
{
|
||||
return x_90;
|
||||
return x_89;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_92; lean_object* x_93; lean_object* x_94;
|
||||
x_92 = lean_ctor_get(x_90, 0);
|
||||
x_93 = lean_ctor_get(x_90, 1);
|
||||
lean_inc(x_93);
|
||||
lean_object* x_91; lean_object* x_92; lean_object* x_93;
|
||||
x_91 = lean_ctor_get(x_89, 0);
|
||||
x_92 = lean_ctor_get(x_89, 1);
|
||||
lean_inc(x_92);
|
||||
lean_dec(x_90);
|
||||
x_94 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_94, 0, x_92);
|
||||
lean_ctor_set(x_94, 1, x_93);
|
||||
return x_94;
|
||||
lean_inc(x_91);
|
||||
lean_dec(x_89);
|
||||
x_93 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_93, 0, x_91);
|
||||
lean_ctor_set(x_93, 1, x_92);
|
||||
return x_93;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
@ -1412,30 +1411,30 @@ return x_34;
|
|||
}
|
||||
else
|
||||
{
|
||||
uint8_t x_95;
|
||||
uint8_t x_94;
|
||||
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_95 = !lean_is_exclusive(x_11);
|
||||
if (x_95 == 0)
|
||||
x_94 = !lean_is_exclusive(x_11);
|
||||
if (x_94 == 0)
|
||||
{
|
||||
return x_11;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_96; lean_object* x_97; lean_object* x_98;
|
||||
x_96 = lean_ctor_get(x_11, 0);
|
||||
x_97 = lean_ctor_get(x_11, 1);
|
||||
lean_inc(x_97);
|
||||
lean_object* x_95; lean_object* x_96; lean_object* x_97;
|
||||
x_95 = lean_ctor_get(x_11, 0);
|
||||
x_96 = lean_ctor_get(x_11, 1);
|
||||
lean_inc(x_96);
|
||||
lean_inc(x_95);
|
||||
lean_dec(x_11);
|
||||
x_98 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_98, 0, x_96);
|
||||
lean_ctor_set(x_98, 1, x_97);
|
||||
return x_98;
|
||||
x_97 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_97, 0, x_95);
|
||||
lean_ctor_set(x_97, 1, x_96);
|
||||
return x_97;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
|
|||
6312
stage0/stdlib/Lean/Elab/Syntax.c
generated
6312
stage0/stdlib/Lean/Elab/Syntax.c
generated
File diff suppressed because it is too large
Load diff
404
stage0/stdlib/Lean/Elab/Tactic/Basic.c
generated
404
stage0/stdlib/Lean/Elab/Tactic/Basic.c
generated
|
|
@ -2368,7 +2368,7 @@ return x_18;
|
|||
}
|
||||
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; lean_object* x_26; lean_object* x_27; lean_object* x_42; lean_object* x_43; 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; 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; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80;
|
||||
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_42; lean_object* x_43; 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; 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; lean_object* x_77; lean_object* x_78; lean_object* x_79;
|
||||
x_19 = lean_ctor_get(x_2, 0);
|
||||
lean_inc(x_19);
|
||||
x_20 = lean_ctor_get(x_2, 1);
|
||||
|
|
@ -2395,154 +2395,153 @@ lean_inc(x_58);
|
|||
lean_dec(x_56);
|
||||
x_59 = lean_ctor_get(x_9, 4);
|
||||
lean_inc(x_59);
|
||||
x_60 = lean_ctor_get(x_9, 3);
|
||||
lean_inc(x_60);
|
||||
x_61 = l_Lean_Elab_Term_getCurrMacroScope(x_5, x_6, x_7, x_8, x_9, x_10, x_57);
|
||||
x_62 = lean_ctor_get(x_61, 0);
|
||||
lean_inc(x_62);
|
||||
x_63 = lean_ctor_get(x_61, 1);
|
||||
lean_inc(x_63);
|
||||
lean_dec(x_61);
|
||||
x_64 = lean_ctor_get(x_9, 1);
|
||||
lean_inc(x_64);
|
||||
x_65 = lean_ctor_get(x_9, 2);
|
||||
lean_inc(x_58);
|
||||
x_60 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_60, 0, x_58);
|
||||
x_61 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_61, 0, x_59);
|
||||
lean_inc(x_58);
|
||||
x_62 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_62, 0, x_58);
|
||||
x_63 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_63, 0, x_60);
|
||||
lean_ctor_set(x_63, 1, x_61);
|
||||
lean_ctor_set(x_63, 2, x_62);
|
||||
x_64 = x_63;
|
||||
x_65 = lean_ctor_get(x_9, 3);
|
||||
lean_inc(x_65);
|
||||
x_66 = lean_st_ref_get(x_10, x_63);
|
||||
x_66 = l_Lean_Elab_Term_getCurrMacroScope(x_5, x_6, x_7, x_8, x_9, x_10, x_57);
|
||||
x_67 = lean_ctor_get(x_66, 0);
|
||||
lean_inc(x_67);
|
||||
x_68 = lean_ctor_get(x_66, 1);
|
||||
lean_inc(x_68);
|
||||
lean_dec(x_66);
|
||||
x_69 = lean_ctor_get(x_67, 1);
|
||||
x_69 = lean_ctor_get(x_9, 1);
|
||||
lean_inc(x_69);
|
||||
lean_dec(x_67);
|
||||
lean_inc(x_58);
|
||||
x_70 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_70, 0, x_58);
|
||||
x_70 = lean_ctor_get(x_9, 2);
|
||||
lean_inc(x_70);
|
||||
x_71 = x_70;
|
||||
lean_inc(x_58);
|
||||
x_72 = lean_environment_main_module(x_58);
|
||||
x_73 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_73, 0, x_59);
|
||||
x_74 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_74, 0, x_58);
|
||||
x_75 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_75, 0, x_70);
|
||||
lean_ctor_set(x_75, 1, x_73);
|
||||
lean_ctor_set(x_75, 2, x_74);
|
||||
x_76 = x_75;
|
||||
x_77 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_77, 0, x_71);
|
||||
lean_ctor_set(x_77, 1, x_72);
|
||||
lean_ctor_set(x_77, 2, x_62);
|
||||
lean_ctor_set(x_77, 3, x_64);
|
||||
lean_ctor_set(x_77, 4, x_65);
|
||||
lean_ctor_set(x_77, 5, x_60);
|
||||
lean_ctor_set(x_77, 6, x_76);
|
||||
x_78 = lean_box(0);
|
||||
x_79 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_79, 0, x_69);
|
||||
lean_ctor_set(x_79, 1, x_78);
|
||||
x_71 = lean_st_ref_get(x_10, x_68);
|
||||
x_72 = lean_ctor_get(x_71, 0);
|
||||
lean_inc(x_72);
|
||||
x_73 = lean_ctor_get(x_71, 1);
|
||||
lean_inc(x_73);
|
||||
lean_dec(x_71);
|
||||
x_74 = lean_ctor_get(x_72, 1);
|
||||
lean_inc(x_74);
|
||||
lean_dec(x_72);
|
||||
x_75 = lean_environment_main_module(x_58);
|
||||
lean_inc(x_64);
|
||||
x_76 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_76, 0, x_64);
|
||||
lean_ctor_set(x_76, 1, x_75);
|
||||
lean_ctor_set(x_76, 2, x_67);
|
||||
lean_ctor_set(x_76, 3, x_69);
|
||||
lean_ctor_set(x_76, 4, x_70);
|
||||
lean_ctor_set(x_76, 5, x_65);
|
||||
lean_ctor_set(x_76, 6, x_64);
|
||||
x_77 = lean_box(0);
|
||||
x_78 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_78, 0, x_74);
|
||||
lean_ctor_set(x_78, 1, x_77);
|
||||
lean_inc(x_1);
|
||||
x_80 = lean_apply_3(x_19, x_1, x_77, x_79);
|
||||
if (lean_obj_tag(x_80) == 0)
|
||||
x_79 = lean_apply_3(x_19, x_1, x_76, x_78);
|
||||
if (lean_obj_tag(x_79) == 0)
|
||||
{
|
||||
lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; uint8_t x_87;
|
||||
x_81 = lean_ctor_get(x_80, 0);
|
||||
lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; uint8_t x_86;
|
||||
x_80 = lean_ctor_get(x_79, 0);
|
||||
lean_inc(x_80);
|
||||
x_81 = lean_ctor_get(x_79, 1);
|
||||
lean_inc(x_81);
|
||||
x_82 = lean_ctor_get(x_80, 1);
|
||||
lean_dec(x_79);
|
||||
x_82 = lean_ctor_get(x_81, 0);
|
||||
lean_inc(x_82);
|
||||
lean_dec(x_80);
|
||||
x_83 = lean_ctor_get(x_82, 0);
|
||||
lean_inc(x_83);
|
||||
lean_dec(x_82);
|
||||
x_84 = lean_st_ref_take(x_10, x_68);
|
||||
x_85 = lean_ctor_get(x_84, 0);
|
||||
lean_dec(x_81);
|
||||
x_83 = lean_st_ref_take(x_10, x_73);
|
||||
x_84 = lean_ctor_get(x_83, 0);
|
||||
lean_inc(x_84);
|
||||
x_85 = lean_ctor_get(x_83, 1);
|
||||
lean_inc(x_85);
|
||||
x_86 = lean_ctor_get(x_84, 1);
|
||||
lean_inc(x_86);
|
||||
lean_dec(x_84);
|
||||
x_87 = !lean_is_exclusive(x_85);
|
||||
if (x_87 == 0)
|
||||
lean_dec(x_83);
|
||||
x_86 = !lean_is_exclusive(x_84);
|
||||
if (x_86 == 0)
|
||||
{
|
||||
lean_object* x_88; lean_object* x_89; lean_object* x_90;
|
||||
x_88 = lean_ctor_get(x_85, 1);
|
||||
lean_object* x_87; lean_object* x_88; lean_object* x_89;
|
||||
x_87 = lean_ctor_get(x_84, 1);
|
||||
lean_dec(x_87);
|
||||
lean_ctor_set(x_84, 1, x_82);
|
||||
x_88 = lean_st_ref_set(x_10, x_84, x_85);
|
||||
x_89 = lean_ctor_get(x_88, 1);
|
||||
lean_inc(x_89);
|
||||
lean_dec(x_88);
|
||||
lean_ctor_set(x_85, 1, x_83);
|
||||
x_89 = lean_st_ref_set(x_10, x_85, x_86);
|
||||
x_90 = lean_ctor_get(x_89, 1);
|
||||
lean_inc(x_90);
|
||||
lean_dec(x_89);
|
||||
x_26 = x_81;
|
||||
x_27 = x_90;
|
||||
x_26 = x_80;
|
||||
x_27 = x_89;
|
||||
goto block_41;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96;
|
||||
x_91 = lean_ctor_get(x_85, 0);
|
||||
x_92 = lean_ctor_get(x_85, 2);
|
||||
x_93 = lean_ctor_get(x_85, 3);
|
||||
lean_inc(x_93);
|
||||
lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95;
|
||||
x_90 = lean_ctor_get(x_84, 0);
|
||||
x_91 = lean_ctor_get(x_84, 2);
|
||||
x_92 = lean_ctor_get(x_84, 3);
|
||||
lean_inc(x_92);
|
||||
lean_inc(x_91);
|
||||
lean_dec(x_85);
|
||||
x_94 = lean_alloc_ctor(0, 4, 0);
|
||||
lean_ctor_set(x_94, 0, x_91);
|
||||
lean_ctor_set(x_94, 1, x_83);
|
||||
lean_ctor_set(x_94, 2, x_92);
|
||||
lean_ctor_set(x_94, 3, x_93);
|
||||
x_95 = lean_st_ref_set(x_10, x_94, x_86);
|
||||
x_96 = lean_ctor_get(x_95, 1);
|
||||
lean_inc(x_96);
|
||||
lean_dec(x_95);
|
||||
x_26 = x_81;
|
||||
x_27 = x_96;
|
||||
lean_inc(x_90);
|
||||
lean_dec(x_84);
|
||||
x_93 = lean_alloc_ctor(0, 4, 0);
|
||||
lean_ctor_set(x_93, 0, x_90);
|
||||
lean_ctor_set(x_93, 1, x_82);
|
||||
lean_ctor_set(x_93, 2, x_91);
|
||||
lean_ctor_set(x_93, 3, x_92);
|
||||
x_94 = lean_st_ref_set(x_10, x_93, x_85);
|
||||
x_95 = lean_ctor_get(x_94, 1);
|
||||
lean_inc(x_95);
|
||||
lean_dec(x_94);
|
||||
x_26 = x_80;
|
||||
x_27 = x_95;
|
||||
goto block_41;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_97;
|
||||
x_97 = lean_ctor_get(x_80, 0);
|
||||
lean_inc(x_97);
|
||||
lean_dec(x_80);
|
||||
if (lean_obj_tag(x_97) == 0)
|
||||
lean_object* x_96;
|
||||
x_96 = lean_ctor_get(x_79, 0);
|
||||
lean_inc(x_96);
|
||||
lean_dec(x_79);
|
||||
if (lean_obj_tag(x_96) == 0)
|
||||
{
|
||||
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;
|
||||
x_98 = lean_ctor_get(x_97, 0);
|
||||
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;
|
||||
x_97 = lean_ctor_get(x_96, 0);
|
||||
lean_inc(x_97);
|
||||
x_98 = lean_ctor_get(x_96, 1);
|
||||
lean_inc(x_98);
|
||||
x_99 = lean_ctor_get(x_97, 1);
|
||||
lean_inc(x_99);
|
||||
lean_dec(x_97);
|
||||
x_100 = lean_alloc_ctor(2, 1, 0);
|
||||
lean_dec(x_96);
|
||||
x_99 = lean_alloc_ctor(2, 1, 0);
|
||||
lean_ctor_set(x_99, 0, x_98);
|
||||
x_100 = lean_alloc_ctor(0, 1, 0);
|
||||
lean_ctor_set(x_100, 0, x_99);
|
||||
x_101 = lean_alloc_ctor(0, 1, 0);
|
||||
lean_ctor_set(x_101, 0, x_100);
|
||||
lean_inc(x_9);
|
||||
x_102 = l_Lean_throwErrorAt___at_Lean_Elab_Tactic_expandTacticMacroFns_loop___spec__1(x_98, x_101, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_68);
|
||||
lean_dec(x_98);
|
||||
x_103 = lean_ctor_get(x_102, 0);
|
||||
x_101 = l_Lean_throwErrorAt___at_Lean_Elab_Tactic_expandTacticMacroFns_loop___spec__1(x_97, x_100, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_73);
|
||||
lean_dec(x_97);
|
||||
x_102 = lean_ctor_get(x_101, 0);
|
||||
lean_inc(x_102);
|
||||
x_103 = lean_ctor_get(x_101, 1);
|
||||
lean_inc(x_103);
|
||||
x_104 = lean_ctor_get(x_102, 1);
|
||||
lean_inc(x_104);
|
||||
lean_dec(x_102);
|
||||
x_42 = x_103;
|
||||
x_43 = x_104;
|
||||
lean_dec(x_101);
|
||||
x_42 = x_102;
|
||||
x_43 = x_103;
|
||||
goto block_54;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_105; lean_object* x_106; lean_object* x_107;
|
||||
x_105 = l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Tactic_expandTacticMacroFns_loop___spec__3___rarg(x_68);
|
||||
x_106 = lean_ctor_get(x_105, 0);
|
||||
lean_object* x_104; lean_object* x_105; lean_object* x_106;
|
||||
x_104 = l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Tactic_expandTacticMacroFns_loop___spec__3___rarg(x_73);
|
||||
x_105 = lean_ctor_get(x_104, 0);
|
||||
lean_inc(x_105);
|
||||
x_106 = lean_ctor_get(x_104, 1);
|
||||
lean_inc(x_106);
|
||||
x_107 = lean_ctor_get(x_105, 1);
|
||||
lean_inc(x_107);
|
||||
lean_dec(x_105);
|
||||
x_42 = x_106;
|
||||
x_43 = x_107;
|
||||
lean_dec(x_104);
|
||||
x_42 = x_105;
|
||||
x_43 = x_106;
|
||||
goto block_54;
|
||||
}
|
||||
}
|
||||
|
|
@ -19853,7 +19852,7 @@ return x_5;
|
|||
lean_object* l_Lean_Elab_Tactic_evalIntroMatch(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_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_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; 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; lean_object* x_43; lean_object* x_44; uint8_t x_45;
|
||||
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_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; 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; lean_object* x_43; uint8_t x_44;
|
||||
x_11 = lean_unsigned_to_nat(1u);
|
||||
x_12 = l_Lean_Syntax_getArg(x_1, x_11);
|
||||
x_13 = lean_st_ref_get(x_9, x_10);
|
||||
|
|
@ -19867,115 +19866,114 @@ lean_inc(x_16);
|
|||
lean_dec(x_14);
|
||||
x_17 = lean_ctor_get(x_8, 4);
|
||||
lean_inc(x_17);
|
||||
x_18 = lean_ctor_get(x_8, 3);
|
||||
lean_inc(x_18);
|
||||
x_19 = l_Lean_Elab_Term_getCurrMacroScope(x_4, x_5, x_6, x_7, x_8, x_9, x_15);
|
||||
x_20 = lean_ctor_get(x_19, 0);
|
||||
lean_inc(x_20);
|
||||
x_21 = lean_ctor_get(x_19, 1);
|
||||
lean_inc(x_21);
|
||||
lean_dec(x_19);
|
||||
x_22 = lean_ctor_get(x_8, 1);
|
||||
lean_inc(x_22);
|
||||
x_23 = lean_ctor_get(x_8, 2);
|
||||
lean_inc(x_16);
|
||||
x_18 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_18, 0, x_16);
|
||||
x_19 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_19, 0, x_17);
|
||||
lean_inc(x_16);
|
||||
x_20 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_20, 0, x_16);
|
||||
x_21 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_21, 0, x_18);
|
||||
lean_ctor_set(x_21, 1, x_19);
|
||||
lean_ctor_set(x_21, 2, x_20);
|
||||
x_22 = x_21;
|
||||
x_23 = lean_ctor_get(x_8, 3);
|
||||
lean_inc(x_23);
|
||||
x_24 = lean_st_ref_get(x_9, x_21);
|
||||
x_24 = l_Lean_Elab_Term_getCurrMacroScope(x_4, x_5, x_6, x_7, x_8, x_9, x_15);
|
||||
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 = lean_ctor_get(x_25, 1);
|
||||
x_27 = lean_ctor_get(x_8, 1);
|
||||
lean_inc(x_27);
|
||||
lean_dec(x_25);
|
||||
lean_inc(x_16);
|
||||
x_28 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_28, 0, x_16);
|
||||
x_28 = lean_ctor_get(x_8, 2);
|
||||
lean_inc(x_28);
|
||||
x_29 = x_28;
|
||||
lean_inc(x_16);
|
||||
x_30 = lean_environment_main_module(x_16);
|
||||
x_31 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_31, 0, x_17);
|
||||
x_32 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_32, 0, x_16);
|
||||
x_33 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_33, 0, x_28);
|
||||
lean_ctor_set(x_33, 1, x_31);
|
||||
lean_ctor_set(x_33, 2, x_32);
|
||||
x_34 = x_33;
|
||||
x_35 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_35, 0, x_29);
|
||||
lean_ctor_set(x_35, 1, x_30);
|
||||
lean_ctor_set(x_35, 2, x_20);
|
||||
lean_ctor_set(x_35, 3, x_22);
|
||||
lean_ctor_set(x_35, 4, x_23);
|
||||
lean_ctor_set(x_35, 5, x_18);
|
||||
lean_ctor_set(x_35, 6, x_34);
|
||||
x_36 = lean_box(0);
|
||||
x_37 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_37, 0, x_27);
|
||||
lean_ctor_set(x_37, 1, x_36);
|
||||
x_38 = l_Lean_Elab_Term_expandMatchAltsIntoMatchTactic(x_1, x_12, x_35, x_37);
|
||||
x_39 = lean_ctor_get(x_38, 0);
|
||||
x_29 = lean_st_ref_get(x_9, x_26);
|
||||
x_30 = lean_ctor_get(x_29, 0);
|
||||
lean_inc(x_30);
|
||||
x_31 = lean_ctor_get(x_29, 1);
|
||||
lean_inc(x_31);
|
||||
lean_dec(x_29);
|
||||
x_32 = lean_ctor_get(x_30, 1);
|
||||
lean_inc(x_32);
|
||||
lean_dec(x_30);
|
||||
x_33 = lean_environment_main_module(x_16);
|
||||
lean_inc(x_22);
|
||||
x_34 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_34, 0, x_22);
|
||||
lean_ctor_set(x_34, 1, x_33);
|
||||
lean_ctor_set(x_34, 2, x_25);
|
||||
lean_ctor_set(x_34, 3, x_27);
|
||||
lean_ctor_set(x_34, 4, x_28);
|
||||
lean_ctor_set(x_34, 5, x_23);
|
||||
lean_ctor_set(x_34, 6, x_22);
|
||||
x_35 = lean_box(0);
|
||||
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 = l_Lean_Elab_Term_expandMatchAltsIntoMatchTactic(x_1, x_12, x_34, x_36);
|
||||
x_38 = lean_ctor_get(x_37, 0);
|
||||
lean_inc(x_38);
|
||||
x_39 = lean_ctor_get(x_37, 1);
|
||||
lean_inc(x_39);
|
||||
x_40 = lean_ctor_get(x_38, 1);
|
||||
lean_dec(x_37);
|
||||
x_40 = lean_ctor_get(x_39, 0);
|
||||
lean_inc(x_40);
|
||||
lean_dec(x_38);
|
||||
x_41 = lean_ctor_get(x_40, 0);
|
||||
lean_inc(x_41);
|
||||
lean_dec(x_40);
|
||||
x_42 = lean_st_ref_take(x_9, x_26);
|
||||
x_43 = lean_ctor_get(x_42, 0);
|
||||
lean_dec(x_39);
|
||||
x_41 = lean_st_ref_take(x_9, x_31);
|
||||
x_42 = lean_ctor_get(x_41, 0);
|
||||
lean_inc(x_42);
|
||||
x_43 = lean_ctor_get(x_41, 1);
|
||||
lean_inc(x_43);
|
||||
x_44 = lean_ctor_get(x_42, 1);
|
||||
lean_inc(x_44);
|
||||
lean_dec(x_42);
|
||||
x_45 = !lean_is_exclusive(x_43);
|
||||
if (x_45 == 0)
|
||||
lean_dec(x_41);
|
||||
x_44 = !lean_is_exclusive(x_42);
|
||||
if (x_44 == 0)
|
||||
{
|
||||
lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50;
|
||||
x_46 = lean_ctor_get(x_43, 1);
|
||||
lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49;
|
||||
x_45 = lean_ctor_get(x_42, 1);
|
||||
lean_dec(x_45);
|
||||
lean_ctor_set(x_42, 1, x_40);
|
||||
x_46 = lean_st_ref_set(x_9, x_42, x_43);
|
||||
x_47 = lean_ctor_get(x_46, 1);
|
||||
lean_inc(x_47);
|
||||
lean_dec(x_46);
|
||||
lean_ctor_set(x_43, 1, x_41);
|
||||
x_47 = lean_st_ref_set(x_9, x_43, x_44);
|
||||
x_48 = lean_ctor_get(x_47, 1);
|
||||
lean_inc(x_48);
|
||||
lean_dec(x_47);
|
||||
lean_inc(x_39);
|
||||
lean_inc(x_38);
|
||||
lean_inc(x_1);
|
||||
x_49 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_adaptExpander___lambda__1), 11, 2);
|
||||
lean_closure_set(x_49, 0, x_1);
|
||||
lean_closure_set(x_49, 1, x_39);
|
||||
x_50 = l_Lean_Elab_withMacroExpansionInfo___at_Lean_Elab_Tactic_adaptExpander___spec__1(x_1, x_39, x_49, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_48);
|
||||
return x_50;
|
||||
x_48 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_adaptExpander___lambda__1), 11, 2);
|
||||
lean_closure_set(x_48, 0, x_1);
|
||||
lean_closure_set(x_48, 1, x_38);
|
||||
x_49 = l_Lean_Elab_withMacroExpansionInfo___at_Lean_Elab_Tactic_adaptExpander___spec__1(x_1, x_38, x_48, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_47);
|
||||
return x_49;
|
||||
}
|
||||
else
|
||||
{
|
||||
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;
|
||||
x_51 = lean_ctor_get(x_43, 0);
|
||||
x_52 = lean_ctor_get(x_43, 2);
|
||||
x_53 = lean_ctor_get(x_43, 3);
|
||||
lean_inc(x_53);
|
||||
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;
|
||||
x_50 = lean_ctor_get(x_42, 0);
|
||||
x_51 = lean_ctor_get(x_42, 2);
|
||||
x_52 = lean_ctor_get(x_42, 3);
|
||||
lean_inc(x_52);
|
||||
lean_inc(x_51);
|
||||
lean_dec(x_43);
|
||||
x_54 = lean_alloc_ctor(0, 4, 0);
|
||||
lean_ctor_set(x_54, 0, x_51);
|
||||
lean_ctor_set(x_54, 1, x_41);
|
||||
lean_ctor_set(x_54, 2, x_52);
|
||||
lean_ctor_set(x_54, 3, x_53);
|
||||
x_55 = lean_st_ref_set(x_9, x_54, x_44);
|
||||
x_56 = lean_ctor_get(x_55, 1);
|
||||
lean_inc(x_56);
|
||||
lean_dec(x_55);
|
||||
lean_inc(x_39);
|
||||
lean_inc(x_50);
|
||||
lean_dec(x_42);
|
||||
x_53 = lean_alloc_ctor(0, 4, 0);
|
||||
lean_ctor_set(x_53, 0, x_50);
|
||||
lean_ctor_set(x_53, 1, x_40);
|
||||
lean_ctor_set(x_53, 2, x_51);
|
||||
lean_ctor_set(x_53, 3, x_52);
|
||||
x_54 = lean_st_ref_set(x_9, x_53, x_43);
|
||||
x_55 = lean_ctor_get(x_54, 1);
|
||||
lean_inc(x_55);
|
||||
lean_dec(x_54);
|
||||
lean_inc(x_38);
|
||||
lean_inc(x_1);
|
||||
x_57 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_adaptExpander___lambda__1), 11, 2);
|
||||
lean_closure_set(x_57, 0, x_1);
|
||||
lean_closure_set(x_57, 1, x_39);
|
||||
x_58 = l_Lean_Elab_withMacroExpansionInfo___at_Lean_Elab_Tactic_adaptExpander___spec__1(x_1, x_39, x_57, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_56);
|
||||
return x_58;
|
||||
x_56 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_adaptExpander___lambda__1), 11, 2);
|
||||
lean_closure_set(x_56, 0, x_1);
|
||||
lean_closure_set(x_56, 1, x_38);
|
||||
x_57 = l_Lean_Elab_withMacroExpansionInfo___at_Lean_Elab_Tactic_adaptExpander___spec__1(x_1, x_38, x_56, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_55);
|
||||
return x_57;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
|
|||
271
stage0/stdlib/Lean/Elab/Tactic/Match.c
generated
271
stage0/stdlib/Lean/Elab/Tactic/Match.c
generated
|
|
@ -2192,7 +2192,7 @@ lean_object* x_11;
|
|||
x_11 = l_Lean_Elab_Tactic_getMainTag(x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, 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_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; 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_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; 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; 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;
|
||||
x_12 = lean_ctor_get(x_11, 0);
|
||||
lean_inc(x_12);
|
||||
x_13 = lean_ctor_get(x_11, 1);
|
||||
|
|
@ -2209,133 +2209,132 @@ lean_inc(x_43);
|
|||
lean_dec(x_41);
|
||||
x_44 = lean_ctor_get(x_8, 4);
|
||||
lean_inc(x_44);
|
||||
x_45 = lean_ctor_get(x_8, 3);
|
||||
lean_inc(x_45);
|
||||
x_46 = l_Lean_Elab_Term_getCurrMacroScope(x_4, x_5, x_6, x_7, x_8, x_9, x_42);
|
||||
x_47 = lean_ctor_get(x_46, 0);
|
||||
lean_inc(x_47);
|
||||
x_48 = lean_ctor_get(x_46, 1);
|
||||
lean_inc(x_48);
|
||||
lean_dec(x_46);
|
||||
x_49 = lean_ctor_get(x_8, 1);
|
||||
lean_inc(x_49);
|
||||
x_50 = lean_ctor_get(x_8, 2);
|
||||
lean_inc(x_43);
|
||||
x_45 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_45, 0, x_43);
|
||||
x_46 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_46, 0, x_44);
|
||||
lean_inc(x_43);
|
||||
x_47 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_47, 0, x_43);
|
||||
x_48 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_48, 0, x_45);
|
||||
lean_ctor_set(x_48, 1, x_46);
|
||||
lean_ctor_set(x_48, 2, x_47);
|
||||
x_49 = x_48;
|
||||
x_50 = lean_ctor_get(x_8, 3);
|
||||
lean_inc(x_50);
|
||||
x_51 = lean_st_ref_get(x_9, x_48);
|
||||
x_51 = l_Lean_Elab_Term_getCurrMacroScope(x_4, x_5, x_6, x_7, x_8, x_9, x_42);
|
||||
x_52 = lean_ctor_get(x_51, 0);
|
||||
lean_inc(x_52);
|
||||
x_53 = lean_ctor_get(x_51, 1);
|
||||
lean_inc(x_53);
|
||||
lean_dec(x_51);
|
||||
x_54 = lean_ctor_get(x_52, 1);
|
||||
x_54 = lean_ctor_get(x_8, 1);
|
||||
lean_inc(x_54);
|
||||
lean_dec(x_52);
|
||||
lean_inc(x_43);
|
||||
x_55 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_55, 0, x_43);
|
||||
x_55 = lean_ctor_get(x_8, 2);
|
||||
lean_inc(x_55);
|
||||
x_56 = x_55;
|
||||
lean_inc(x_43);
|
||||
x_57 = lean_environment_main_module(x_43);
|
||||
x_58 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_58, 0, x_44);
|
||||
x_59 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_59, 0, x_43);
|
||||
x_60 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_60, 0, x_55);
|
||||
lean_ctor_set(x_60, 1, x_58);
|
||||
lean_ctor_set(x_60, 2, x_59);
|
||||
x_61 = x_60;
|
||||
x_62 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_62, 0, x_56);
|
||||
lean_ctor_set(x_62, 1, x_57);
|
||||
lean_ctor_set(x_62, 2, x_47);
|
||||
lean_ctor_set(x_62, 3, x_49);
|
||||
lean_ctor_set(x_62, 4, x_50);
|
||||
lean_ctor_set(x_62, 5, x_45);
|
||||
lean_ctor_set(x_62, 6, x_61);
|
||||
x_63 = lean_box(0);
|
||||
x_64 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_64, 0, x_54);
|
||||
lean_ctor_set(x_64, 1, x_63);
|
||||
x_56 = lean_st_ref_get(x_9, x_53);
|
||||
x_57 = lean_ctor_get(x_56, 0);
|
||||
lean_inc(x_57);
|
||||
x_58 = lean_ctor_get(x_56, 1);
|
||||
lean_inc(x_58);
|
||||
lean_dec(x_56);
|
||||
x_59 = lean_ctor_get(x_57, 1);
|
||||
lean_inc(x_59);
|
||||
lean_dec(x_57);
|
||||
x_60 = lean_environment_main_module(x_43);
|
||||
lean_inc(x_49);
|
||||
x_61 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_61, 0, x_49);
|
||||
lean_ctor_set(x_61, 1, x_60);
|
||||
lean_ctor_set(x_61, 2, x_52);
|
||||
lean_ctor_set(x_61, 3, x_54);
|
||||
lean_ctor_set(x_61, 4, x_55);
|
||||
lean_ctor_set(x_61, 5, x_50);
|
||||
lean_ctor_set(x_61, 6, x_49);
|
||||
x_62 = lean_box(0);
|
||||
x_63 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_63, 0, x_59);
|
||||
lean_ctor_set(x_63, 1, x_62);
|
||||
lean_inc(x_1);
|
||||
x_65 = l___private_Lean_Elab_Tactic_Match_0__Lean_Elab_Tactic_mkAuxiliaryMatchTerm(x_12, x_1, x_62, x_64);
|
||||
if (lean_obj_tag(x_65) == 0)
|
||||
x_64 = l___private_Lean_Elab_Tactic_Match_0__Lean_Elab_Tactic_mkAuxiliaryMatchTerm(x_12, x_1, x_61, x_63);
|
||||
if (lean_obj_tag(x_64) == 0)
|
||||
{
|
||||
lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; uint8_t x_72;
|
||||
x_66 = lean_ctor_get(x_65, 0);
|
||||
lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; uint8_t x_71;
|
||||
x_65 = lean_ctor_get(x_64, 0);
|
||||
lean_inc(x_65);
|
||||
x_66 = lean_ctor_get(x_64, 1);
|
||||
lean_inc(x_66);
|
||||
x_67 = lean_ctor_get(x_65, 1);
|
||||
lean_dec(x_64);
|
||||
x_67 = lean_ctor_get(x_66, 0);
|
||||
lean_inc(x_67);
|
||||
lean_dec(x_65);
|
||||
x_68 = lean_ctor_get(x_67, 0);
|
||||
lean_inc(x_68);
|
||||
lean_dec(x_67);
|
||||
x_69 = lean_st_ref_take(x_9, x_53);
|
||||
x_70 = lean_ctor_get(x_69, 0);
|
||||
lean_dec(x_66);
|
||||
x_68 = lean_st_ref_take(x_9, x_58);
|
||||
x_69 = lean_ctor_get(x_68, 0);
|
||||
lean_inc(x_69);
|
||||
x_70 = lean_ctor_get(x_68, 1);
|
||||
lean_inc(x_70);
|
||||
x_71 = lean_ctor_get(x_69, 1);
|
||||
lean_inc(x_71);
|
||||
lean_dec(x_69);
|
||||
x_72 = !lean_is_exclusive(x_70);
|
||||
if (x_72 == 0)
|
||||
lean_dec(x_68);
|
||||
x_71 = !lean_is_exclusive(x_69);
|
||||
if (x_71 == 0)
|
||||
{
|
||||
lean_object* x_73; lean_object* x_74; lean_object* x_75;
|
||||
x_73 = lean_ctor_get(x_70, 1);
|
||||
lean_object* x_72; lean_object* x_73; lean_object* x_74;
|
||||
x_72 = lean_ctor_get(x_69, 1);
|
||||
lean_dec(x_72);
|
||||
lean_ctor_set(x_69, 1, x_67);
|
||||
x_73 = lean_st_ref_set(x_9, x_69, x_70);
|
||||
x_74 = lean_ctor_get(x_73, 1);
|
||||
lean_inc(x_74);
|
||||
lean_dec(x_73);
|
||||
lean_ctor_set(x_70, 1, x_68);
|
||||
x_74 = lean_st_ref_set(x_9, x_70, x_71);
|
||||
x_75 = lean_ctor_get(x_74, 1);
|
||||
lean_inc(x_75);
|
||||
lean_dec(x_74);
|
||||
x_14 = x_66;
|
||||
x_15 = x_75;
|
||||
x_14 = x_65;
|
||||
x_15 = x_74;
|
||||
goto block_39;
|
||||
}
|
||||
else
|
||||
{
|
||||
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_70, 0);
|
||||
x_77 = lean_ctor_get(x_70, 2);
|
||||
x_78 = lean_ctor_get(x_70, 3);
|
||||
lean_inc(x_78);
|
||||
lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80;
|
||||
x_75 = lean_ctor_get(x_69, 0);
|
||||
x_76 = lean_ctor_get(x_69, 2);
|
||||
x_77 = lean_ctor_get(x_69, 3);
|
||||
lean_inc(x_77);
|
||||
lean_inc(x_76);
|
||||
lean_dec(x_70);
|
||||
x_79 = lean_alloc_ctor(0, 4, 0);
|
||||
lean_ctor_set(x_79, 0, x_76);
|
||||
lean_ctor_set(x_79, 1, x_68);
|
||||
lean_ctor_set(x_79, 2, x_77);
|
||||
lean_ctor_set(x_79, 3, x_78);
|
||||
x_80 = lean_st_ref_set(x_9, x_79, x_71);
|
||||
x_81 = lean_ctor_get(x_80, 1);
|
||||
lean_inc(x_81);
|
||||
lean_dec(x_80);
|
||||
x_14 = x_66;
|
||||
x_15 = x_81;
|
||||
lean_inc(x_75);
|
||||
lean_dec(x_69);
|
||||
x_78 = lean_alloc_ctor(0, 4, 0);
|
||||
lean_ctor_set(x_78, 0, x_75);
|
||||
lean_ctor_set(x_78, 1, x_67);
|
||||
lean_ctor_set(x_78, 2, x_76);
|
||||
lean_ctor_set(x_78, 3, x_77);
|
||||
x_79 = lean_st_ref_set(x_9, x_78, x_70);
|
||||
x_80 = lean_ctor_get(x_79, 1);
|
||||
lean_inc(x_80);
|
||||
lean_dec(x_79);
|
||||
x_14 = x_65;
|
||||
x_15 = x_80;
|
||||
goto block_39;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_82;
|
||||
lean_object* x_81;
|
||||
lean_dec(x_1);
|
||||
x_82 = lean_ctor_get(x_65, 0);
|
||||
lean_inc(x_82);
|
||||
lean_dec(x_65);
|
||||
if (lean_obj_tag(x_82) == 0)
|
||||
x_81 = lean_ctor_get(x_64, 0);
|
||||
lean_inc(x_81);
|
||||
lean_dec(x_64);
|
||||
if (lean_obj_tag(x_81) == 0)
|
||||
{
|
||||
lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; uint8_t x_88;
|
||||
x_83 = lean_ctor_get(x_82, 0);
|
||||
lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; uint8_t x_87;
|
||||
x_82 = lean_ctor_get(x_81, 0);
|
||||
lean_inc(x_82);
|
||||
x_83 = lean_ctor_get(x_81, 1);
|
||||
lean_inc(x_83);
|
||||
x_84 = lean_ctor_get(x_82, 1);
|
||||
lean_inc(x_84);
|
||||
lean_dec(x_82);
|
||||
x_85 = lean_alloc_ctor(2, 1, 0);
|
||||
lean_dec(x_81);
|
||||
x_84 = lean_alloc_ctor(2, 1, 0);
|
||||
lean_ctor_set(x_84, 0, x_83);
|
||||
x_85 = lean_alloc_ctor(0, 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 = l_Lean_throwErrorAt___at_Lean_Elab_Tactic_evalMatch___spec__1(x_83, x_86, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_53);
|
||||
x_86 = l_Lean_throwErrorAt___at_Lean_Elab_Tactic_evalMatch___spec__1(x_82, x_85, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_58);
|
||||
lean_dec(x_9);
|
||||
lean_dec(x_7);
|
||||
lean_dec(x_6);
|
||||
|
|
@ -2343,29 +2342,29 @@ lean_dec(x_5);
|
|||
lean_dec(x_4);
|
||||
lean_dec(x_3);
|
||||
lean_dec(x_2);
|
||||
lean_dec(x_83);
|
||||
x_88 = !lean_is_exclusive(x_87);
|
||||
if (x_88 == 0)
|
||||
lean_dec(x_82);
|
||||
x_87 = !lean_is_exclusive(x_86);
|
||||
if (x_87 == 0)
|
||||
{
|
||||
return x_87;
|
||||
return x_86;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_89; lean_object* x_90; lean_object* x_91;
|
||||
x_89 = lean_ctor_get(x_87, 0);
|
||||
x_90 = lean_ctor_get(x_87, 1);
|
||||
lean_inc(x_90);
|
||||
lean_object* x_88; lean_object* x_89; lean_object* x_90;
|
||||
x_88 = lean_ctor_get(x_86, 0);
|
||||
x_89 = lean_ctor_get(x_86, 1);
|
||||
lean_inc(x_89);
|
||||
lean_dec(x_87);
|
||||
x_91 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_91, 0, x_89);
|
||||
lean_ctor_set(x_91, 1, x_90);
|
||||
return x_91;
|
||||
lean_inc(x_88);
|
||||
lean_dec(x_86);
|
||||
x_90 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_90, 0, x_88);
|
||||
lean_ctor_set(x_90, 1, x_89);
|
||||
return x_90;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_92; uint8_t x_93;
|
||||
lean_object* x_91; uint8_t x_92;
|
||||
lean_dec(x_9);
|
||||
lean_dec(x_8);
|
||||
lean_dec(x_7);
|
||||
|
|
@ -2374,24 +2373,24 @@ lean_dec(x_5);
|
|||
lean_dec(x_4);
|
||||
lean_dec(x_3);
|
||||
lean_dec(x_2);
|
||||
x_92 = l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Tactic_evalMatch___spec__3___rarg(x_53);
|
||||
x_93 = !lean_is_exclusive(x_92);
|
||||
if (x_93 == 0)
|
||||
x_91 = l_Lean_Elab_throwUnsupportedSyntax___at_Lean_Elab_Tactic_evalMatch___spec__3___rarg(x_58);
|
||||
x_92 = !lean_is_exclusive(x_91);
|
||||
if (x_92 == 0)
|
||||
{
|
||||
return x_92;
|
||||
return x_91;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_94; lean_object* x_95; lean_object* x_96;
|
||||
x_94 = lean_ctor_get(x_92, 0);
|
||||
x_95 = lean_ctor_get(x_92, 1);
|
||||
lean_inc(x_95);
|
||||
lean_object* x_93; lean_object* x_94; lean_object* x_95;
|
||||
x_93 = lean_ctor_get(x_91, 0);
|
||||
x_94 = lean_ctor_get(x_91, 1);
|
||||
lean_inc(x_94);
|
||||
lean_dec(x_92);
|
||||
x_96 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_96, 0, x_94);
|
||||
lean_ctor_set(x_96, 1, x_95);
|
||||
return x_96;
|
||||
lean_inc(x_93);
|
||||
lean_dec(x_91);
|
||||
x_95 = lean_alloc_ctor(1, 2, 0);
|
||||
lean_ctor_set(x_95, 0, x_93);
|
||||
lean_ctor_set(x_95, 1, x_94);
|
||||
return x_95;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
@ -2447,7 +2446,7 @@ return x_38;
|
|||
}
|
||||
else
|
||||
{
|
||||
uint8_t x_97;
|
||||
uint8_t x_96;
|
||||
lean_dec(x_9);
|
||||
lean_dec(x_8);
|
||||
lean_dec(x_7);
|
||||
|
|
@ -2457,23 +2456,23 @@ lean_dec(x_4);
|
|||
lean_dec(x_3);
|
||||
lean_dec(x_2);
|
||||
lean_dec(x_1);
|
||||
x_97 = !lean_is_exclusive(x_11);
|
||||
if (x_97 == 0)
|
||||
x_96 = !lean_is_exclusive(x_11);
|
||||
if (x_96 == 0)
|
||||
{
|
||||
return x_11;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_98; lean_object* x_99; lean_object* x_100;
|
||||
x_98 = lean_ctor_get(x_11, 0);
|
||||
x_99 = lean_ctor_get(x_11, 1);
|
||||
lean_inc(x_99);
|
||||
lean_object* x_97; lean_object* x_98; lean_object* x_99;
|
||||
x_97 = lean_ctor_get(x_11, 0);
|
||||
x_98 = lean_ctor_get(x_11, 1);
|
||||
lean_inc(x_98);
|
||||
lean_inc(x_97);
|
||||
lean_dec(x_11);
|
||||
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;
|
||||
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;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
|
|||
1988
stage0/stdlib/Lean/Elab/Term.c
generated
1988
stage0/stdlib/Lean/Elab/Term.c
generated
File diff suppressed because it is too large
Load diff
376
stage0/stdlib/Lean/Elab/Util.c
generated
376
stage0/stdlib/Lean/Elab/Util.c
generated
|
|
@ -2256,90 +2256,76 @@ return x_7;
|
|||
lean_object* l_Lean_Elab_liftMacroM___rarg___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, lean_object* x_12) {
|
||||
_start:
|
||||
{
|
||||
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_inc(x_1);
|
||||
x_13 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_13, 0, x_1);
|
||||
lean_inc(x_13);
|
||||
x_14 = x_13;
|
||||
lean_inc(x_1);
|
||||
x_15 = lean_environment_main_module(x_1);
|
||||
x_16 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_16, 0, x_2);
|
||||
x_17 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_17, 0, x_1);
|
||||
x_18 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_18, 0, x_13);
|
||||
lean_ctor_set(x_18, 1, x_16);
|
||||
lean_ctor_set(x_18, 2, x_17);
|
||||
x_19 = x_18;
|
||||
x_20 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_20, 0, x_14);
|
||||
lean_ctor_set(x_20, 1, x_15);
|
||||
lean_ctor_set(x_20, 2, x_3);
|
||||
lean_ctor_set(x_20, 3, x_4);
|
||||
lean_ctor_set(x_20, 4, x_5);
|
||||
lean_ctor_set(x_20, 5, x_6);
|
||||
lean_ctor_set(x_20, 6, x_19);
|
||||
x_21 = lean_box(0);
|
||||
x_22 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_22, 0, x_12);
|
||||
lean_ctor_set(x_22, 1, x_21);
|
||||
x_23 = lean_apply_2(x_7, x_20, x_22);
|
||||
if (lean_obj_tag(x_23) == 0)
|
||||
lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17;
|
||||
x_13 = lean_environment_main_module(x_1);
|
||||
lean_inc(x_2);
|
||||
x_14 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_14, 0, x_2);
|
||||
lean_ctor_set(x_14, 1, x_13);
|
||||
lean_ctor_set(x_14, 2, x_3);
|
||||
lean_ctor_set(x_14, 3, x_4);
|
||||
lean_ctor_set(x_14, 4, x_5);
|
||||
lean_ctor_set(x_14, 5, x_6);
|
||||
lean_ctor_set(x_14, 6, x_2);
|
||||
x_15 = lean_box(0);
|
||||
x_16 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_16, 0, x_12);
|
||||
lean_ctor_set(x_16, 1, x_15);
|
||||
x_17 = lean_apply_2(x_7, x_14, x_16);
|
||||
if (lean_obj_tag(x_17) == 0)
|
||||
{
|
||||
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_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_11);
|
||||
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 = lean_ctor_get(x_8, 2);
|
||||
lean_inc(x_26);
|
||||
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_ctor_get(x_8, 2);
|
||||
lean_inc(x_20);
|
||||
lean_dec(x_8);
|
||||
x_27 = lean_ctor_get(x_25, 0);
|
||||
x_21 = lean_ctor_get(x_19, 0);
|
||||
lean_inc(x_21);
|
||||
lean_dec(x_19);
|
||||
x_22 = lean_apply_1(x_20, x_21);
|
||||
x_23 = lean_alloc_closure((void*)(l_ReaderT_instMonadReaderT___rarg___lambda__4___boxed), 3, 2);
|
||||
lean_closure_set(x_23, 0, x_9);
|
||||
lean_closure_set(x_23, 1, x_18);
|
||||
x_24 = lean_apply_4(x_10, lean_box(0), lean_box(0), x_22, x_23);
|
||||
return x_24;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_25;
|
||||
lean_dec(x_10);
|
||||
lean_dec(x_8);
|
||||
x_25 = lean_ctor_get(x_17, 0);
|
||||
lean_inc(x_25);
|
||||
lean_dec(x_17);
|
||||
if (lean_obj_tag(x_25) == 0)
|
||||
{
|
||||
lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30;
|
||||
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);
|
||||
x_28 = lean_apply_1(x_26, x_27);
|
||||
x_29 = lean_alloc_closure((void*)(l_ReaderT_instMonadReaderT___rarg___lambda__4___boxed), 3, 2);
|
||||
lean_closure_set(x_29, 0, x_9);
|
||||
lean_closure_set(x_29, 1, x_24);
|
||||
x_30 = lean_apply_4(x_10, lean_box(0), lean_box(0), x_28, x_29);
|
||||
x_28 = lean_alloc_ctor(2, 1, 0);
|
||||
lean_ctor_set(x_28, 0, x_27);
|
||||
x_29 = lean_alloc_ctor(0, 1, 0);
|
||||
lean_ctor_set(x_29, 0, x_28);
|
||||
x_30 = l_Lean_throwErrorAt___rarg(x_9, x_11, x_26, x_29);
|
||||
return x_30;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_31;
|
||||
lean_dec(x_10);
|
||||
lean_dec(x_8);
|
||||
x_31 = lean_ctor_get(x_23, 0);
|
||||
lean_inc(x_31);
|
||||
lean_dec(x_23);
|
||||
if (lean_obj_tag(x_31) == 0)
|
||||
{
|
||||
lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36;
|
||||
x_32 = lean_ctor_get(x_31, 0);
|
||||
lean_inc(x_32);
|
||||
x_33 = lean_ctor_get(x_31, 1);
|
||||
lean_inc(x_33);
|
||||
lean_dec(x_31);
|
||||
x_34 = lean_alloc_ctor(2, 1, 0);
|
||||
lean_ctor_set(x_34, 0, x_33);
|
||||
x_35 = lean_alloc_ctor(0, 1, 0);
|
||||
lean_ctor_set(x_35, 0, x_34);
|
||||
x_36 = l_Lean_throwErrorAt___rarg(x_9, x_11, x_32, x_35);
|
||||
return x_36;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_37; lean_object* x_38;
|
||||
lean_object* x_31; lean_object* x_32;
|
||||
lean_dec(x_9);
|
||||
x_37 = lean_ctor_get(x_11, 0);
|
||||
lean_inc(x_37);
|
||||
x_31 = lean_ctor_get(x_11, 0);
|
||||
lean_inc(x_31);
|
||||
lean_dec(x_11);
|
||||
x_38 = l_Lean_Elab_throwUnsupportedSyntax___rarg(x_37);
|
||||
return x_38;
|
||||
x_32 = l_Lean_Elab_throwUnsupportedSyntax___rarg(x_31);
|
||||
return x_32;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
@ -2436,24 +2422,37 @@ return x_12;
|
|||
lean_object* l_Lean_Elab_liftMacroM___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, 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 = lean_ctor_get(x_1, 1);
|
||||
lean_inc(x_9);
|
||||
x_10 = lean_ctor_get(x_9, 0);
|
||||
lean_inc(x_10);
|
||||
lean_dec(x_9);
|
||||
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_inc(x_1);
|
||||
x_9 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_9, 0, x_1);
|
||||
x_10 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_10, 0, x_8);
|
||||
lean_inc(x_1);
|
||||
x_11 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_11, 0, x_1);
|
||||
x_12 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_12, 0, x_9);
|
||||
lean_ctor_set(x_12, 1, x_10);
|
||||
lean_ctor_set(x_12, 2, x_11);
|
||||
x_13 = x_12;
|
||||
x_14 = lean_ctor_get(x_2, 1);
|
||||
lean_inc(x_14);
|
||||
x_15 = lean_ctor_get(x_14, 0);
|
||||
lean_inc(x_15);
|
||||
lean_dec(x_14);
|
||||
lean_inc(x_7);
|
||||
x_11 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__6), 9, 8);
|
||||
lean_closure_set(x_11, 0, x_2);
|
||||
lean_closure_set(x_11, 1, x_3);
|
||||
lean_closure_set(x_11, 2, x_4);
|
||||
lean_closure_set(x_11, 3, x_8);
|
||||
lean_closure_set(x_11, 4, x_5);
|
||||
lean_closure_set(x_11, 5, x_6);
|
||||
lean_closure_set(x_11, 6, x_7);
|
||||
lean_closure_set(x_11, 7, x_1);
|
||||
x_12 = lean_apply_4(x_7, lean_box(0), lean_box(0), x_10, x_11);
|
||||
return x_12;
|
||||
x_16 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__6), 9, 8);
|
||||
lean_closure_set(x_16, 0, x_3);
|
||||
lean_closure_set(x_16, 1, x_4);
|
||||
lean_closure_set(x_16, 2, x_1);
|
||||
lean_closure_set(x_16, 3, x_13);
|
||||
lean_closure_set(x_16, 4, x_5);
|
||||
lean_closure_set(x_16, 5, x_6);
|
||||
lean_closure_set(x_16, 6, x_7);
|
||||
lean_closure_set(x_16, 7, x_2);
|
||||
x_17 = lean_apply_4(x_7, lean_box(0), lean_box(0), x_15, x_16);
|
||||
return x_17;
|
||||
}
|
||||
}
|
||||
lean_object* l_Lean_Elab_liftMacroM___rarg___lambda__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) {
|
||||
|
|
@ -2465,10 +2464,10 @@ lean_inc(x_9);
|
|||
lean_dec(x_1);
|
||||
lean_inc(x_7);
|
||||
x_10 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__7), 8, 7);
|
||||
lean_closure_set(x_10, 0, x_2);
|
||||
lean_closure_set(x_10, 1, x_3);
|
||||
lean_closure_set(x_10, 2, x_4);
|
||||
lean_closure_set(x_10, 3, x_8);
|
||||
lean_closure_set(x_10, 0, x_8);
|
||||
lean_closure_set(x_10, 1, x_2);
|
||||
lean_closure_set(x_10, 2, x_3);
|
||||
lean_closure_set(x_10, 3, x_4);
|
||||
lean_closure_set(x_10, 4, x_5);
|
||||
lean_closure_set(x_10, 5, x_6);
|
||||
lean_closure_set(x_10, 6, x_7);
|
||||
|
|
@ -2528,90 +2527,76 @@ return x_5;
|
|||
lean_object* l_Lean_Elab_adaptMacro___rarg___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, lean_object* x_13) {
|
||||
_start:
|
||||
{
|
||||
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_inc(x_1);
|
||||
x_14 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_14, 0, x_1);
|
||||
lean_inc(x_14);
|
||||
x_15 = x_14;
|
||||
lean_inc(x_1);
|
||||
x_16 = lean_environment_main_module(x_1);
|
||||
x_17 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_17, 0, x_2);
|
||||
x_18 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_18, 0, x_1);
|
||||
x_19 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_19, 0, x_14);
|
||||
lean_ctor_set(x_19, 1, x_17);
|
||||
lean_ctor_set(x_19, 2, x_18);
|
||||
x_20 = x_19;
|
||||
x_21 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_21, 0, x_15);
|
||||
lean_ctor_set(x_21, 1, x_16);
|
||||
lean_ctor_set(x_21, 2, x_3);
|
||||
lean_ctor_set(x_21, 3, x_4);
|
||||
lean_ctor_set(x_21, 4, x_5);
|
||||
lean_ctor_set(x_21, 5, x_6);
|
||||
lean_ctor_set(x_21, 6, x_20);
|
||||
x_22 = lean_box(0);
|
||||
x_23 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_23, 0, x_13);
|
||||
lean_ctor_set(x_23, 1, x_22);
|
||||
x_24 = lean_apply_3(x_7, x_8, x_21, x_23);
|
||||
if (lean_obj_tag(x_24) == 0)
|
||||
lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18;
|
||||
x_14 = lean_environment_main_module(x_1);
|
||||
lean_inc(x_2);
|
||||
x_15 = lean_alloc_ctor(0, 7, 0);
|
||||
lean_ctor_set(x_15, 0, x_2);
|
||||
lean_ctor_set(x_15, 1, x_14);
|
||||
lean_ctor_set(x_15, 2, x_3);
|
||||
lean_ctor_set(x_15, 3, x_4);
|
||||
lean_ctor_set(x_15, 4, x_5);
|
||||
lean_ctor_set(x_15, 5, x_6);
|
||||
lean_ctor_set(x_15, 6, x_2);
|
||||
x_16 = lean_box(0);
|
||||
x_17 = lean_alloc_ctor(0, 2, 0);
|
||||
lean_ctor_set(x_17, 0, x_13);
|
||||
lean_ctor_set(x_17, 1, x_16);
|
||||
x_18 = lean_apply_3(x_7, x_8, x_15, x_17);
|
||||
if (lean_obj_tag(x_18) == 0)
|
||||
{
|
||||
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_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_dec(x_12);
|
||||
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 = lean_ctor_get(x_9, 2);
|
||||
lean_inc(x_27);
|
||||
x_19 = lean_ctor_get(x_18, 0);
|
||||
lean_inc(x_19);
|
||||
x_20 = lean_ctor_get(x_18, 1);
|
||||
lean_inc(x_20);
|
||||
lean_dec(x_18);
|
||||
x_21 = lean_ctor_get(x_9, 2);
|
||||
lean_inc(x_21);
|
||||
lean_dec(x_9);
|
||||
x_28 = lean_ctor_get(x_26, 0);
|
||||
x_22 = lean_ctor_get(x_20, 0);
|
||||
lean_inc(x_22);
|
||||
lean_dec(x_20);
|
||||
x_23 = lean_apply_1(x_21, x_22);
|
||||
x_24 = lean_alloc_closure((void*)(l_ReaderT_instMonadReaderT___rarg___lambda__4___boxed), 3, 2);
|
||||
lean_closure_set(x_24, 0, x_10);
|
||||
lean_closure_set(x_24, 1, x_19);
|
||||
x_25 = lean_apply_4(x_11, lean_box(0), lean_box(0), x_23, x_24);
|
||||
return x_25;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_26;
|
||||
lean_dec(x_11);
|
||||
lean_dec(x_9);
|
||||
x_26 = lean_ctor_get(x_18, 0);
|
||||
lean_inc(x_26);
|
||||
lean_dec(x_18);
|
||||
if (lean_obj_tag(x_26) == 0)
|
||||
{
|
||||
lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31;
|
||||
x_27 = lean_ctor_get(x_26, 0);
|
||||
lean_inc(x_27);
|
||||
x_28 = lean_ctor_get(x_26, 1);
|
||||
lean_inc(x_28);
|
||||
lean_dec(x_26);
|
||||
x_29 = lean_apply_1(x_27, x_28);
|
||||
x_30 = lean_alloc_closure((void*)(l_ReaderT_instMonadReaderT___rarg___lambda__4___boxed), 3, 2);
|
||||
lean_closure_set(x_30, 0, x_10);
|
||||
lean_closure_set(x_30, 1, x_25);
|
||||
x_31 = lean_apply_4(x_11, lean_box(0), lean_box(0), x_29, x_30);
|
||||
x_29 = lean_alloc_ctor(2, 1, 0);
|
||||
lean_ctor_set(x_29, 0, x_28);
|
||||
x_30 = lean_alloc_ctor(0, 1, 0);
|
||||
lean_ctor_set(x_30, 0, x_29);
|
||||
x_31 = l_Lean_throwErrorAt___rarg(x_10, x_12, x_27, x_30);
|
||||
return x_31;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_32;
|
||||
lean_dec(x_11);
|
||||
lean_dec(x_9);
|
||||
x_32 = lean_ctor_get(x_24, 0);
|
||||
lean_inc(x_32);
|
||||
lean_dec(x_24);
|
||||
if (lean_obj_tag(x_32) == 0)
|
||||
{
|
||||
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_32, 0);
|
||||
lean_inc(x_33);
|
||||
x_34 = lean_ctor_get(x_32, 1);
|
||||
lean_inc(x_34);
|
||||
lean_dec(x_32);
|
||||
x_35 = lean_alloc_ctor(2, 1, 0);
|
||||
lean_ctor_set(x_35, 0, x_34);
|
||||
x_36 = lean_alloc_ctor(0, 1, 0);
|
||||
lean_ctor_set(x_36, 0, x_35);
|
||||
x_37 = l_Lean_throwErrorAt___rarg(x_10, x_12, x_33, x_36);
|
||||
return x_37;
|
||||
}
|
||||
else
|
||||
{
|
||||
lean_object* x_38; lean_object* x_39;
|
||||
lean_object* x_32; lean_object* x_33;
|
||||
lean_dec(x_10);
|
||||
x_38 = lean_ctor_get(x_12, 0);
|
||||
lean_inc(x_38);
|
||||
x_32 = lean_ctor_get(x_12, 0);
|
||||
lean_inc(x_32);
|
||||
lean_dec(x_12);
|
||||
x_39 = l_Lean_Elab_throwUnsupportedSyntax___rarg(x_38);
|
||||
return x_39;
|
||||
x_33 = l_Lean_Elab_throwUnsupportedSyntax___rarg(x_32);
|
||||
return x_33;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
@ -2712,25 +2697,38 @@ return x_13;
|
|||
lean_object* l_Lean_Elab_adaptMacro___rarg___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, lean_object* x_9) {
|
||||
_start:
|
||||
{
|
||||
lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13;
|
||||
x_10 = lean_ctor_get(x_1, 1);
|
||||
lean_inc(x_10);
|
||||
x_11 = lean_ctor_get(x_10, 0);
|
||||
lean_inc(x_11);
|
||||
lean_dec(x_10);
|
||||
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_inc(x_1);
|
||||
x_10 = lean_alloc_closure((void*)(l___private_Lean_Elab_Util_0__Lean_Elab_expandMacro_x3f___boxed), 4, 1);
|
||||
lean_closure_set(x_10, 0, x_1);
|
||||
x_11 = lean_alloc_closure((void*)(l_ReaderT_pure___at_Lean_Elab_liftMacroM___spec__1___rarg___boxed), 3, 1);
|
||||
lean_closure_set(x_11, 0, x_9);
|
||||
lean_inc(x_1);
|
||||
x_12 = lean_alloc_closure((void*)(l_Lean_Elab_liftMacroM___rarg___lambda__1___boxed), 4, 1);
|
||||
lean_closure_set(x_12, 0, x_1);
|
||||
x_13 = lean_alloc_ctor(0, 3, 0);
|
||||
lean_ctor_set(x_13, 0, x_10);
|
||||
lean_ctor_set(x_13, 1, x_11);
|
||||
lean_ctor_set(x_13, 2, x_12);
|
||||
x_14 = x_13;
|
||||
x_15 = lean_ctor_get(x_2, 1);
|
||||
lean_inc(x_15);
|
||||
x_16 = lean_ctor_get(x_15, 0);
|
||||
lean_inc(x_16);
|
||||
lean_dec(x_15);
|
||||
lean_inc(x_8);
|
||||
x_12 = lean_alloc_closure((void*)(l_Lean_Elab_adaptMacro___rarg___lambda__5), 10, 9);
|
||||
lean_closure_set(x_12, 0, x_2);
|
||||
lean_closure_set(x_12, 1, x_3);
|
||||
lean_closure_set(x_12, 2, x_4);
|
||||
lean_closure_set(x_12, 3, x_9);
|
||||
lean_closure_set(x_12, 4, x_5);
|
||||
lean_closure_set(x_12, 5, x_6);
|
||||
lean_closure_set(x_12, 6, x_7);
|
||||
lean_closure_set(x_12, 7, x_8);
|
||||
lean_closure_set(x_12, 8, x_1);
|
||||
x_13 = lean_apply_4(x_8, lean_box(0), lean_box(0), x_11, x_12);
|
||||
return x_13;
|
||||
x_17 = lean_alloc_closure((void*)(l_Lean_Elab_adaptMacro___rarg___lambda__5), 10, 9);
|
||||
lean_closure_set(x_17, 0, x_3);
|
||||
lean_closure_set(x_17, 1, x_4);
|
||||
lean_closure_set(x_17, 2, x_1);
|
||||
lean_closure_set(x_17, 3, x_14);
|
||||
lean_closure_set(x_17, 4, x_5);
|
||||
lean_closure_set(x_17, 5, x_6);
|
||||
lean_closure_set(x_17, 6, x_7);
|
||||
lean_closure_set(x_17, 7, x_8);
|
||||
lean_closure_set(x_17, 8, x_2);
|
||||
x_18 = lean_apply_4(x_8, lean_box(0), lean_box(0), x_16, x_17);
|
||||
return x_18;
|
||||
}
|
||||
}
|
||||
lean_object* l_Lean_Elab_adaptMacro___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, lean_object* x_7, lean_object* x_8, lean_object* x_9) {
|
||||
|
|
@ -2742,10 +2740,10 @@ lean_inc(x_10);
|
|||
lean_dec(x_1);
|
||||
lean_inc(x_8);
|
||||
x_11 = lean_alloc_closure((void*)(l_Lean_Elab_adaptMacro___rarg___lambda__6), 9, 8);
|
||||
lean_closure_set(x_11, 0, x_2);
|
||||
lean_closure_set(x_11, 1, x_3);
|
||||
lean_closure_set(x_11, 2, x_4);
|
||||
lean_closure_set(x_11, 3, x_9);
|
||||
lean_closure_set(x_11, 0, x_9);
|
||||
lean_closure_set(x_11, 1, x_2);
|
||||
lean_closure_set(x_11, 2, x_3);
|
||||
lean_closure_set(x_11, 3, x_4);
|
||||
lean_closure_set(x_11, 4, x_5);
|
||||
lean_closure_set(x_11, 5, x_6);
|
||||
lean_closure_set(x_11, 6, x_7);
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue