Skip to content

Instantly share code, notes, and snippets.

@valyagolev
Created March 31, 2010 20:11
Show Gist options
  • Save valyagolev/350815 to your computer and use it in GitHub Desktop.
Save valyagolev/350815 to your computer and use it in GitHub Desktop.
/* GHC_PACKAGES haskell98 random-1.0.0.1 process-1.0.1.1 directory-1.0.0.3 old-time-1.0.0.2 old-locale-1.0.0.1 filepath-1.1.0.2 Win32-2.2.0.0 bytestring-0.9.1.4 array-0.2.0.0 syb base integer ghc-prim rts
*/
#include "Stg.h"
EI_(base_GHCziFloat_zdf8_closure);
static StgWord rJp_srt[] = {
(W_)&base_GHCziFloat_zdf8_closure
};
II_(rJp_info);
static StgWord rJp_closure[] = {
(W_)&rJp_info, 0x0, 0x0, 0x0
};
static StgWord rJp_info[] = {
((W_)&rJp_srt+0), 0x0, 0x10016U
};
EI_(base_GHCziFloat_zdf8_closure);
EI_(base_GHCziReal_zdp2Real_info);
IF_(rJp_entry) {
FB_
if ((W_)(((W_)Sp - 0xcU) < (W_)SpLim)) goto _cLt;
Hp=Hp+2;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cLt;
Hp[-1] = (W_)&stg_CAF_BLACKHOLE_info;
;EF_(newCAF);
{void (*ghcFunPtr)(void *);
ghcFunPtr = ((void (*)(void *))(W_)&newCAF);
ghcFunPtr((void *)R1.w);;}
R1.p[1] = (W_)Hp-4;
*R1.p = (W_)&stg_IND_STATIC_info;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = (W_)Hp-4;
Sp[-3] = (W_)&base_GHCziFloat_zdf8_closure;
Sp=Sp-3;
JMP_((W_)&base_GHCziReal_zdp2Real_info);
_cLt:
HpAlloc = 0x8U;
JMP_(stg_gc_enter_1);
FE_
}
EI_(base_GHCziFloat_zdf6_closure);
static StgWord rJr_srt[] = {
(W_)&base_GHCziFloat_zdf6_closure
};
II_(rJr_info);
static StgWord rJr_closure[] = {
(W_)&rJr_info, 0x0, 0x0, 0x0
};
static StgWord rJr_info[] = {
((W_)&rJr_srt+0), 0x0, 0x10016U
};
EI_(base_GHCziFloat_zdf6_closure);
EI_(base_GHCziFloat_zdp1Floating_info);
IF_(rJr_entry) {
FB_
if ((W_)(((W_)Sp - 0xcU) < (W_)SpLim)) goto _cLD;
Hp=Hp+2;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cLD;
Hp[-1] = (W_)&stg_CAF_BLACKHOLE_info;
;EF_(newCAF);
{void (*ghcFunPtr)(void *);
ghcFunPtr = ((void (*)(void *))(W_)&newCAF);
ghcFunPtr((void *)R1.w);;}
R1.p[1] = (W_)Hp-4;
*R1.p = (W_)&stg_IND_STATIC_info;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = (W_)Hp-4;
Sp[-3] = (W_)&base_GHCziFloat_zdf6_closure;
Sp=Sp-3;
JMP_((W_)&base_GHCziFloat_zdp1Floating_info);
_cLD:
HpAlloc = 0x8U;
JMP_(stg_gc_enter_1);
FE_
}
II_(rJr_closure);
static StgWord rJt_srt[] = {
(W_)&rJr_closure
};
II_(rJt_info);
static StgWord rJt_closure[] = {
(W_)&rJt_info, 0x0, 0x0, 0x0
};
static StgWord rJt_info[] = {
((W_)&rJt_srt+0), 0x0, 0x10016U
};
EI_(base_GHCziReal_zdp1Fractional_info);
II_(rJr_closure);
IF_(rJt_entry) {
FB_
if ((W_)(((W_)Sp - 0xcU) < (W_)SpLim)) goto _cLN;
Hp=Hp+2;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cLN;
Hp[-1] = (W_)&stg_CAF_BLACKHOLE_info;
;EF_(newCAF);
{void (*ghcFunPtr)(void *);
ghcFunPtr = ((void (*)(void *))(W_)&newCAF);
ghcFunPtr((void *)R1.w);;}
R1.p[1] = (W_)Hp-4;
*R1.p = (W_)&stg_IND_STATIC_info;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = (W_)Hp-4;
Sp[-3] = (W_)&rJr_closure;
Sp=Sp-3;
JMP_((W_)&base_GHCziReal_zdp1Fractional_info);
_cLN:
HpAlloc = 0x8U;
JMP_(stg_gc_enter_1);
FE_
}
II_(rJt_closure);
static StgWord rJv_srt[] = {
(W_)&rJt_closure
};
II_(rJv_info);
static StgWord rJv_closure[] = {
(W_)&rJv_info, 0x0, 0x0, 0x0
};
static StgWord rJv_info[] = {
((W_)&rJv_srt+0), 0x0, 0x10016U
};
EI_(base_GHCziNum_zdp2Num_info);
II_(rJt_closure);
IF_(rJv_entry) {
FB_
if ((W_)(((W_)Sp - 0xcU) < (W_)SpLim)) goto _cLX;
Hp=Hp+2;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cLX;
Hp[-1] = (W_)&stg_CAF_BLACKHOLE_info;
;EF_(newCAF);
{void (*ghcFunPtr)(void *);
ghcFunPtr = ((void (*)(void *))(W_)&newCAF);
ghcFunPtr((void *)R1.w);;}
R1.p[1] = (W_)Hp-4;
*R1.p = (W_)&stg_IND_STATIC_info;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = (W_)Hp-4;
Sp[-3] = (W_)&rJt_closure;
Sp=Sp-3;
JMP_((W_)&base_GHCziNum_zdp2Num_info);
_cLX:
HpAlloc = 0x8U;
JMP_(stg_gc_enter_1);
FE_
}
EI_(base_GHCziShow_zdf20_closure);
II_(rJv_closure);
static StgWord rJx_srt[] = {
(W_)&base_GHCziShow_zdf20_closure, (W_)&rJv_closure
};
II_(rJx_info);
static StgWord rJx_closure[] = {
(W_)&rJx_info, 0x0, 0x0, 0x0
};
static StgWord rJx_info[] = {
((W_)&rJx_srt+0), 0x0, 0x30016U
};
EI_(base_GHCziShow_zdf20_closure);
II_(rJv_closure);
IF_(rJx_entry) {
FB_
if ((W_)(((W_)Sp - 0xcU) < (W_)SpLim)) goto _cM7;
Hp=Hp+2;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cM7;
Hp[-1] = (W_)&stg_CAF_BLACKHOLE_info;
;EF_(newCAF);
{void (*ghcFunPtr)(void *);
ghcFunPtr = ((void (*)(void *))(W_)&newCAF);
ghcFunPtr((void *)R1.w);;}
R1.p[1] = (W_)Hp-4;
*R1.p = (W_)&stg_IND_STATIC_info;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = (W_)Hp-4;
R1.w = (W_)&base_GHCziShow_zdf20_closure;
Sp[-3] = (W_)&rJv_closure;
Sp=Sp-3;
JMP_((W_)&stg_ap_p_fast);
_cM7:
HpAlloc = 0x8U;
JMP_(stg_gc_enter_1);
FE_
}
EI_(base_SystemziIO_print_closure);
II_(rJx_closure);
static StgWord rJz_srt[] = {
(W_)&base_SystemziIO_print_closure, (W_)&rJx_closure
};
II_(rJz_info);
static StgWord rJz_closure[] = {
(W_)&rJz_info, 0x0, 0x0, 0x0
};
static StgWord rJz_info[] = {
((W_)&rJz_srt+0), 0x0, 0x30016U
};
EI_(base_SystemziIO_print_closure);
II_(rJx_closure);
IF_(rJz_entry) {
FB_
if ((W_)(((W_)Sp - 0xcU) < (W_)SpLim)) goto _cMh;
Hp=Hp+2;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cMh;
Hp[-1] = (W_)&stg_CAF_BLACKHOLE_info;
;EF_(newCAF);
{void (*ghcFunPtr)(void *);
ghcFunPtr = ((void (*)(void *))(W_)&newCAF);
ghcFunPtr((void *)R1.w);;}
R1.p[1] = (W_)Hp-4;
*R1.p = (W_)&stg_IND_STATIC_info;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = (W_)Hp-4;
R1.w = (W_)&base_SystemziIO_print_closure;
Sp[-3] = (W_)&rJx_closure;
Sp=Sp-3;
JMP_((W_)&stg_ap_p_fast);
_cMh:
HpAlloc = 0x8U;
JMP_(stg_gc_enter_1);
FE_
}
EI_(base_GHCziReal_zdf8_closure);
EI_(base_GHCziReal_zdf3_closure);
static StgWord rJB_srt[] = {
(W_)&base_GHCziReal_zdf8_closure, (W_)&base_GHCziReal_zdf3_closure
};
II_(rJB_info);
static StgWord rJB_closure[] = {
(W_)&rJB_info, 0x0, 0x0, 0x0
};
static StgWord rJB_info[] = {
((W_)&rJB_srt+0), 0x0, 0x30016U
};
EI_(base_GHCziReal_zdf8_closure);
EI_(base_GHCziReal_zdf3_closure);
IF_(rJB_entry) {
FB_
if ((W_)(((W_)Sp - 0xcU) < (W_)SpLim)) goto _cMr;
Hp=Hp+2;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cMr;
Hp[-1] = (W_)&stg_CAF_BLACKHOLE_info;
;EF_(newCAF);
{void (*ghcFunPtr)(void *);
ghcFunPtr = ((void (*)(void *))(W_)&newCAF);
ghcFunPtr((void *)R1.w);;}
R1.p[1] = (W_)Hp-4;
*R1.p = (W_)&stg_IND_STATIC_info;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = (W_)Hp-4;
R1.w = (W_)&base_GHCziReal_zdf3_closure;
Sp[-3] = (W_)&base_GHCziReal_zdf8_closure;
Sp=Sp-3;
JMP_((W_)&stg_ap_p_fast);
_cMr:
HpAlloc = 0x8U;
JMP_(stg_gc_enter_1);
FE_
}
II_(rJB_closure);
static StgWord rJD_srt[] = {
(W_)&rJB_closure
};
II_(rJD_info);
static StgWord rJD_closure[] = {
(W_)&rJD_info, 0x0, 0x0, 0x0
};
static StgWord rJD_info[] = {
((W_)&rJD_srt+0), 0x0, 0x10016U
};
EI_(base_GHCziReal_zdp2RealFrac_info);
II_(rJB_closure);
IF_(rJD_entry) {
FB_
if ((W_)(((W_)Sp - 0xcU) < (W_)SpLim)) goto _cMB;
Hp=Hp+2;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cMB;
Hp[-1] = (W_)&stg_CAF_BLACKHOLE_info;
;EF_(newCAF);
{void (*ghcFunPtr)(void *);
ghcFunPtr = ((void (*)(void *))(W_)&newCAF);
ghcFunPtr((void *)R1.w);;}
R1.p[1] = (W_)Hp-4;
*R1.p = (W_)&stg_IND_STATIC_info;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = (W_)Hp-4;
Sp[-3] = (W_)&rJB_closure;
Sp=Sp-3;
JMP_((W_)&base_GHCziReal_zdp2RealFrac_info);
_cMB:
HpAlloc = 0x8U;
JMP_(stg_gc_enter_1);
FE_
}
II_(rJD_closure);
static StgWord rJF_srt[] = {
(W_)&rJD_closure
};
II_(rJF_info);
static StgWord rJF_closure[] = {
(W_)&rJF_info, 0x0, 0x0, 0x0
};
static StgWord rJF_info[] = {
((W_)&rJF_srt+0), 0x0, 0x10016U
};
EI_(base_GHCziReal_zdp1Fractional_info);
II_(rJD_closure);
IF_(rJF_entry) {
FB_
if ((W_)(((W_)Sp - 0xcU) < (W_)SpLim)) goto _cML;
Hp=Hp+2;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cML;
Hp[-1] = (W_)&stg_CAF_BLACKHOLE_info;
;EF_(newCAF);
{void (*ghcFunPtr)(void *);
ghcFunPtr = ((void (*)(void *))(W_)&newCAF);
ghcFunPtr((void *)R1.w);;}
R1.p[1] = (W_)Hp-4;
*R1.p = (W_)&stg_IND_STATIC_info;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = (W_)Hp-4;
Sp[-3] = (W_)&rJD_closure;
Sp=Sp-3;
JMP_((W_)&base_GHCziReal_zdp1Fractional_info);
_cML:
HpAlloc = 0x8U;
JMP_(stg_gc_enter_1);
FE_
}
II_(rJF_closure);
static StgWord rJH_srt[] = {
(W_)&rJF_closure
};
II_(rJH_info);
static StgWord rJH_closure[] = {
(W_)&rJH_info, 0x0, 0x0, 0x0
};
static StgWord rJH_info[] = {
((W_)&rJH_srt+0), 0x0, 0x10016U
};
EI_(base_GHCziNum_zdp1Num_info);
II_(rJF_closure);
IF_(rJH_entry) {
FB_
if ((W_)(((W_)Sp - 0xcU) < (W_)SpLim)) goto _cMV;
Hp=Hp+2;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cMV;
Hp[-1] = (W_)&stg_CAF_BLACKHOLE_info;
;EF_(newCAF);
{void (*ghcFunPtr)(void *);
ghcFunPtr = ((void (*)(void *))(W_)&newCAF);
ghcFunPtr((void *)R1.w);;}
R1.p[1] = (W_)Hp-4;
*R1.p = (W_)&stg_IND_STATIC_info;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = (W_)Hp-4;
Sp[-3] = (W_)&rJF_closure;
Sp=Sp-3;
JMP_((W_)&base_GHCziNum_zdp1Num_info);
_cMV:
HpAlloc = 0x8U;
JMP_(stg_gc_enter_1);
FE_
}
EI_(base_GHCziReal_zdf8_closure);
static StgWord rJJ_srt[] = {
(W_)&base_GHCziReal_zdf8_closure
};
II_(rJJ_info);
static StgWord rJJ_closure[] = {
(W_)&rJJ_info, 0x0, 0x0, 0x0
};
static StgWord rJJ_info[] = {
((W_)&rJJ_srt+0), 0x0, 0x10016U
};
EI_(base_GHCziReal_zdf8_closure);
EI_(base_GHCziReal_zdp1Integral_info);
IF_(rJJ_entry) {
FB_
if ((W_)(((W_)Sp - 0xcU) < (W_)SpLim)) goto _cN5;
Hp=Hp+2;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cN5;
Hp[-1] = (W_)&stg_CAF_BLACKHOLE_info;
;EF_(newCAF);
{void (*ghcFunPtr)(void *);
ghcFunPtr = ((void (*)(void *))(W_)&newCAF);
ghcFunPtr((void *)R1.w);;}
R1.p[1] = (W_)Hp-4;
*R1.p = (W_)&stg_IND_STATIC_info;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = (W_)Hp-4;
Sp[-3] = (W_)&base_GHCziReal_zdf8_closure;
Sp=Sp-3;
JMP_((W_)&base_GHCziReal_zdp1Integral_info);
_cN5:
HpAlloc = 0x8U;
JMP_(stg_gc_enter_1);
FE_
}
EI_(base_GHCziList_filter_closure);
EI_(integer_GHCziInteger_smallInteger_closure);
EI_(base_GHCziBase_zd_closure);
EI_(base_GHCziList_head_closure);
EI_(base_GHCziReal_zdf8_closure);
II_(rJB_closure);
II_(rJH_closure);
II_(rJJ_closure);
static StgWord rgf_srt[] = {
(W_)&base_GHCziList_filter_closure, (W_)&integer_GHCziInteger_smallInteger_closure, (W_)&base_GHCziBase_zd_closure, (W_)&base_GHCziList_head_closure, (W_)&base_GHCziReal_zdf8_closure, (W_)&rJB_closure, (W_)&rJH_closure, (W_)&rJJ_closure
};
II_(rgf_info);
static StgWord rgf_closure[] = {
(W_)&rgf_info, 0x0
};
static StgWord sK5_info[] = {
0x1U, 0x11U
};
EI_(base_GHCziReal_zdp1Real_info);
IF_(sK5_entry) {
FB_
if ((W_)(((W_)Sp - 0xcU) < (W_)SpLim)) goto _cNk;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = R1.w;
Sp[-3] = R1.p[2];
Sp=Sp-3;
JMP_((W_)&base_GHCziReal_zdp1Real_info);
_cNk:
JMP_(stg_gc_enter_1);
FE_
}
static StgWord sK8_info[] = {
((W_)&rgf_srt+4), 0x0, 0x10010U
};
EI_(integer_GHCziInteger_smallInteger_closure);
IF_(sK8_entry) {
FB_
if ((W_)(((W_)Sp - 0xcU) < (W_)SpLim)) goto _cNr;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = R1.w;
R1.w = (W_)&integer_GHCziInteger_smallInteger_closure;
Sp[-3] = 0x2U;
Sp=Sp-3;
JMP_((W_)&stg_ap_n_fast);
_cNr:
JMP_(stg_gc_enter_1);
FE_
}
static StgWord sKa_info[] = {
((W_)&rgf_srt+4), 0x1U, 0x10011U
};
EI_(base_GHCziNum_fromInteger_info);
II_(sK8_info);
IF_(sKa_entry) {
FB_
if ((W_)(((W_)Sp - 0x14U) < (W_)SpLim)) goto _cNu;
Hp=Hp+2;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cNu;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = R1.w;
Hp[-1] = (W_)&sK8_info;
Sp[-3] = (W_)Hp-4;
Sp[-4] = (W_)&stg_ap_p_info;
Sp[-5] = R1.p[2];
Sp=Sp-5;
JMP_((W_)&base_GHCziNum_fromInteger_info);
_cNu:
HpAlloc = 0x8U;
JMP_(stg_gc_enter_1);
FE_
}
static StgWord sKh_info[] = {
0x2U, 0x13U
};
EI_(base_GHCziFloat_sqrt_info);
IF_(sKh_entry) {
FB_
if ((W_)(((W_)Sp - 0x14U) < (W_)SpLim)) goto _cNE;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = R1.w;
Sp[-3] = R1.p[3];
Sp[-4] = (W_)&stg_ap_p_info;
Sp[-5] = R1.p[2];
Sp=Sp-5;
JMP_((W_)&base_GHCziFloat_sqrt_info);
_cNE:
JMP_(stg_gc_enter_1);
FE_
}
static StgWord sKj_info[] = {
0x3U, 0x10U
};
EI_(base_GHCziReal_toRational_info);
II_(sKh_info);
IF_(sKj_entry) {
FB_
if ((W_)(((W_)Sp - 0x14U) < (W_)SpLim)) goto _cNH;
Hp=Hp+4;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cNH;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = R1.w;
Hp[-3] = (W_)&sKh_info;
Hp[-1] = R1.p[3];
*Hp = R1.p[4];
Sp[-3] = (W_)Hp-12;
Sp[-4] = (W_)&stg_ap_p_info;
Sp[-5] = R1.p[2];
Sp=Sp-5;
JMP_((W_)&base_GHCziReal_toRational_info);
_cNH:
HpAlloc = 0x10U;
JMP_(stg_gc_enter_1);
FE_
}
static StgWord sKl_info[] = {
((W_)&rgf_srt+16), 0x1U, 0x30011U
};
EI_(base_GHCziReal_truncate_info);
EI_(base_GHCziReal_zdf8_closure);
II_(rJB_closure);
IF_(sKl_entry) {
FB_
if ((W_)(((W_)Sp - 0x18U) < (W_)SpLim)) goto _cNO;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = R1.w;
Sp[-3] = R1.p[2];
Sp[-4] = (W_)&base_GHCziReal_zdf8_closure;
Sp[-5] = (W_)&stg_ap_pp_info;
Sp[-6] = (W_)&rJB_closure;
Sp=Sp-6;
JMP_((W_)&base_GHCziReal_truncate_info);
_cNO:
JMP_(stg_gc_enter_1);
FE_
}
static StgWord sKn_info[] = {
((W_)&rgf_srt+16), 0x1U, 0xb0011U
};
EI_(base_GHCziReal_toRational_info);
II_(rJJ_closure);
II_(sKl_info);
IF_(sKn_entry) {
FB_
if ((W_)(((W_)Sp - 0x14U) < (W_)SpLim)) goto _cNR;
Hp=Hp+3;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cNR;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = R1.w;
Hp[-2] = (W_)&sKl_info;
*Hp = R1.p[2];
Sp[-3] = (W_)Hp-8;
Sp[-4] = (W_)&stg_ap_p_info;
Sp[-5] = (W_)&rJJ_closure;
Sp=Sp-5;
JMP_((W_)&base_GHCziReal_toRational_info);
_cNR:
HpAlloc = 0xcU;
JMP_(stg_gc_enter_1);
FE_
}
static StgWord sKp_info[] = {
((W_)&rgf_srt+16), 0x10005U, 0x2U, 0xf000cU
};
EI_(base_GHCziClasses_zeze_info);
II_(rJH_closure);
II_(sKj_info);
II_(sKn_info);
IF_(sKp_entry) {
FB_
if ((W_)(((W_)Sp - 0xcU) < (W_)SpLim)) goto _cNU;
Hp=Hp+8;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cNU;
Hp[-7] = (W_)&sKj_info;
Hp[-5] = *((P_)(R1.w+3));
Hp[-4] = *((P_)(R1.w+7));
Hp[-3] = *Sp;
Hp[-2] = (W_)&sKn_info;
*Hp = (W_)Hp-28;
*Sp = (W_)Hp-28;
Sp[-1] = (W_)Hp-8;
Sp[-2] = (W_)&stg_ap_pp_info;
Sp[-3] = (W_)&rJH_closure;
Sp=Sp-3;
JMP_((W_)&base_GHCziClasses_zeze_info);
_cNU:
HpAlloc = 0x20U;
JMP_(stg_gc_fun);
FE_
}
static StgWord sKs_info[] = {
((W_)&rgf_srt+4), 0x0, 0x10010U
};
EI_(integer_GHCziInteger_smallInteger_closure);
IF_(sKs_entry) {
FB_
if ((W_)(((W_)Sp - 0xcU) < (W_)SpLim)) goto _cO1;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = R1.w;
R1.w = (W_)&integer_GHCziInteger_smallInteger_closure;
Sp[-3] = 0x1U;
Sp=Sp-3;
JMP_((W_)&stg_ap_n_fast);
_cO1:
JMP_(stg_gc_enter_1);
FE_
}
static StgWord sKu_info[] = {
((W_)&rgf_srt+4), 0x1U, 0x10011U
};
EI_(base_GHCziNum_fromInteger_info);
II_(sKs_info);
IF_(sKu_entry) {
FB_
if ((W_)(((W_)Sp - 0x14U) < (W_)SpLim)) goto _cO4;
Hp=Hp+2;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cO4;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = R1.w;
Hp[-1] = (W_)&sKs_info;
Sp[-3] = (W_)Hp-4;
Sp[-4] = (W_)&stg_ap_p_info;
Sp[-5] = R1.p[2];
Sp=Sp-5;
JMP_((W_)&base_GHCziNum_fromInteger_info);
_cO4:
HpAlloc = 0x8U;
JMP_(stg_gc_enter_1);
FE_
}
static StgWord sKM_info[] = {
0x2U, 0x13U
};
EI_(base_GHCziEnum_enumFrom_info);
IF_(sKM_entry) {
FB_
if ((W_)(((W_)Sp - 0x14U) < (W_)SpLim)) goto _cOi;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = R1.w;
Sp[-3] = R1.p[2];
Sp[-4] = (W_)&stg_ap_p_info;
Sp[-5] = R1.p[3];
Sp=Sp-5;
JMP_((W_)&base_GHCziEnum_enumFrom_info);
_cOi:
JMP_(stg_gc_enter_1);
FE_
}
static StgWord sKD_info[] = {
0x2U, 0x13U
};
EI_(base_GHCziNum_zt_info);
IF_(sKD_entry) {
FB_
if ((W_)(((W_)Sp - 0x18U) < (W_)SpLim)) goto _cOu;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = R1.w;
Sp[-3] = R1.p[3];
Sp[-4] = R1.p[3];
Sp[-5] = (W_)&stg_ap_pp_info;
Sp[-6] = R1.p[2];
Sp=Sp-6;
JMP_((W_)&base_GHCziNum_zt_info);
_cOu:
JMP_(stg_gc_enter_1);
FE_
}
static StgWord sKF_info[] = {
0x3U, 0x10U
};
EI_(base_GHCziNum_zm_info);
II_(sKD_info);
IF_(sKF_entry) {
FB_
if ((W_)(((W_)Sp - 0x18U) < (W_)SpLim)) goto _cOx;
Hp=Hp+4;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cOx;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = R1.w;
Hp[-3] = (W_)&sKD_info;
Hp[-1] = R1.p[2];
*Hp = R1.p[4];
Sp[-3] = R1.p[3];
Sp[-4] = (W_)Hp-12;
Sp[-5] = (W_)&stg_ap_pp_info;
Sp[-6] = R1.p[2];
Sp=Sp-6;
JMP_((W_)&base_GHCziNum_zm_info);
_cOx:
HpAlloc = 0x10U;
JMP_(stg_gc_enter_1);
FE_
}
static StgWord sKA_info[] = {
0x2U, 0x22U
};
EI_(base_GHCziReal_zs_info);
IF_(sKA_ret) {
FB_
*Sp = (W_)&stg_ap_pp_info;
Sp[-1] = R1.w;
Sp=Sp-1;
JMP_((W_)&base_GHCziReal_zs_info);
FE_
}
static StgWord sKH_info[] = {
0x5U, 0x10U
};
EI_(base_GHCziFloat_zdp1Floating_info);
II_(sKF_info);
II_(sKA_info);
IF_(sKH_entry) {
FB_
if ((W_)(((W_)Sp - 0x18U) < (W_)SpLim)) goto _cOB;
Hp=Hp+5;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cOB;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = R1.w;
Hp[-4] = (W_)&sKF_info;
Hp[-2] = R1.p[2];
Hp[-1] = R1.p[4];
*Hp = R1.p[6];
Sp[-4] = (W_)Hp-16;
Sp[-3] = R1.p[5];
Sp[-6] = R1.p[3];
Sp[-5] = (W_)&sKA_info;
Sp=Sp-6;
JMP_((W_)&base_GHCziFloat_zdp1Floating_info);
_cOB:
HpAlloc = 0x14U;
JMP_(stg_gc_enter_1);
FE_
}
static StgWord sKJ_info[] = {
0x10005U, 0x5U, 0x9U
};
II_(sKp_info);
II_(sKH_info);
IF_(sKJ_entry) {
FB_
Hp=Hp+7;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cOE;
Hp[-6] = (W_)&sKH_info;
Hp[-4] = *((P_)(R1.w+3));
Hp[-3] = *((P_)(R1.w+7));
Hp[-2] = *((P_)(R1.w+15));
Hp[-1] = *((P_)(R1.w+19));
*Hp = *Sp;
R1.w = *((P_)(R1.w+11));
*Sp = (W_)Hp-24;
JMP_((W_)&sKp_info);
_cOE:
HpAlloc = 0x1cU;
JMP_(stg_gc_fun);
FE_
}
static StgWord sKO_info[] = {
((W_)&rgf_srt+0), 0x7U, 0x10010U
};
EI_(base_GHCziList_filter_closure);
II_(sKJ_info);
II_(sKM_info);
IF_(sKO_entry) {
FB_
if ((W_)(((W_)Sp - 0x10U) < (W_)SpLim)) goto _cOH;
Hp=Hp+10;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cOH;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = R1.w;
Hp[-9] = (W_)&sKM_info;
Hp[-7] = R1.p[3];
Hp[-6] = R1.p[8];
Hp[-5] = (W_)&sKJ_info;
Hp[-4] = R1.p[2];
Hp[-3] = R1.p[4];
Hp[-2] = R1.p[5];
Hp[-1] = R1.p[6];
*Hp = R1.p[7];
R1.w = (W_)&base_GHCziList_filter_closure;
Sp[-3] = (W_)Hp-36;
Sp[-4] = (W_)Hp-19;
Sp=Sp-4;
JMP_((W_)&stg_ap_pp_fast);
_cOH:
HpAlloc = 0x28U;
JMP_(stg_gc_enter_1);
FE_
}
static StgWord sN8_info[] = {
((W_)&rgf_srt+0), 0x7U, 0xd0022U
};
EI_(base_GHCziNum_negate_info);
EI_(base_GHCziBase_zd_closure);
EI_(base_GHCziList_head_closure);
II_(sKO_info);
IF_(sN8_ret) {
W_ _cOK;
FB_
_cOK = R1.w & 0x3U;
if ((W_)(_cOK >= 0x2U)) goto _cOM;
Hp=Hp+9;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cOO;
Hp[-8] = (W_)&sKO_info;
Hp[-6] = Sp[6];
Hp[-5] = Sp[5];
Hp[-4] = Sp[4];
Hp[-3] = Sp[3];
Hp[-2] = Sp[2];
Hp[-1] = Sp[7];
*Hp = Sp[1];
R1.w = (W_)&base_GHCziBase_zd_closure;
Sp[7] = (W_)Hp-32;
Sp[6] = (W_)&base_GHCziList_head_closure;
Sp=Sp+6;
JMP_((W_)&stg_ap_pp_fast);
_cOM:
Sp[7] = Sp[2];
Sp[5] = Sp[6];
Sp[6] = (W_)&stg_ap_p_info;
Sp=Sp+5;
JMP_((W_)&base_GHCziNum_negate_info);
_cOO:
HpAlloc = 0x24U;
JMP_(stg_gc_enter_1);
FE_
}
static StgWord sN9_info[] = {
((W_)&rgf_srt+0), 0x10005U, 0x6U, 0xd0009U
};
II_(sKp_info);
II_(sN8_info);
IF_(sN9_entry) {
FB_
if ((W_)(((W_)Sp - 0x20U) < (W_)SpLim)) goto _cOR;
Sp[-6] = *((P_)(R1.w+23));
Sp[-5] = *((P_)(R1.w+19));
Sp[-4] = *((P_)(R1.w+15));
Sp[-3] = *((P_)(R1.w+11));
Sp[-2] = *((P_)(R1.w+7));
Sp[-1] = *((P_)(R1.w+3));
R1.w = *((P_)(R1.w+15));
Sp[-8] = *Sp;
Sp[-7] = (W_)&sN8_info;
Sp=Sp-8;
JMP_((W_)&sKp_info);
_cOR:
JMP_(stg_gc_fun);
FE_
}
static StgWord rgf_info[] = {
((W_)&rgf_srt+0), 0x30014U, 0x0, 0xff000fU
};
II_(rgf_closure);
II_(sK5_info);
II_(sKa_info);
II_(sKp_info);
II_(sKu_info);
II_(sN9_info);
IF_(rgf_entry) {
FB_
Hp=Hp+19;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cOU;
Hp[-18] = (W_)&sK5_info;
Hp[-16] = Sp[1];
Hp[-15] = (W_)&sKa_info;
Hp[-13] = (W_)Hp-72;
Hp[-12] = (W_)&sKp_info;
Hp[-11] = Sp[1];
Hp[-10] = *Sp;
Hp[-9] = (W_)&sKu_info;
Hp[-7] = (W_)Hp-72;
Hp[-6] = (W_)&sN9_info;
Hp[-5] = (W_)Hp-72;
Hp[-4] = (W_)Hp-60;
Hp[-3] = *Sp;
Hp[-2] = (W_)Hp-47;
Hp[-1] = (W_)Hp-36;
*Hp = Sp[2];
R1.w = (W_)Hp-23;
Sp=Sp+3;
JMP_(*Sp);
_cOU:
HpAlloc = 0x4cU;
R1.w = (W_)&rgf_closure;
JMP_(stg_gc_fun);
FE_
}
EI_(base_GHCziFloat_zdf1_closure);
EI_(base_GHCziFloat_zdf8_closure);
EI_(base_GHCziFloat_zdf6_closure);
II_(rgf_closure);
static StgWord rJL_srt[] = {
(W_)&base_GHCziFloat_zdf1_closure, (W_)&base_GHCziFloat_zdf8_closure, (W_)&base_GHCziFloat_zdf6_closure, (W_)&rgf_closure
};
II_(rJL_info);
static StgWord rJL_closure[] = {
(W_)&rJL_info, 0x0, 0x0, 0x0
};
static StgWord rJL_info[] = {
((W_)&rJL_srt+0), 0x0, 0xf0016U
};
EI_(base_GHCziFloat_zdf1_closure);
EI_(base_GHCziFloat_zdf8_closure);
EI_(base_GHCziFloat_zdf6_closure);
II_(rgf_info);
IF_(rJL_entry) {
FB_
if ((W_)(((W_)Sp - 0x14U) < (W_)SpLim)) goto _cP4;
Hp=Hp+2;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cP4;
Hp[-1] = (W_)&stg_CAF_BLACKHOLE_info;
;EF_(newCAF);
{void (*ghcFunPtr)(void *);
ghcFunPtr = ((void (*)(void *))(W_)&newCAF);
ghcFunPtr((void *)R1.w);;}
R1.p[1] = (W_)Hp-4;
*R1.p = (W_)&stg_IND_STATIC_info;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = (W_)Hp-4;
Sp[-3] = (W_)&base_GHCziFloat_zdf1_closure;
Sp[-4] = (W_)&base_GHCziFloat_zdf8_closure;
Sp[-5] = (W_)&base_GHCziFloat_zdf6_closure;
Sp=Sp-5;
JMP_((W_)&rgf_info);
_cP4:
HpAlloc = 0x8U;
JMP_(stg_gc_enter_1);
FE_
}
EI_(base_GHCziFloat_zdf1_closure);
static StgWord sL5_srt[] = {
(W_)&base_GHCziFloat_zdf1_closure
};
II_(sL5_info);
static StgWord sL5_closure[] = {
(W_)&sL5_info, 0x0, 0x0, 0x0
};
static StgWord sL5_info[] = {
((W_)&sL5_srt+0), 0x0, 0x10016U
};
EI_(base_GHCziEnum_enumFromTo_info);
EI_(ghczmprim_GHCziTypes_Dzh_con_info);
EI_(base_GHCziFloat_zdf1_closure);
IF_(sL5_entry) {
FB_
if ((W_)(((W_)Sp - 0x18U) < (W_)SpLim)) goto _cPe;
Hp=Hp+8;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cPe;
Hp[-7] = (W_)&stg_CAF_BLACKHOLE_info;
;EF_(newCAF);
{void (*ghcFunPtr)(void *);
ghcFunPtr = ((void (*)(void *))(W_)&newCAF);
ghcFunPtr((void *)R1.w);;}
R1.p[1] = (W_)Hp-28;
*R1.p = (W_)&stg_IND_STATIC_info;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = (W_)Hp-28;
Hp[-5] = (W_)&ghczmprim_GHCziTypes_Dzh_con_info;
ASSIGN_DBL((P_)((W_)Hp-16),(StgDouble)1000.0);
Hp[-2] = (W_)&ghczmprim_GHCziTypes_Dzh_con_info;
ASSIGN_DBL((P_)((W_)Hp-4),(StgDouble)1.0);
Sp[-3] = (W_)Hp-19;
Sp[-4] = (W_)Hp-7;
Sp[-5] = (W_)&stg_ap_pp_info;
Sp[-6] = (W_)&base_GHCziFloat_zdf1_closure;
Sp=Sp-6;
JMP_((W_)&base_GHCziEnum_enumFromTo_info);
_cPe:
HpAlloc = 0x20U;
JMP_(stg_gc_enter_1);
FE_
}
II_(rJL_closure);
static StgWord sKZ_srt[] = {
(W_)&rJL_closure
};
II_(sKZ_info);
static StgWord sKZ_closure[] = {
(W_)&sKZ_info, 0x0
};
static StgWord sKV_info[] = {
((W_)&sKZ_srt+0), 0x1U, 0x10011U
};
II_(rJL_closure);
IF_(sKV_entry) {
FB_
if ((W_)(((W_)Sp - 0xcU) < (W_)SpLim)) goto _cPr;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = R1.w;
Sp[-3] = R1.p[2];
R1.w = (W_)&rJL_closure;
Sp=Sp-3;
JMP_((W_)&stg_ap_p_fast);
_cPr:
JMP_(stg_gc_enter_1);
FE_
}
static StgWord sKZ_info[] = {
((W_)&sKZ_srt+0), 0x10005U, 0x0, 0x1000fU
};
EI_(ghczmprim_GHCziTypes_ZC_con_info);
EI_(ghczmprim_GHCziTypes_ZMZN_closure);
II_(sKV_info);
II_(sKZ_closure);
IF_(sKZ_entry) {
FB_
Hp=Hp+9;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cPu;
Hp[-8] = (W_)&ghczmprim_GHCziTypes_ZC_con_info;
Hp[-7] = *Sp;
Hp[-6] = (W_)&ghczmprim_GHCziTypes_ZMZN_closure+1;
Hp[-5] = (W_)&sKV_info;
Hp[-3] = *Sp;
Hp[-2] = (W_)&ghczmprim_GHCziTypes_ZC_con_info;
Hp[-1] = (W_)Hp-20;
*Hp = (W_)Hp-30;
R1.w = (W_)Hp-6;
Sp=Sp+1;
JMP_(*Sp);
_cPu:
HpAlloc = 0x24U;
R1.w = (W_)&sKZ_closure;
JMP_(stg_gc_fun);
FE_
}
EI_(base_GHCziBase_map_closure);
II_(rJL_closure);
II_(sL5_closure);
static StgWord rgh_srt[] = {
(W_)&base_GHCziBase_map_closure, (W_)&rJL_closure, (W_)&sL5_closure
};
II_(rgh_info);
static StgWord rgh_closure[] = {
(W_)&rgh_info, 0x0, 0x0, 0x0
};
static StgWord rgh_info[] = {
((W_)&rgh_srt+0), 0x0, 0x70016U
};
EI_(base_GHCziBase_map_closure);
II_(sKZ_closure);
II_(sL5_closure);
IF_(rgh_entry) {
FB_
if ((W_)(((W_)Sp - 0x10U) < (W_)SpLim)) goto _cPE;
Hp=Hp+2;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cPE;
Hp[-1] = (W_)&stg_CAF_BLACKHOLE_info;
;EF_(newCAF);
{void (*ghcFunPtr)(void *);
ghcFunPtr = ((void (*)(void *))(W_)&newCAF);
ghcFunPtr((void *)R1.w);;}
R1.p[1] = (W_)Hp-4;
*R1.p = (W_)&stg_IND_STATIC_info;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = (W_)Hp-4;
R1.w = (W_)&base_GHCziBase_map_closure;
Sp[-3] = (W_)&sL5_closure;
Sp[-4] = (W_)&sKZ_closure+1;
Sp=Sp-4;
JMP_((W_)&stg_ap_pp_fast);
_cPE:
HpAlloc = 0x8U;
JMP_(stg_gc_enter_1);
FE_
}
EI_(base_GHCziList_head_closure);
EI_(base_DataziList_sortBy_closure);
II_(rgh_closure);
II_(rJp_closure);
static StgWord sLi_srt[] = {
(W_)&base_GHCziList_head_closure, (W_)&base_DataziList_sortBy_closure, (W_)&rgh_closure, (W_)&rJp_closure
};
II_(sLi_info);
static StgWord sLi_closure[] = {
(W_)&sLi_info, 0x0, 0x0, 0x0
};
static StgWord sLe_info[] = {
((W_)&sLi_srt+0), 0x1U, 0x10011U
};
EI_(base_GHCziList_head_closure);
IF_(sLe_entry) {
FB_
if ((W_)(((W_)Sp - 0xcU) < (W_)SpLim)) goto _cPT;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = R1.w;
Sp[-3] = R1.p[2];
R1.w = (W_)&base_GHCziList_head_closure;
Sp=Sp-3;
JMP_((W_)&stg_ap_p_fast);
_cPT:
JMP_(stg_gc_enter_1);
FE_
}
static StgWord sLb_info[] = {
((W_)&sLi_srt+0), 0x1U, 0x10011U
};
EI_(base_GHCziList_head_closure);
IF_(sLb_entry) {
FB_
if ((W_)(((W_)Sp - 0xcU) < (W_)SpLim)) goto _cPY;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = R1.w;
Sp[-3] = R1.p[2];
R1.w = (W_)&base_GHCziList_head_closure;
Sp=Sp-3;
JMP_((W_)&stg_ap_p_fast);
_cPY:
JMP_(stg_gc_enter_1);
FE_
}
static StgWord sLg_info[] = {
((W_)&sLi_srt+0), 0x2000cU, 0x10000U, 0x90009U
};
EI_(base_GHCziClasses_compare_info);
II_(rJp_closure);
II_(sLb_info);
II_(sLe_info);
IF_(sLg_entry) {
FB_
if ((W_)(((W_)Sp - 0x8U) < (W_)SpLim)) goto _cQ1;
Hp=Hp+6;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cQ1;
Hp[-5] = (W_)&sLe_info;
Hp[-3] = *Sp;
Hp[-2] = (W_)&sLb_info;
*Hp = Sp[1];
Sp[1] = (W_)Hp-20;
*Sp = (W_)Hp-8;
Sp[-1] = (W_)&stg_ap_pp_info;
Sp[-2] = (W_)&rJp_closure;
Sp=Sp-2;
JMP_((W_)&base_GHCziClasses_compare_info);
_cQ1:
HpAlloc = 0x18U;
JMP_(stg_gc_fun);
FE_
}
static StgWord sLi_info[] = {
((W_)&sLi_srt+0), 0x0, 0xf0016U
};
EI_(base_DataziList_sortBy_closure);
II_(rgh_closure);
II_(sLg_info);
IF_(sLi_entry) {
FB_
if ((W_)(((W_)Sp - 0x10U) < (W_)SpLim)) goto _cQ4;
Hp=Hp+4;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cQ4;
Hp[-3] = (W_)&stg_CAF_BLACKHOLE_info;
;EF_(newCAF);
{void (*ghcFunPtr)(void *);
ghcFunPtr = ((void (*)(void *))(W_)&newCAF);
ghcFunPtr((void *)R1.w);;}
R1.p[1] = (W_)Hp-12;
*R1.p = (W_)&stg_IND_STATIC_info;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = (W_)Hp-12;
Hp[-1] = (W_)&sLg_info;
R1.w = (W_)&base_DataziList_sortBy_closure;
Sp[-3] = (W_)&rgh_closure;
Sp[-4] = (W_)Hp-2;
Sp=Sp-4;
JMP_((W_)&stg_ap_pp_fast);
_cQ4:
HpAlloc = 0x10U;
JMP_(stg_gc_enter_1);
FE_
}
EI_(base_GHCziBase_zd_closure);
EI_(base_GHCziList_head_closure);
II_(sLi_closure);
static StgWord rgj_srt[] = {
(W_)&base_GHCziBase_zd_closure, (W_)&base_GHCziList_head_closure, (W_)&sLi_closure
};
II_(rgj_info);
static StgWord rgj_closure[] = {
(W_)&rgj_info, 0x0, 0x0, 0x0
};
static StgWord rgj_info[] = {
((W_)&rgj_srt+0), 0x0, 0x70016U
};
EI_(base_GHCziBase_zd_closure);
EI_(base_GHCziList_head_closure);
II_(sLi_closure);
IF_(rgj_entry) {
FB_
if ((W_)(((W_)Sp - 0x10U) < (W_)SpLim)) goto _cQe;
Hp=Hp+2;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cQe;
Hp[-1] = (W_)&stg_CAF_BLACKHOLE_info;
;EF_(newCAF);
{void (*ghcFunPtr)(void *);
ghcFunPtr = ((void (*)(void *))(W_)&newCAF);
ghcFunPtr((void *)R1.w);;}
R1.p[1] = (W_)Hp-4;
*R1.p = (W_)&stg_IND_STATIC_info;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = (W_)Hp-4;
R1.w = (W_)&base_GHCziBase_zd_closure;
Sp[-3] = (W_)&sLi_closure;
Sp[-4] = (W_)&base_GHCziList_head_closure;
Sp=Sp-4;
JMP_((W_)&stg_ap_pp_fast);
_cQe:
HpAlloc = 0x8U;
JMP_(stg_gc_enter_1);
FE_
}
II_(rgj_closure);
II_(rJz_closure);
static StgWord Main_main_srt[] = {
(W_)&rgj_closure, (W_)&rJz_closure
};
EI_(Main_main_info);
StgWord Main_main_closure[] = {
(W_)&Main_main_info, 0x0, 0x0, 0x0
};
StgWord Main_main_info[] = {
((W_)&Main_main_srt+0), 0x0, 0x30016U
};
II_(rgj_closure);
II_(rJz_closure);
FN_(Main_main_entry) {
FB_
if ((W_)(((W_)Sp - 0xcU) < (W_)SpLim)) goto _cQo;
Hp=Hp+2;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cQo;
Hp[-1] = (W_)&stg_CAF_BLACKHOLE_info;
;EF_(newCAF);
{void (*ghcFunPtr)(void *);
ghcFunPtr = ((void (*)(void *))(W_)&newCAF);
ghcFunPtr((void *)R1.w);;}
R1.p[1] = (W_)Hp-4;
*R1.p = (W_)&stg_IND_STATIC_info;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = (W_)Hp-4;
R1.w = (W_)&rJz_closure;
Sp[-3] = (W_)&rgj_closure;
Sp=Sp-3;
JMP_((W_)&stg_ap_p_fast);
_cQo:
HpAlloc = 0x8U;
JMP_(stg_gc_enter_1);
FE_
}
EI_(base_GHCziTopHandler_runMainIO_closure);
EI_(Main_main_closure);
static StgWord ZCMain_main_srt[] = {
(W_)&base_GHCziTopHandler_runMainIO_closure, (W_)&Main_main_closure
};
EI_(ZCMain_main_info);
StgWord ZCMain_main_closure[] = {
(W_)&ZCMain_main_info, 0x0, 0x0, 0x0
};
StgWord ZCMain_main_info[] = {
((W_)&ZCMain_main_srt+0), 0x0, 0x30016U
};
EI_(base_GHCziTopHandler_runMainIO_closure);
EI_(Main_main_closure);
FN_(ZCMain_main_entry) {
FB_
if ((W_)(((W_)Sp - 0xcU) < (W_)SpLim)) goto _cQy;
Hp=Hp+2;
if ((W_)((W_)Hp > (W_)HpLim)) goto _cQy;
Hp[-1] = (W_)&stg_CAF_BLACKHOLE_info;
;EF_(newCAF);
{void (*ghcFunPtr)(void *);
ghcFunPtr = ((void (*)(void *))(W_)&newCAF);
ghcFunPtr((void *)R1.w);;}
R1.p[1] = (W_)Hp-4;
*R1.p = (W_)&stg_IND_STATIC_info;
Sp[-2] = (W_)&stg_upd_frame_info;
Sp[-1] = (W_)Hp-4;
R1.w = (W_)&base_GHCziTopHandler_runMainIO_closure;
Sp[-3] = (W_)&Main_main_closure;
Sp=Sp-3;
JMP_((W_)&stg_ap_p_fast);
_cQy:
HpAlloc = 0x8U;
JMP_(stg_gc_enter_1);
FE_
}
static StgWord _module_registered[] = {
0x0
};
EF_(__stginit_base_Prelude_);
EF_(__stginit_base_GHCziTopHandler_);
EF_(__stginit_haskell98_List_);
FN_(__stginit_Main_) {
FB_
if ((W_)(0x0 != (*((P_)(W_)&_module_registered)))) goto _cQE;
goto _cQG;
_cQE:
Sp=Sp+1;
JMP_(Sp[-1]);
_cQG:
*((P_)(W_)&_module_registered) = 0x1U;
Sp=Sp-1;
*Sp = (W_)&__stginit_base_Prelude_;
Sp=Sp-1;
*Sp = (W_)&__stginit_haskell98_List_;
Sp=Sp-1;
*Sp = (W_)&__stginit_base_GHCziTopHandler_;
goto _cQE;
FE_
}
EF_(__stginit_Main_);
FN_(__stginit_Main) {
FB_
JMP_((W_)&__stginit_Main_);
FE_
}
FN_(__stginit_ZCMain) {
FB_
Sp=Sp+1;
JMP_(Sp[-1]);
FE_
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment