Created
March 31, 2010 20:11
-
-
Save valyagolev/350815 to your computer and use it in GitHub Desktop.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
/* 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