/* GHC_PACKAGES base-1.0 rts-1.0 */ #include "Stg.h" #include "HsBase.h" __STG_SPLIT_MARKER EI_(GHCziBase_Czh_static_info); StgWord Foo_foo10_closure[] = { (W_)&GHCziBase_Czh_static_info, 0x63U }; __STG_SPLIT_MARKER EI_(Foo_foo9_info); StgWord Foo_foo9_closure[] = { (W_)&Foo_foo9_info, 0x0, 0x0, 0x0 }; StgWord Foo_foo9_info[] = { 0x20000U, 0x18U }; EI_(Foo_foo10_closure); FN_(Foo_foo9_entry) { FB_ if (((W_)Sp - 0x8U) < (W_)SpLim) goto _c1x8; Hp=Hp+3; if ((W_)Hp > (W_)HpLim) goto _c1x8; Hp[-2] = (W_)&stg_CAF_BLACKHOLE_info; CALLER_SAVE_R1 CALLER_SAVE_SYSTEM newCAF((void *)(W_)R1.w); CALLER_RESTORE_SYSTEM CALLER_RESTORE_R1 R1.p[1] = (W_)Hp-8; *R1.p = (W_)&stg_IND_STATIC_info; Sp[-2] = (W_)&stg_upd_frame_info; Sp[-1] = (W_)Hp-8; R1.p = (P_)(W_)&Foo_foo10_closure; Sp=Sp-2; JMP_((W_)&stg_upd_frame_info); _c1x8: HpAlloc = 0xcU; JMP_(stg_gc_enter_1); FE_ } __STG_SPLIT_MARKER EI_(Foo_foo8_info); StgWord Foo_foo8_closure[] = { (W_)&Foo_foo8_info, 0x0, 0x0, 0x0 }; StgWord Foo_foo8_info[] = { 0x20000U, 0x18U }; EI_(Foo_foo10_closure); FN_(Foo_foo8_entry) { FB_ if (((W_)Sp - 0x8U) < (W_)SpLim) goto _c1xd; Hp=Hp+3; if ((W_)Hp > (W_)HpLim) goto _c1xd; Hp[-2] = (W_)&stg_CAF_BLACKHOLE_info; CALLER_SAVE_R1 CALLER_SAVE_SYSTEM newCAF((void *)(W_)R1.w); CALLER_RESTORE_SYSTEM CALLER_RESTORE_R1 R1.p[1] = (W_)Hp-8; *R1.p = (W_)&stg_IND_STATIC_info; Sp[-2] = (W_)&stg_upd_frame_info; Sp[-1] = (W_)Hp-8; R1.p = (P_)(W_)&Foo_foo10_closure; Sp=Sp-2; JMP_((W_)&stg_upd_frame_info); _c1xd: HpAlloc = 0xcU; JMP_(stg_gc_enter_1); FE_ } __STG_SPLIT_MARKER EI_(Foo_foo7_info); StgWord Foo_foo7_closure[] = { (W_)&Foo_foo7_info, 0x0, 0x0, 0x0 }; StgWord Foo_foo7_info[] = { 0x20000U, 0x18U }; EI_(Foo_foo10_closure); FN_(Foo_foo7_entry) { FB_ if (((W_)Sp - 0x8U) < (W_)SpLim) goto _c1xi; Hp=Hp+3; if ((W_)Hp > (W_)HpLim) goto _c1xi; Hp[-2] = (W_)&stg_CAF_BLACKHOLE_info; CALLER_SAVE_R1 CALLER_SAVE_SYSTEM newCAF((void *)(W_)R1.w); CALLER_RESTORE_SYSTEM CALLER_RESTORE_R1 R1.p[1] = (W_)Hp-8; *R1.p = (W_)&stg_IND_STATIC_info; Sp[-2] = (W_)&stg_upd_frame_info; Sp[-1] = (W_)Hp-8; R1.p = (P_)(W_)&Foo_foo10_closure; Sp=Sp-2; JMP_((W_)&stg_upd_frame_info); _c1xi: HpAlloc = 0xcU; JMP_(stg_gc_enter_1); FE_ } __STG_SPLIT_MARKER EI_(Foo_foo6_info); StgWord Foo_foo6_closure[] = { (W_)&Foo_foo6_info, 0x0, 0x0, 0x0 }; StgWord Foo_foo6_info[] = { 0x20000U, 0x18U }; EI_(Foo_foo10_closure); FN_(Foo_foo6_entry) { FB_ if (((W_)Sp - 0x8U) < (W_)SpLim) goto _c1xn; Hp=Hp+3; if ((W_)Hp > (W_)HpLim) goto _c1xn; Hp[-2] = (W_)&stg_CAF_BLACKHOLE_info; CALLER_SAVE_R1 CALLER_SAVE_SYSTEM newCAF((void *)(W_)R1.w); CALLER_RESTORE_SYSTEM CALLER_RESTORE_R1 R1.p[1] = (W_)Hp-8; *R1.p = (W_)&stg_IND_STATIC_info; Sp[-2] = (W_)&stg_upd_frame_info; Sp[-1] = (W_)Hp-8; R1.p = (P_)(W_)&Foo_foo10_closure; Sp=Sp-2; JMP_((W_)&stg_upd_frame_info); _c1xn: HpAlloc = 0xcU; JMP_(stg_gc_enter_1); FE_ } __STG_SPLIT_MARKER EI_(Foo_foo5_info); StgWord Foo_foo5_closure[] = { (W_)&Foo_foo5_info, 0x0, 0x0, 0x0 }; StgWord Foo_foo5_info[] = { 0x20000U, 0x18U }; EI_(Foo_foo10_closure); FN_(Foo_foo5_entry) { FB_ if (((W_)Sp - 0x8U) < (W_)SpLim) goto _c1xs; Hp=Hp+3; if ((W_)Hp > (W_)HpLim) goto _c1xs; Hp[-2] = (W_)&stg_CAF_BLACKHOLE_info; CALLER_SAVE_R1 CALLER_SAVE_SYSTEM newCAF((void *)(W_)R1.w); CALLER_RESTORE_SYSTEM CALLER_RESTORE_R1 R1.p[1] = (W_)Hp-8; *R1.p = (W_)&stg_IND_STATIC_info; Sp[-2] = (W_)&stg_upd_frame_info; Sp[-1] = (W_)Hp-8; R1.p = (P_)(W_)&Foo_foo10_closure; Sp=Sp-2; JMP_((W_)&stg_upd_frame_info); _c1xs: HpAlloc = 0xcU; JMP_(stg_gc_enter_1); FE_ } __STG_SPLIT_MARKER EI_(Foo_foo4_info); StgWord Foo_foo4_closure[] = { (W_)&Foo_foo4_info, 0x0, 0x0, 0x0 }; StgWord Foo_foo4_info[] = { 0x20000U, 0x18U }; EI_(Foo_foo10_closure); FN_(Foo_foo4_entry) { FB_ if (((W_)Sp - 0x8U) < (W_)SpLim) goto _c1xx; Hp=Hp+3; if ((W_)Hp > (W_)HpLim) goto _c1xx; Hp[-2] = (W_)&stg_CAF_BLACKHOLE_info; CALLER_SAVE_R1 CALLER_SAVE_SYSTEM newCAF((void *)(W_)R1.w); CALLER_RESTORE_SYSTEM CALLER_RESTORE_R1 R1.p[1] = (W_)Hp-8; *R1.p = (W_)&stg_IND_STATIC_info; Sp[-2] = (W_)&stg_upd_frame_info; Sp[-1] = (W_)Hp-8; R1.p = (P_)(W_)&Foo_foo10_closure; Sp=Sp-2; JMP_((W_)&stg_upd_frame_info); _c1xx: HpAlloc = 0xcU; JMP_(stg_gc_enter_1); FE_ } __STG_SPLIT_MARKER EI_(Foo_foo3_info); StgWord Foo_foo3_closure[] = { (W_)&Foo_foo3_info, 0x0, 0x0, 0x0 }; StgWord Foo_foo3_info[] = { 0x20000U, 0x18U }; EI_(Foo_foo10_closure); FN_(Foo_foo3_entry) { FB_ if (((W_)Sp - 0x8U) < (W_)SpLim) goto _c1xC; Hp=Hp+3; if ((W_)Hp > (W_)HpLim) goto _c1xC; Hp[-2] = (W_)&stg_CAF_BLACKHOLE_info; CALLER_SAVE_R1 CALLER_SAVE_SYSTEM newCAF((void *)(W_)R1.w); CALLER_RESTORE_SYSTEM CALLER_RESTORE_R1 R1.p[1] = (W_)Hp-8; *R1.p = (W_)&stg_IND_STATIC_info; Sp[-2] = (W_)&stg_upd_frame_info; Sp[-1] = (W_)Hp-8; R1.p = (P_)(W_)&Foo_foo10_closure; Sp=Sp-2; JMP_((W_)&stg_upd_frame_info); _c1xC: HpAlloc = 0xcU; JMP_(stg_gc_enter_1); FE_ } __STG_SPLIT_MARKER EI_(Foo_foo2_info); StgWord Foo_foo2_closure[] = { (W_)&Foo_foo2_info, 0x0, 0x0, 0x0 }; StgWord Foo_foo2_info[] = { 0x20000U, 0x18U }; EI_(Foo_foo10_closure); FN_(Foo_foo2_entry) { FB_ if (((W_)Sp - 0x8U) < (W_)SpLim) goto _c1xH; Hp=Hp+3; if ((W_)Hp > (W_)HpLim) goto _c1xH; Hp[-2] = (W_)&stg_CAF_BLACKHOLE_info; CALLER_SAVE_R1 CALLER_SAVE_SYSTEM newCAF((void *)(W_)R1.w); CALLER_RESTORE_SYSTEM CALLER_RESTORE_R1 R1.p[1] = (W_)Hp-8; *R1.p = (W_)&stg_IND_STATIC_info; Sp[-2] = (W_)&stg_upd_frame_info; Sp[-1] = (W_)Hp-8; R1.p = (P_)(W_)&Foo_foo10_closure; Sp=Sp-2; JMP_((W_)&stg_upd_frame_info); _c1xH: HpAlloc = 0xcU; JMP_(stg_gc_enter_1); FE_ } __STG_SPLIT_MARKER EI_(Foo_foo1_info); StgWord Foo_foo1_closure[] = { (W_)&Foo_foo1_info, 0x0, 0x0, 0x0 }; StgWord Foo_foo1_info[] = { 0x20000U, 0x18U }; EI_(Foo_foo10_closure); FN_(Foo_foo1_entry) { FB_ if (((W_)Sp - 0x8U) < (W_)SpLim) goto _c1xM; Hp=Hp+3; if ((W_)Hp > (W_)HpLim) goto _c1xM; Hp[-2] = (W_)&stg_CAF_BLACKHOLE_info; CALLER_SAVE_R1 CALLER_SAVE_SYSTEM newCAF((void *)(W_)R1.w); CALLER_RESTORE_SYSTEM CALLER_RESTORE_R1 R1.p[1] = (W_)Hp-8; *R1.p = (W_)&stg_IND_STATIC_info; Sp[-2] = (W_)&stg_upd_frame_info; Sp[-1] = (W_)Hp-8; R1.p = (P_)(W_)&Foo_foo10_closure; Sp=Sp-2; JMP_((W_)&stg_upd_frame_info); _c1xM: HpAlloc = 0xcU; JMP_(stg_gc_enter_1); FE_ } __STG_SPLIT_MARKER static StgWord _module_registered[] = { 0x0 }; EF_(__stginit_Prelude_); FN_(__stginit_Foo_) { FB_ if (0x0 != (*((P_)(W_)&_module_registered))) goto _c1xO; goto _c1xQ; _c1xO: Sp=Sp+1; JMP_(Sp[-1]); _c1xQ: *((P_)(W_)&_module_registered) = 0x1U; Sp=Sp-1; *Sp = (W_)&__stginit_Prelude_; goto _c1xO; FE_ } EF_(__stginit_Foo_); FN_(__stginit_Foo) { FB_ JMP_((W_)&__stginit_Foo_); FE_ }