Created
March 20, 2013 06:45
-
-
Save agam/5202781 to your computer and use it in GitHub Desktop.
Simple loop in haskell: data.sequence
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
.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 | |
sEN_srt: | |
.quad containerszm0zi4zi2zi1_DataziSequence_zbzg_closure | |
.quad containerszm0zi4zi2zi1_DataziSequence_singleton_closure | |
.data | |
.align 8 | |
.align 1 | |
sEN_closure: | |
.quad sEN_info | |
.quad 0 | |
.quad 0 | |
.quad 0 | |
.text | |
.align 8 | |
.long sEN_srt-(sEn_info)+8 | |
.long 0 | |
.quad 0 | |
.quad 4294967312 | |
sEn_info: | |
.LcFu: | |
leaq -16(%rbp),%rax | |
cmpq %r15,%rax | |
jb .LcFw | |
addq $16,%r12 | |
cmpq 144(%r13),%r12 | |
ja .LcFy | |
movq $stg_upd_frame_info,-16(%rbp) | |
movq %rbx,-8(%rbp) | |
movq $integerzmgmp_GHCziIntegerziType_Szh_con_info,-8(%r12) | |
movq $12,0(%r12) | |
movl $containerszm0zi4zi2zi1_DataziSequence_singleton_closure,%ebx | |
leaq -7(%r12),%r14 | |
addq $-16,%rbp | |
jmp stg_ap_p_fast | |
.LcFy: | |
movq $16,192(%r13) | |
.LcFw: | |
jmp *-16(%r13) | |
.size sEn_info, .-sEn_info | |
.text | |
.align 8 | |
.long sEN_srt-(sEr_info)+0 | |
.long 0 | |
.quad 0 | |
.quad 12884901904 | |
sEr_info: | |
.LcFE: | |
leaq -16(%rbp),%rax | |
cmpq %r15,%rax | |
jb .LcFG | |
addq $32,%r12 | |
cmpq 144(%r13),%r12 | |
ja .LcFI | |
movq $stg_upd_frame_info,-16(%rbp) | |
movq %rbx,-8(%rbp) | |
movq $integerzmgmp_GHCziIntegerziType_Szh_con_info,-24(%r12) | |
movq $23,-16(%r12) | |
movq $sEn_info,-8(%r12) | |
movl $containerszm0zi4zi2zi1_DataziSequence_zbzg_closure,%ebx | |
leaq -8(%r12),%r14 | |
leaq -23(%r12),%rsi | |
addq $-16,%rbp | |
jmp stg_ap_pp_fast | |
.LcFI: | |
movq $32,192(%r13) | |
.LcFG: | |
jmp *-16(%r13) | |
.size sEr_info, .-sEr_info | |
.text | |
.align 8 | |
.long sEN_srt-(sEv_info)+0 | |
.long 0 | |
.quad 0 | |
.quad 12884901904 | |
sEv_info: | |
.LcFO: | |
leaq -16(%rbp),%rax | |
cmpq %r15,%rax | |
jb .LcFQ | |
addq $32,%r12 | |
cmpq 144(%r13),%r12 | |
ja .LcFS | |
movq $stg_upd_frame_info,-16(%rbp) | |
movq %rbx,-8(%rbp) | |
movq $integerzmgmp_GHCziIntegerziType_Szh_con_info,-24(%r12) | |
movq $34,-16(%r12) | |
movq $sEr_info,-8(%r12) | |
movl $containerszm0zi4zi2zi1_DataziSequence_zbzg_closure,%ebx | |
leaq -8(%r12),%r14 | |
leaq -23(%r12),%rsi | |
addq $-16,%rbp | |
jmp stg_ap_pp_fast | |
.LcFS: | |
movq $32,192(%r13) | |
.LcFQ: | |
jmp *-16(%r13) | |
.size sEv_info, .-sEv_info | |
.text | |
.align 8 | |
.long sEN_srt-(sEz_info)+0 | |
.long 0 | |
.quad 0 | |
.quad 12884901904 | |
sEz_info: | |
.LcFY: | |
leaq -16(%rbp),%rax | |
cmpq %r15,%rax | |
jb .LcG0 | |
addq $32,%r12 | |
cmpq 144(%r13),%r12 | |
ja .LcG2 | |
movq $stg_upd_frame_info,-16(%rbp) | |
movq %rbx,-8(%rbp) | |
movq $integerzmgmp_GHCziIntegerziType_Szh_con_info,-24(%r12) | |
movq $45,-16(%r12) | |
movq $sEv_info,-8(%r12) | |
movl $containerszm0zi4zi2zi1_DataziSequence_zbzg_closure,%ebx | |
leaq -8(%r12),%r14 | |
leaq -23(%r12),%rsi | |
addq $-16,%rbp | |
jmp stg_ap_pp_fast | |
.LcG2: | |
movq $32,192(%r13) | |
.LcG0: | |
jmp *-16(%r13) | |
.size sEz_info, .-sEz_info | |
.text | |
.align 8 | |
.long sEN_srt-(sED_info)+0 | |
.long 0 | |
.quad 0 | |
.quad 12884901904 | |
sED_info: | |
.LcG8: | |
leaq -16(%rbp),%rax | |
cmpq %r15,%rax | |
jb .LcGa | |
addq $32,%r12 | |
cmpq 144(%r13),%r12 | |
ja .LcGc | |
movq $stg_upd_frame_info,-16(%rbp) | |
movq %rbx,-8(%rbp) | |
movq $integerzmgmp_GHCziIntegerziType_Szh_con_info,-24(%r12) | |
movq $56,-16(%r12) | |
movq $sEz_info,-8(%r12) | |
movl $containerszm0zi4zi2zi1_DataziSequence_zbzg_closure,%ebx | |
leaq -8(%r12),%r14 | |
leaq -23(%r12),%rsi | |
addq $-16,%rbp | |
jmp stg_ap_pp_fast | |
.LcGc: | |
movq $32,192(%r13) | |
.LcGa: | |
jmp *-16(%r13) | |
.size sED_info, .-sED_info | |
.text | |
.align 8 | |
.long sEN_srt-(sEH_info)+0 | |
.long 0 | |
.quad 0 | |
.quad 12884901904 | |
sEH_info: | |
.LcGi: | |
leaq -16(%rbp),%rax | |
cmpq %r15,%rax | |
jb .LcGk | |
addq $32,%r12 | |
cmpq 144(%r13),%r12 | |
ja .LcGm | |
movq $stg_upd_frame_info,-16(%rbp) | |
movq %rbx,-8(%rbp) | |
movq $integerzmgmp_GHCziIntegerziType_Szh_con_info,-24(%r12) | |
movq $67,-16(%r12) | |
movq $sED_info,-8(%r12) | |
movl $containerszm0zi4zi2zi1_DataziSequence_zbzg_closure,%ebx | |
leaq -8(%r12),%r14 | |
leaq -23(%r12),%rsi | |
addq $-16,%rbp | |
jmp stg_ap_pp_fast | |
.LcGm: | |
movq $32,192(%r13) | |
.LcGk: | |
jmp *-16(%r13) | |
.size sEH_info, .-sEH_info | |
.text | |
.align 8 | |
.long sEN_srt-(sEL_info)+0 | |
.long 0 | |
.quad 0 | |
.quad 12884901904 | |
sEL_info: | |
.LcGs: | |
leaq -16(%rbp),%rax | |
cmpq %r15,%rax | |
jb .LcGu | |
addq $32,%r12 | |
cmpq 144(%r13),%r12 | |
ja .LcGw | |
movq $stg_upd_frame_info,-16(%rbp) | |
movq %rbx,-8(%rbp) | |
movq $integerzmgmp_GHCziIntegerziType_Szh_con_info,-24(%r12) | |
movq $78,-16(%r12) | |
movq $sEH_info,-8(%r12) | |
movl $containerszm0zi4zi2zi1_DataziSequence_zbzg_closure,%ebx | |
leaq -8(%r12),%r14 | |
leaq -23(%r12),%rsi | |
addq $-16,%rbp | |
jmp stg_ap_pp_fast | |
.LcGw: | |
movq $32,192(%r13) | |
.LcGu: | |
jmp *-16(%r13) | |
.size sEL_info, .-sEL_info | |
.text | |
.align 8 | |
.long sEN_srt-(sEN_info)+0 | |
.long 0 | |
.quad 0 | |
.quad 12884901910 | |
sEN_info: | |
.LcGC: | |
leaq -16(%rbp),%rax | |
cmpq %r15,%rax | |
jb .LcGE | |
addq $48,%r12 | |
cmpq 144(%r13),%r12 | |
ja .LcGG | |
movq $stg_CAF_BLACKHOLE_info,-40(%r12) | |
movq 160(%r13),%rax | |
movq %rax,-32(%r12) | |
movq %r13,%rdi | |
movq %rbx,%rsi | |
leaq -40(%r12),%rdx | |
subq $8,%rsp | |
movl $0,%eax | |
call newCAF | |
addq $8,%rsp | |
testq %rax,%rax | |
je .LcGH | |
.LcGI: | |
movq $stg_bh_upd_frame_info,-16(%rbp) | |
leaq -40(%r12),%rax | |
movq %rax,-8(%rbp) | |
movq $integerzmgmp_GHCziIntegerziType_Szh_con_info,-24(%r12) | |
movq $89,-16(%r12) | |
movq $sEL_info,-8(%r12) | |
movl $containerszm0zi4zi2zi1_DataziSequence_zbzg_closure,%ebx | |
leaq -8(%r12),%r14 | |
leaq -23(%r12),%rsi | |
addq $-16,%rbp | |
jmp stg_ap_pp_fast | |
.LcGG: | |
movq $48,192(%r13) | |
.LcGE: | |
jmp *-16(%r13) | |
.LcGH: | |
jmp *(%rbx) | |
.size sEN_info, .-sEN_info | |
.section .data | |
.align 8 | |
.align 1 | |
sEO_srt: | |
.quad base_SystemziIO_print_closure | |
.quad base_GHCziShow_zdfShowInteger_closure | |
.data | |
.align 8 | |
.align 1 | |
sEO_closure: | |
.quad sEO_info | |
.quad 0 | |
.quad 0 | |
.quad 0 | |
.text | |
.align 8 | |
.long sEO_srt-(sEO_info)+0 | |
.long 0 | |
.quad 0 | |
.quad 12884901910 | |
sEO_info: | |
.LcGZ: | |
leaq -16(%rbp),%rax | |
cmpq %r15,%rax | |
jb .LcH1 | |
addq $16,%r12 | |
cmpq 144(%r13),%r12 | |
ja .LcH3 | |
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 .LcH4 | |
.LcH5: | |
movq $stg_bh_upd_frame_info,-16(%rbp) | |
leaq -8(%r12),%rax | |
movq %rax,-8(%rbp) | |
movl $base_SystemziIO_print_closure,%ebx | |
movl $base_GHCziShow_zdfShowInteger_closure,%r14d | |
addq $-16,%rbp | |
jmp stg_ap_p_fast | |
.LcH3: | |
movq $16,192(%r13) | |
.LcH1: | |
jmp *-16(%r13) | |
.LcH4: | |
jmp *(%rbx) | |
.size sEO_info, .-sEO_info | |
.section .data | |
.align 8 | |
.align 1 | |
Main_main_srt: | |
.quad containerszm0zi4zi2zi1_DataziSequence_zdfFoldableSeq_closure | |
.quad base_DataziFoldable_mapMzu_closure | |
.quad base_GHCziBase_zdfMonadIO_closure | |
.quad sEN_closure | |
.quad sEO_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 133143986198 | |
.globl Main_main_info | |
.type Main_main_info, @object | |
Main_main_info: | |
.LcHm: | |
leaq -16(%rbp),%rax | |
cmpq %r15,%rax | |
jb .LcHo | |
addq $16,%r12 | |
cmpq 144(%r13),%r12 | |
ja .LcHq | |
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 .LcHr | |
.LcHs: | |
movq $stg_bh_upd_frame_info,-16(%rbp) | |
leaq -8(%r12),%rax | |
movq %rax,-8(%rbp) | |
movl $base_DataziFoldable_mapMzu_closure,%ebx | |
movl $containerszm0zi4zi2zi1_DataziSequence_zdfFoldableSeq_closure,%r14d | |
movl $base_GHCziBase_zdfMonadIO_closure,%esi | |
movl $sEO_closure,%edi | |
movl $sEN_closure,%r8d | |
addq $-16,%rbp | |
jmp stg_ap_pppp_fast | |
.LcHq: | |
movq $16,192(%r13) | |
.LcHo: | |
jmp *-16(%r13) | |
.LcHr: | |
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: | |
.LcHJ: | |
leaq -16(%rbp),%rax | |
cmpq %r15,%rax | |
jb .LcHL | |
addq $16,%r12 | |
cmpq 144(%r13),%r12 | |
ja .LcHN | |
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 .LcHO | |
.LcHP: | |
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 | |
.LcHN: | |
movq $16,192(%r13) | |
.LcHL: | |
jmp *-16(%r13) | |
.LcHO: | |
jmp *(%rbx) | |
.size ZCMain_main_info, .-ZCMain_main_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