Edinburgh IMP77 Compiler - Version 8.4 1 %begin .Ltext0: FIFTEEN.6022: .LFB190: leal 4(%esp), %ecx andl $-16, %esp pushl -4(%ecx) pushl %ebp movl %esp, %ebp pushl %edi pushl %esi pushl %ebx pushl %ecx subl $1848, %esp call __x86.get_pc_thunk.bx addl $_GLOBAL_OFFSET_TABLE_, %ebx movl %ebx, %edi movl %edi, -1856(%ebp) movl %ecx, %eax movl 4(%eax), %edx movl %edx, -1852(%ebp) movl %gs:20, %ebx movl %ebx, -28(%ebp) xorl %ebx, %ebx leal 8(%ebp), %edx movl %edx, -1840(%ebp) subl $8, %esp pushl -1852(%ebp) pushl (%eax) movl %edi, %ebx call _imp_initialise@PLT addl $16, %esp 2 %routine fifteen(%string(15) s) pushl %ebp movl %esp, %ebp pushl %edi pushl %esi pushl %ebx subl $300, %esp call __x86.get_pc_thunk.ax addl $_GLOBAL_OFFSET_TABLE_, %eax movl %eax, -304(%ebp) movl %ecx, -300(%ebp) movl %gs:20, %edi movl %edi, -28(%ebp) xorl %edi, %edi .LBB24: 3 printstring(s) leal -284(%ebp), %eax leal 8(%ebp), %ebx movl $64, %edx movl %eax, %edi movl %ebx, %esi movl %edx, %ecx rep movsl leal -284(%ebp), %edx leal -284(%ebp), %eax movl %edx, %ebx movl $64, %edx movl %eax, %edi movl %ebx, %esi movl %edx, %ecx rep movsl .LBE24: .LBB25: .LBB26: subl $256, %esp movl %esp, %eax movl %eax, %ebx leal -284(%ebp), %eax movl $64, %edx movl %ebx, %edi movl %eax, %esi movl %edx, %ecx rep movsl movl -304(%ebp), %esi movl %esi, %ebx call _imp_printstring@PLT addl $256, %esp .LBE26: .LBE25: .LBB27: .LBB28: movl %esi, %ebx call _imp_newline@PLT .LBE28: .LBE27: 4 newline 5 %end nop movl -28(%ebp), %eax xorl %gs:20, %eax je .L3 call __stack_chk_fail_local .L3: leal -12(%ebp), %esp popl %ebx popl %esi popl %edi popl %ebp ret .LFE190: .section .rodata .align 32 .LC0: .byte 45 .string "A string capacity exceeded fault was trapped." .zero 209 .align 32 .LC1: .byte 7 .string "abcdefg" .zero 247 .align 32 .LC2: .byte 31 .string "0123456789012345678901234567890" .zero 223 .globl main main: .LFB189: 6 7 %on %event 6 %start subl $8, %esp pushl $1 movl %edi, %ebx movl _imp_event@GOT(%ebx), %eax leal 532(%eax), %eax pushl %eax movl %edi, %ebx call __sigsetjmp@PLT addl $16, %esp testl %eax, %eax jne .L6 .LBB29: movl $6, -540(%ebp) movl $0, -1836(%ebp) .LBB30: movl $0, -1832(%ebp) jmp .L7 .L8: movl -1832(%ebp), %eax movl -540(%ebp,%eax,4), %eax movl $1, %edx movl %eax, %ecx sall %cl, %edx movl %edx, %eax orl %eax, -1836(%ebp) addl $1, -1832(%ebp) .L7: cmpl $0, -1832(%ebp) je .L8 .LBE30: movl -1836(%ebp), %eax .LBE29: subl $8, %esp pushl %eax movl -1856(%ebp), %ebx movl _imp_event@GOT(%ebx), %eax pushl %eax call _imp_on_event_enter@PLT addl $16, %esp testl %eax, %eax jne .L12 .L6: .LBB31: nop .L9: .LBB38: .LBB39: 8 print string("A string capacity exceeded fault was trapped."); new line leal -540(%ebp), %eax movl -1856(%ebp), %ebx leal .LC0@GOTOFF(%ebx), %edx movl $64, %ecx movl %eax, %edi movl %edx, %esi rep movsl leal -1820(%ebp), %eax leal -540(%ebp), %edx movl $64, %ecx movl %eax, %edi movl %edx, %esi rep movsl leal -284(%ebp), %eax leal -1820(%ebp), %edx movl $64, %ecx movl %eax, %edi movl %edx, %esi rep movsl .LBE31: .LBB32: .LBB33: subl $256, %esp movl %esp, %eax movl %eax, %edi leal -284(%ebp), %eax movl $64, %edx movl %eax, %esi movl %edx, %ecx rep movsl movl %ebx, %esi movl %esi, %ebx call _imp_printstring@PLT addl $256, %esp .LBE33: .LBE32: .LBB34: .LBB35: movl %esi, %ebx call _imp_newline@PLT movl $0, -1828(%ebp) .LBE35: .LBE34: .LBB36: .LBB37: subl $12, %esp pushl -1828(%ebp) movl %esi, %ebx call exit@PLT .L12: .LBE37: .LBE36: 9 %stop 10 %finish 11 12 %string(7) seven = "abcdefg" leal -540(%ebp), %eax movl -1856(%ebp), %ebx leal .LC1@GOTOFF(%ebx), %edx movl $64, %ecx movl %eax, %edi movl %edx, %esi rep movsl leal -1308(%ebp), %eax leal -540(%ebp), %edx movl $64, %ecx movl %eax, %edi movl %edx, %esi rep movsl .LBE39: leal -540(%ebp), %eax leal -1308(%ebp), %edx movl $64, %ecx movl %eax, %edi movl %edx, %esi rep movsl leal -540(%ebp), %eax .LBE38: subl $4, %esp pushl $7 pushl %eax leal -1564(%ebp), %eax pushl %eax movl %ebx, %esi movl %esi, %ebx call _imp_strncpy@PLT addl $16, %esp .LBB40: .LBB41: 13 %string(31) thirty one = "0123456789012345678901234567890" leal -540(%ebp), %eax movl %esi, %ebx leal .LC2@GOTOFF(%ebx), %edx movl $64, %ecx movl %eax, %edi movl %edx, %esi rep movsl leal -796(%ebp), %eax leal -540(%ebp), %edx movl $64, %ecx movl %eax, %edi movl %edx, %esi rep movsl .LBE41: leal -540(%ebp), %eax leal -796(%ebp), %edx movl $64, %ecx movl %eax, %edi movl %edx, %esi rep movsl leal -540(%ebp), %eax .LBE40: subl $4, %esp pushl $31 pushl %eax leal -1052(%ebp), %eax pushl %eax movl %ebx, -1856(%ebp) call _imp_strncpy@PLT addl $16, %esp .LBB42: 14 15 fifteen(thirty one) leal -540(%ebp), %eax leal -1052(%ebp), %edx movl $64, %ecx movl %eax, %edi movl %edx, %esi rep movsl leal -540(%ebp), %eax .LBE42: leal -1840(%ebp), %ebx subl $256, %esp movl %esp, %edx movl %eax, %esi movl $64, %eax movl %edx, %edi movl %eax, %ecx rep movsl movl %ebx, %ecx call FIFTEEN.6022 addl $256, %esp .LBB43: 16 fifteen(seven) leal -540(%ebp), %eax leal -1564(%ebp), %edx movl $64, %ecx movl %eax, %edi movl %edx, %esi rep movsl leal -540(%ebp), %eax .LBE43: leal -1840(%ebp), %ebx subl $256, %esp movl %esp, %edx movl %eax, %esi movl $64, %eax movl %edx, %edi movl %eax, %ecx rep movsl movl %ebx, %ecx call FIFTEEN.6022 addl $256, %esp movl $0, -1824(%ebp) .LBB44: .LBB45: subl $12, %esp pushl -1824(%ebp) movl -1856(%ebp), %ebx call exit@PLT .LBE45: .LBE44: .LFE189: .section .text.__x86.get_pc_thunk.ax,"axG",@progbits,__x86.get_pc_thunk.ax,comdat .globl __x86.get_pc_thunk.ax .hidden __x86.get_pc_thunk.ax __x86.get_pc_thunk.ax: .LFB191: movl (%esp), %eax ret .LFE191: .section .text.__x86.get_pc_thunk.bx,"axG",@progbits,__x86.get_pc_thunk.bx,comdat .globl __x86.get_pc_thunk.bx .hidden __x86.get_pc_thunk.bx __x86.get_pc_thunk.bx: .LFB192: movl (%esp), %ebx ret .LFE192: .Letext0: 17 18 %endofprogram 15 Statements compiled