Skip to content

Instantly share code, notes, and snippets.

@agam
Created July 11, 2013 10:55
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save agam/5974501 to your computer and use it in GitHub Desktop.
Save agam/5974501 to your computer and use it in GitHub Desktop.
Haskell assembly output for an iteration example
.data
.align 8
.align 1
.globl __stginit_Main
.type __stginit_Main, @object
__stginit_Main:
.globl __stginit_ZCMain
.type __stginit_ZCMain, @object
__stginit_ZCMain:
.section .data
.align 8
.align 1
rai_srt:
.quad base_GHCziList_foldl_closure
.quad rai_closure
.data
.align 8
.align 1
rai_closure:
.quad rai_info
.quad 0
.text
.align 8
.quad 1
.quad 17
svq_info:
.LcvS:
leaq -32(%rbp),%rax
cmpq %r15,%rax
jb .LcvU
addq $16,%r12
cmpq 144(%r13),%r12
ja .LcvW
movq $stg_upd_frame_info,-16(%rbp)
movq %rbx,-8(%rbp)
movq $integerzmgmp_GHCziIntegerziType_Szh_con_info,-8(%r12)
movq $0,0(%r12)
leaq -7(%r12),%rax
movq %rax,-24(%rbp)
movq $stg_ap_p_info,-32(%rbp)
movq 16(%rbx),%r14
addq $-32,%rbp
jmp base_GHCziNum_fromInteger_info
.LcvW:
movq $16,192(%r13)
.LcvU:
jmp *-16(%r13)
.size svq_info, .-svq_info
.text
.align 8
.long rai_srt-(svp_info)+8
.long 0
.quad 2
.quad 4294967315
svp_info:
.Lcw8:
leaq -16(%rbp),%rax
cmpq %r15,%rax
jb .Lcwa
movq $stg_upd_frame_info,-16(%rbp)
movq %rbx,-8(%rbp)
movq 16(%rbx),%r14
movq 24(%rbx),%rsi
addq $-16,%rbp
jmp rai_info
.Lcwa:
jmp *-16(%r13)
.size svp_info, .-svp_info
.text
.align 8
.long rai_srt-(svr_info)+8
.long 0
.quad 8589934604
.quad 1
.quad 4294967306
svr_info:
.Lcwf:
leaq -24(%rbp),%rax
cmpq %r15,%rax
jb .Lcwh
addq $32,%r12
cmpq 144(%r13),%r12
ja .Lcwj
movq $svp_info,-24(%r12)
movq 6(%rbx),%rax
movq %rax,-8(%r12)
movq %rsi,0(%r12)
leaq -24(%r12),%rax
movq %rax,-8(%rbp)
movq %r14,-16(%rbp)
movq $stg_ap_pp_info,-24(%rbp)
movq 6(%rbx),%r14
addq $-24,%rbp
jmp base_GHCziNum_zp_info
.Lcwj:
movq $32,192(%r13)
.Lcwh:
jmp *-8(%r13)
.size svr_info, .-svr_info
.text
.align 8
.long rai_srt-(svo_info)+0
.long 0
.quad 1
.quad 12884901920
svo_info:
.Lcws:
movq %rbx,%rax
andq $7,%rax
cmpq $2,%rax
jae .Lcwt
movq 7(%rbx),%rbx
addq $16,%rbp
jmp stg_ap_0_fast
.Lcwt:
addq $40,%r12
cmpq 144(%r13),%r12
ja .Lcwx
movq $svq_info,-32(%r12)
movq 8(%rbp),%rax
movq %rax,-16(%r12)
movq $svr_info,-8(%r12)
movq 8(%rbp),%rax
movq %rax,0(%r12)
leaq -6(%r12),%r14
leaq -32(%r12),%rsi
movq 6(%rbx),%rdi
movl $base_GHCziList_foldl_closure,%ebx
addq $16,%rbp
jmp stg_ap_ppp_fast
.Lcwx:
movq $40,192(%r13)
.Lcwv:
jmp *-16(%r13)
.size svo_info, .-svo_info
.text
.align 8
.long rai_srt-(rai_info)+0
.long 0
.quad 8589934604
.quad 0
.quad 12884901903
rai_info:
.LcwG:
leaq -16(%rbp),%rax
cmpq %r15,%rax
jb .LcwI
movq %r14,-8(%rbp)
movq %rsi,%rbx
movq $svo_info,-16(%rbp)
addq $-16,%rbp
testq $7,%rbx
jne .LcwL
jmp *(%rbx)
.LcwI:
movl $rai_closure,%ebx
jmp *-8(%r13)
.LcwL:
jmp svo_info
.size rai_info, .-rai_info
.data
.align 8
.align 1
rah_closure:
.quad rah_info
.text
.align 8
.quad 2
.quad 19
svm_info:
.Lcx3:
leaq -16(%rbp),%rax
cmpq %r15,%rax
jb .Lcx5
movq $stg_upd_frame_info,-16(%rbp)
movq %rbx,-8(%rbp)
movq 16(%rbx),%r14
movq 24(%rbx),%rsi
addq $-16,%rbp
jmp rah_info
.Lcx5:
jmp *-16(%r13)
.size svm_info, .-svm_info
.text
.align 8
.quad 2
.quad 19
svn_info:
.Lcxd:
leaq -16(%rbp),%rax
cmpq %r15,%rax
jb .Lcxf
movq $stg_upd_frame_info,-16(%rbp)
movq %rbx,-8(%rbp)
movq 16(%rbx),%r14
movq 24(%rbx),%rsi
addq $-16,%rbp
jmp rah_info
.Lcxf:
jmp *-16(%r13)
.size svn_info, .-svn_info
.text
.align 8
.quad 1
.quad 32
svl_info:
.Lcxm:
movq %rbx,%rax
andq $7,%rax
cmpq $2,%rax
jae .Lcxn
movq 7(%rbx),%rbx
addq $16,%rbp
jmp stg_ap_0_fast
.Lcxn:
addq $64,%r12
cmpq 144(%r13),%r12
ja .Lcxr
movq $svm_info,-56(%r12)
movq 8(%rbp),%rax
movq %rax,-40(%r12)
movq 14(%rbx),%rax
movq %rax,-32(%r12)
movq $svn_info,-24(%r12)
movq 8(%rbp),%rax
movq %rax,-8(%r12)
movq 6(%rbx),%rax
movq %rax,0(%r12)
leaq -24(%r12),%rax
movq %rax,0(%rbp)
movq $stg_ap_pp_info,-8(%rbp)
movq 8(%rbp),%r14
leaq -56(%r12),%rax
movq %rax,8(%rbp)
addq $-8,%rbp
jmp base_GHCziNum_zp_info
.Lcxr:
movq $64,192(%r13)
.Lcxp:
jmp *-16(%r13)
.size svl_info, .-svl_info
.text
.align 8
.quad 8589934604
.quad 0
.quad 15
rah_info:
.LcxE:
leaq -24(%rbp),%rax
cmpq %r15,%rax
jb .LcxG
movq %r14,-8(%rbp)
movq %rsi,%rbx
movq $svl_info,-16(%rbp)
addq $-16,%rbp
testq $7,%rbx
jne .LcxJ
jmp *(%rbx)
.LcxG:
movl $rah_closure,%ebx
jmp *-8(%r13)
.LcxJ:
jmp svl_info
.size rah_info, .-rah_info
.section .data
.align 8
.align 1
svj_srt:
.quad base_GHCziBase_zpzp_closure
.quad ghczmprim_GHCziCString_unpackCStringzh_closure
.quad base_SystemziIO_putStrLn_closure
.quad rai_closure
.quad base_GHCziNum_zdfNumInteger_closure
.quad base_GHCziShow_zdfShowInteger_closure
.data
.align 8
.align 1
svj_closure:
.quad svj_info
.quad 0
.quad 0
.quad 0
.text
.align 8
.long svj_srt-(svc_info)+24
.long 0
.quad 0
.quad 12884901904
svc_info:
.Lcy3:
leaq -16(%rbp),%rax
cmpq %r15,%rax
jb .Lcy5
addq $184,%r12
cmpq 144(%r13),%r12
ja .Lcy7
movq $stg_upd_frame_info,-16(%rbp)
movq %rbx,-8(%rbp)
movq $integerzmgmp_GHCziIntegerziType_Szh_con_info,-176(%r12)
movq $6,-168(%r12)
movq $Main_NaryLeaf_con_info,-160(%r12)
leaq -175(%r12),%rax
movq %rax,-152(%r12)
movq $ghczmprim_GHCziTypes_ZC_con_info,-144(%r12)
leaq -159(%r12),%rax
movq %rax,-136(%r12)
movq $ghczmprim_GHCziTypes_ZMZN_closure+1,-128(%r12)
movq $integerzmgmp_GHCziIntegerziType_Szh_con_info,-120(%r12)
movq $5,-112(%r12)
movq $Main_NaryLeaf_con_info,-104(%r12)
leaq -119(%r12),%rax
movq %rax,-96(%r12)
movq $ghczmprim_GHCziTypes_ZC_con_info,-88(%r12)
leaq -103(%r12),%rax
movq %rax,-80(%r12)
leaq -142(%r12),%rax
movq %rax,-72(%r12)
movq $integerzmgmp_GHCziIntegerziType_Szh_con_info,-64(%r12)
movq $4,-56(%r12)
movq $Main_NaryLeaf_con_info,-48(%r12)
leaq -63(%r12),%rax
movq %rax,-40(%r12)
movq $ghczmprim_GHCziTypes_ZC_con_info,-32(%r12)
leaq -47(%r12),%rax
movq %rax,-24(%r12)
leaq -86(%r12),%rax
movq %rax,-16(%r12)
movq $Main_NaryBranch_con_info,-8(%r12)
leaq -30(%r12),%rax
movq %rax,0(%r12)
movl $base_GHCziNum_zdfNumInteger_closure,%r14d
leaq -6(%r12),%rsi
addq $-16,%rbp
jmp rai_info
.Lcy7:
movq $184,192(%r13)
.Lcy5:
jmp *-16(%r13)
.size svc_info, .-svc_info
.text
.align 8
.long svj_srt-(sve_info)+24
.long 0
.quad 0
.quad 30064771088
sve_info:
.Lcym:
leaq -32(%rbp),%rax
cmpq %r15,%rax
jb .Lcyo
addq $16,%r12
cmpq 144(%r13),%r12
ja .Lcyq
movq $stg_upd_frame_info,-16(%rbp)
movq %rbx,-8(%rbp)
movq $svc_info,-8(%r12)
leaq -8(%r12),%rax
movq %rax,-24(%rbp)
movq $stg_ap_p_info,-32(%rbp)
movl $base_GHCziShow_zdfShowInteger_closure,%r14d
addq $-32,%rbp
jmp base_GHCziShow_show_info
.Lcyq:
movq $16,192(%r13)
.Lcyo:
jmp *-16(%r13)
.size sve_info, .-sve_info
.section .rodata
.align 8
.align 1
cyy_str:
.byte 78
.byte 97
.byte 114
.byte 121
.byte 83
.byte 117
.byte 109
.byte 32
.byte 61
.byte 32
.byte 0
.text
.align 8
.long svj_srt-(svf_info)+8
.long 0
.quad 0
.quad 4294967312
svf_info:
.LcyC:
leaq -16(%rbp),%rax
cmpq %r15,%rax
jb .LcyE
movq $stg_upd_frame_info,-16(%rbp)
movq %rbx,-8(%rbp)
movl $ghczmprim_GHCziCString_unpackCStringzh_closure,%ebx
movl $cyy_str,%r14d
addq $-16,%rbp
jmp stg_ap_n_fast
.LcyE:
jmp *-16(%r13)
.size svf_info, .-svf_info
.text
.align 8
.long svj_srt-(svh_info)+0
.long 0
.quad 0
.quad 253403070480
svh_info:
.LcyK:
leaq -16(%rbp),%rax
cmpq %r15,%rax
jb .LcyM
addq $32,%r12
cmpq 144(%r13),%r12
ja .LcyO
movq $stg_upd_frame_info,-16(%rbp)
movq %rbx,-8(%rbp)
movq $sve_info,-24(%r12)
movq $svf_info,-8(%r12)
movl $base_GHCziBase_zpzp_closure,%ebx
leaq -8(%r12),%r14
leaq -24(%r12),%rsi
addq $-16,%rbp
jmp stg_ap_pp_fast
.LcyO:
movq $32,192(%r13)
.LcyM:
jmp *-16(%r13)
.size svh_info, .-svh_info
.text
.align 8
.long svj_srt-(svj_info)+0
.long 0
.quad 0
.quad 270582939670
svj_info:
.LcyU:
leaq -16(%rbp),%rax
cmpq %r15,%rax
jb .LcyW
addq $32,%r12
cmpq 144(%r13),%r12
ja .LcyY
movq $stg_CAF_BLACKHOLE_info,-24(%r12)
movq 160(%r13),%rax
movq %rax,-16(%r12)
movq %r13,%rdi
movq %rbx,%rsi
leaq -24(%r12),%rdx
subq $8,%rsp
movl $0,%eax
call newCAF
addq $8,%rsp
testq %rax,%rax
je .LcyZ
.Lcz0:
movq $stg_bh_upd_frame_info,-16(%rbp)
leaq -24(%r12),%rax
movq %rax,-8(%rbp)
movq $svh_info,-8(%r12)
movl $base_SystemziIO_putStrLn_closure,%ebx
leaq -8(%r12),%r14
addq $-16,%rbp
jmp stg_ap_p_fast
.LcyY:
movq $32,192(%r13)
.LcyW:
jmp *-16(%r13)
.LcyZ:
jmp *(%rbx)
.size svj_info, .-svj_info
.section .data
.align 8
.align 1
svk_srt:
.quad base_GHCziBase_zpzp_closure
.quad ghczmprim_GHCziCString_unpackCStringzh_closure
.quad base_SystemziIO_putStrLn_closure
.quad base_GHCziNum_zdfNumInteger_closure
.quad base_GHCziShow_zdfShowInteger_closure
.data
.align 8
.align 1
svk_closure:
.quad svk_info
.quad 0
.quad 0
.quad 0
.text
.align 8
.long svk_srt-(suJ_info)+24
.long 0
.quad 0
.quad 4294967312
suJ_info:
.Lczn:
leaq -16(%rbp),%rax
cmpq %r15,%rax
jb .Lczp
addq $88,%r12
cmpq 144(%r13),%r12
ja .Lczr
movq $stg_upd_frame_info,-16(%rbp)
movq %rbx,-8(%rbp)
movq $integerzmgmp_GHCziIntegerziType_Szh_con_info,-80(%r12)
movq $5,-72(%r12)
movq $Main_BinaryLeaf_con_info,-64(%r12)
leaq -79(%r12),%rax
movq %rax,-56(%r12)
movq $integerzmgmp_GHCziIntegerziType_Szh_con_info,-48(%r12)
movq $4,-40(%r12)
movq $Main_BinaryLeaf_con_info,-32(%r12)
leaq -47(%r12),%rax
movq %rax,-24(%r12)
movq $Main_BinaryBranch_con_info,-16(%r12)
leaq -31(%r12),%rax
movq %rax,-8(%r12)
leaq -63(%r12),%rax
movq %rax,0(%r12)
movl $base_GHCziNum_zdfNumInteger_closure,%r14d
leaq -14(%r12),%rsi
addq $-16,%rbp
jmp rah_info
.Lczr:
movq $88,192(%r13)
.Lczp:
jmp *-16(%r13)
.size suJ_info, .-suJ_info
.text
.align 8
.long svk_srt-(suL_info)+24
.long 0
.quad 0
.quad 12884901904
suL_info:
.LczB:
leaq -32(%rbp),%rax
cmpq %r15,%rax
jb .LczD
addq $16,%r12
cmpq 144(%r13),%r12
ja .LczF
movq $stg_upd_frame_info,-16(%rbp)
movq %rbx,-8(%rbp)
movq $suJ_info,-8(%r12)
leaq -8(%r12),%rax
movq %rax,-24(%rbp)
movq $stg_ap_p_info,-32(%rbp)
movl $base_GHCziShow_zdfShowInteger_closure,%r14d
addq $-32,%rbp
jmp base_GHCziShow_show_info
.LczF:
movq $16,192(%r13)
.LczD:
jmp *-16(%r13)
.size suL_info, .-suL_info
.section .rodata
.align 8
.align 1
czN_str:
.byte 66
.byte 105
.byte 110
.byte 97
.byte 114
.byte 121
.byte 83
.byte 117
.byte 109
.byte 32
.byte 61
.byte 32
.byte 0
.text
.align 8
.long svk_srt-(suM_info)+8
.long 0
.quad 0
.quad 4294967312
suM_info:
.LczR:
leaq -16(%rbp),%rax
cmpq %r15,%rax
jb .LczT
movq $stg_upd_frame_info,-16(%rbp)
movq %rbx,-8(%rbp)
movl $ghczmprim_GHCziCString_unpackCStringzh_closure,%ebx
movl $czN_str,%r14d
addq $-16,%rbp
jmp stg_ap_n_fast
.LczT:
jmp *-16(%r13)
.size suM_info, .-suM_info
.text
.align 8
.long svk_srt-(suO_info)+0
.long 0
.quad 0
.quad 115964117008
suO_info:
.LczZ:
leaq -16(%rbp),%rax
cmpq %r15,%rax
jb .LcA1
addq $32,%r12
cmpq 144(%r13),%r12
ja .LcA3
movq $stg_upd_frame_info,-16(%rbp)
movq %rbx,-8(%rbp)
movq $suL_info,-24(%r12)
movq $suM_info,-8(%r12)
movl $base_GHCziBase_zpzp_closure,%ebx
leaq -8(%r12),%r14
leaq -24(%r12),%rsi
addq $-16,%rbp
jmp stg_ap_pp_fast
.LcA3:
movq $32,192(%r13)
.LcA1:
jmp *-16(%r13)
.size suO_info, .-suO_info
.text
.align 8
.long svk_srt-(svk_info)+0
.long 0
.quad 0
.quad 133143986198
svk_info:
.LcA9:
leaq -16(%rbp),%rax
cmpq %r15,%rax
jb .LcAb
addq $32,%r12
cmpq 144(%r13),%r12
ja .LcAd
movq $stg_CAF_BLACKHOLE_info,-24(%r12)
movq 160(%r13),%rax
movq %rax,-16(%r12)
movq %r13,%rdi
movq %rbx,%rsi
leaq -24(%r12),%rdx
subq $8,%rsp
movl $0,%eax
call newCAF
addq $8,%rsp
testq %rax,%rax
je .LcAe
.LcAf:
movq $stg_bh_upd_frame_info,-16(%rbp)
leaq -24(%r12),%rax
movq %rax,-8(%rbp)
movq $suO_info,-8(%r12)
movl $base_SystemziIO_putStrLn_closure,%ebx
leaq -8(%r12),%r14
addq $-16,%rbp
jmp stg_ap_p_fast
.LcAd:
movq $32,192(%r13)
.LcAb:
jmp *-16(%r13)
.LcAe:
jmp *(%rbx)
.size svk_info, .-svk_info
.section .data
.align 8
.align 1
Main_main_srt:
.quad base_GHCziBase_zdfMonadIO_closure
.quad svj_closure
.quad svk_closure
.data
.align 8
.align 1
.globl Main_main_closure
.type Main_main_closure, @object
Main_main_closure:
.quad Main_main_info
.quad 0
.quad 0
.quad 0
.text
.align 8
.long Main_main_srt-(Main_main_info)+0
.long 0
.quad 0
.quad 30064771094
.globl Main_main_info
.type Main_main_info, @object
Main_main_info:
.LcAw:
leaq -40(%rbp),%rax
cmpq %r15,%rax
jb .LcAy
addq $16,%r12
cmpq 144(%r13),%r12
ja .LcAA
movq $stg_CAF_BLACKHOLE_info,-8(%r12)
movq 160(%r13),%rax
movq %rax,0(%r12)
movq %r13,%rdi
movq %rbx,%rsi
leaq -8(%r12),%rdx
subq $8,%rsp
movl $0,%eax
call newCAF
addq $8,%rsp
testq %rax,%rax
je .LcAB
.LcAC:
movq $stg_bh_upd_frame_info,-16(%rbp)
leaq -8(%r12),%rax
movq %rax,-8(%rbp)
movq $svj_closure,-24(%rbp)
movq $svk_closure,-32(%rbp)
movq $stg_ap_pp_info,-40(%rbp)
movl $base_GHCziBase_zdfMonadIO_closure,%r14d
addq $-40,%rbp
jmp base_GHCziBase_zgzg_info
.LcAA:
movq $16,192(%r13)
.LcAy:
jmp *-16(%r13)
.LcAB:
jmp *(%rbx)
.size Main_main_info, .-Main_main_info
.section .data
.align 8
.align 1
ZCMain_main_srt:
.quad base_GHCziTopHandler_runMainIO_closure
.quad Main_main_closure
.data
.align 8
.align 1
.globl ZCMain_main_closure
.type ZCMain_main_closure, @object
ZCMain_main_closure:
.quad ZCMain_main_info
.quad 0
.quad 0
.quad 0
.text
.align 8
.long ZCMain_main_srt-(ZCMain_main_info)+0
.long 0
.quad 0
.quad 12884901910
.globl ZCMain_main_info
.type ZCMain_main_info, @object
ZCMain_main_info:
.LcAT:
leaq -16(%rbp),%rax
cmpq %r15,%rax
jb .LcAV
addq $16,%r12
cmpq 144(%r13),%r12
ja .LcAX
movq $stg_CAF_BLACKHOLE_info,-8(%r12)
movq 160(%r13),%rax
movq %rax,0(%r12)
movq %r13,%rdi
movq %rbx,%rsi
leaq -8(%r12),%rdx
subq $8,%rsp
movl $0,%eax
call newCAF
addq $8,%rsp
testq %rax,%rax
je .LcAY
.LcAZ:
movq $stg_bh_upd_frame_info,-16(%rbp)
leaq -8(%r12),%rax
movq %rax,-8(%rbp)
movl $base_GHCziTopHandler_runMainIO_closure,%ebx
movl $Main_main_closure,%r14d
addq $-16,%rbp
jmp stg_ap_p_fast
.LcAX:
movq $16,192(%r13)
.LcAV:
jmp *-16(%r13)
.LcAY:
jmp *(%rbx)
.size ZCMain_main_info, .-ZCMain_main_info
.data
.align 8
.align 1
.globl Main_NaryLeaf_closure
.type Main_NaryLeaf_closure, @object
Main_NaryLeaf_closure:
.quad Main_NaryLeaf_info
.text
.align 8
.quad 4294967301
.quad 0
.quad 15
Main_NaryLeaf_info:
.LcBb:
addq $16,%r12
cmpq 144(%r13),%r12
ja .LcBg
movq $Main_NaryLeaf_con_info,-8(%r12)
movq %r14,0(%r12)
leaq -7(%r12),%rbx
jmp *0(%rbp)
.LcBg:
movq $16,192(%r13)
.LcBe:
movl $Main_NaryLeaf_closure,%ebx
jmp *-8(%r13)
.size Main_NaryLeaf_info, .-Main_NaryLeaf_info
.data
.align 8
.align 1
.globl Main_NaryBranch_closure
.type Main_NaryBranch_closure, @object
Main_NaryBranch_closure:
.quad Main_NaryBranch_info
.text
.align 8
.quad 4294967301
.quad 0
.quad 15
Main_NaryBranch_info:
.LcBo:
addq $16,%r12
cmpq 144(%r13),%r12
ja .LcBt
movq $Main_NaryBranch_con_info,-8(%r12)
movq %r14,0(%r12)
leaq -6(%r12),%rbx
jmp *0(%rbp)
.LcBt:
movq $16,192(%r13)
.LcBr:
movl $Main_NaryBranch_closure,%ebx
jmp *-8(%r13)
.size Main_NaryBranch_info, .-Main_NaryBranch_info
.data
.align 8
.align 1
.globl Main_BinaryLeaf_closure
.type Main_BinaryLeaf_closure, @object
Main_BinaryLeaf_closure:
.quad Main_BinaryLeaf_info
.text
.align 8
.quad 4294967301
.quad 0
.quad 15
Main_BinaryLeaf_info:
.LcBB:
addq $16,%r12
cmpq 144(%r13),%r12
ja .LcBG
movq $Main_BinaryLeaf_con_info,-8(%r12)
movq %r14,0(%r12)
leaq -7(%r12),%rbx
jmp *0(%rbp)
.LcBG:
movq $16,192(%r13)
.LcBE:
movl $Main_BinaryLeaf_closure,%ebx
jmp *-8(%r13)
.size Main_BinaryLeaf_info, .-Main_BinaryLeaf_info
.data
.align 8
.align 1
.globl Main_BinaryBranch_closure
.type Main_BinaryBranch_closure, @object
Main_BinaryBranch_closure:
.quad Main_BinaryBranch_info
.text
.align 8
.quad 8589934604
.quad 0
.quad 15
Main_BinaryBranch_info:
.LcBO:
addq $24,%r12
cmpq 144(%r13),%r12
ja .LcBT
movq $Main_BinaryBranch_con_info,-16(%r12)
movq %r14,-8(%r12)
movq %rsi,0(%r12)
leaq -14(%r12),%rbx
jmp *0(%rbp)
.LcBT:
movq $24,192(%r13)
.LcBR:
movl $Main_BinaryBranch_closure,%ebx
jmp *-8(%r13)
.size Main_BinaryBranch_info, .-Main_BinaryBranch_info
.section .rodata
.align 8
.align 1
iBW_str:
.byte 109
.byte 97
.byte 105
.byte 110
.byte 58
.byte 77
.byte 97
.byte 105
.byte 110
.byte 46
.byte 78
.byte 97
.byte 114
.byte 121
.byte 76
.byte 101
.byte 97
.byte 102
.byte 0
.text
.align 8
.long iBW_str-(Main_NaryLeaf_con_info)+0
.long 0
.quad 1
.quad 2
.globl Main_NaryLeaf_con_info
.type Main_NaryLeaf_con_info, @object
Main_NaryLeaf_con_info:
.LcBZ:
incq %rbx
jmp *0(%rbp)
.size Main_NaryLeaf_con_info, .-Main_NaryLeaf_con_info
.section .rodata
.align 8
.align 1
iC2_str:
.byte 109
.byte 97
.byte 105
.byte 110
.byte 58
.byte 77
.byte 97
.byte 105
.byte 110
.byte 46
.byte 78
.byte 97
.byte 114
.byte 121
.byte 76
.byte 101
.byte 97
.byte 102
.byte 0
.text
.align 8
.long iC2_str-(Main_NaryLeaf_static_info)+0
.long 0
.quad 1
.quad 7
.globl Main_NaryLeaf_static_info
.type Main_NaryLeaf_static_info, @object
Main_NaryLeaf_static_info:
.LcC5:
incq %rbx
jmp *0(%rbp)
.size Main_NaryLeaf_static_info, .-Main_NaryLeaf_static_info
.section .rodata
.align 8
.align 1
iC8_str:
.byte 109
.byte 97
.byte 105
.byte 110
.byte 58
.byte 77
.byte 97
.byte 105
.byte 110
.byte 46
.byte 78
.byte 97
.byte 114
.byte 121
.byte 66
.byte 114
.byte 97
.byte 110
.byte 99
.byte 104
.byte 0
.text
.align 8
.long iC8_str-(Main_NaryBranch_con_info)+0
.long 0
.quad 1
.quad 4294967298
.globl Main_NaryBranch_con_info
.type Main_NaryBranch_con_info, @object
Main_NaryBranch_con_info:
.LcCb:
addq $2,%rbx
jmp *0(%rbp)
.size Main_NaryBranch_con_info, .-Main_NaryBranch_con_info
.section .rodata
.align 8
.align 1
iCe_str:
.byte 109
.byte 97
.byte 105
.byte 110
.byte 58
.byte 77
.byte 97
.byte 105
.byte 110
.byte 46
.byte 78
.byte 97
.byte 114
.byte 121
.byte 66
.byte 114
.byte 97
.byte 110
.byte 99
.byte 104
.byte 0
.text
.align 8
.long iCe_str-(Main_NaryBranch_static_info)+0
.long 0
.quad 1
.quad 4294967303
.globl Main_NaryBranch_static_info
.type Main_NaryBranch_static_info, @object
Main_NaryBranch_static_info:
.LcCh:
addq $2,%rbx
jmp *0(%rbp)
.size Main_NaryBranch_static_info, .-Main_NaryBranch_static_info
.section .rodata
.align 8
.align 1
iCk_str:
.byte 109
.byte 97
.byte 105
.byte 110
.byte 58
.byte 77
.byte 97
.byte 105
.byte 110
.byte 46
.byte 66
.byte 105
.byte 110
.byte 97
.byte 114
.byte 121
.byte 76
.byte 101
.byte 97
.byte 102
.byte 0
.text
.align 8
.long iCk_str-(Main_BinaryLeaf_con_info)+0
.long 0
.quad 1
.quad 2
.globl Main_BinaryLeaf_con_info
.type Main_BinaryLeaf_con_info, @object
Main_BinaryLeaf_con_info:
.LcCn:
incq %rbx
jmp *0(%rbp)
.size Main_BinaryLeaf_con_info, .-Main_BinaryLeaf_con_info
.section .rodata
.align 8
.align 1
iCq_str:
.byte 109
.byte 97
.byte 105
.byte 110
.byte 58
.byte 77
.byte 97
.byte 105
.byte 110
.byte 46
.byte 66
.byte 105
.byte 110
.byte 97
.byte 114
.byte 121
.byte 76
.byte 101
.byte 97
.byte 102
.byte 0
.text
.align 8
.long iCq_str-(Main_BinaryLeaf_static_info)+0
.long 0
.quad 1
.quad 7
.globl Main_BinaryLeaf_static_info
.type Main_BinaryLeaf_static_info, @object
Main_BinaryLeaf_static_info:
.LcCt:
incq %rbx
jmp *0(%rbp)
.size Main_BinaryLeaf_static_info, .-Main_BinaryLeaf_static_info
.section .rodata
.align 8
.align 1
iCw_str:
.byte 109
.byte 97
.byte 105
.byte 110
.byte 58
.byte 77
.byte 97
.byte 105
.byte 110
.byte 46
.byte 66
.byte 105
.byte 110
.byte 97
.byte 114
.byte 121
.byte 66
.byte 114
.byte 97
.byte 110
.byte 99
.byte 104
.byte 0
.text
.align 8
.long iCw_str-(Main_BinaryBranch_con_info)+0
.long 0
.quad 2
.quad 4294967300
.globl Main_BinaryBranch_con_info
.type Main_BinaryBranch_con_info, @object
Main_BinaryBranch_con_info:
.LcCz:
addq $2,%rbx
jmp *0(%rbp)
.size Main_BinaryBranch_con_info, .-Main_BinaryBranch_con_info
.section .rodata
.align 8
.align 1
iCC_str:
.byte 109
.byte 97
.byte 105
.byte 110
.byte 58
.byte 77
.byte 97
.byte 105
.byte 110
.byte 46
.byte 66
.byte 105
.byte 110
.byte 97
.byte 114
.byte 121
.byte 66
.byte 114
.byte 97
.byte 110
.byte 99
.byte 104
.byte 0
.text
.align 8
.long iCC_str-(Main_BinaryBranch_static_info)+0
.long 0
.quad 2
.quad 4294967303
.globl Main_BinaryBranch_static_info
.type Main_BinaryBranch_static_info, @object
Main_BinaryBranch_static_info:
.LcCF:
addq $2,%rbx
jmp *0(%rbp)
.size Main_BinaryBranch_static_info, .-Main_BinaryBranch_static_info
.section .note.GNU-stack,"",@progbits
.ident "GHC 7.4.1"
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment