.file "cleanup-2.c" .text .align 2 .type handler, @function handler: link.w %a6,#0 clr.l -(%sp) jbsr exit nop .size handler, .-handler .align 2 .type doit, @function doit: link.w %a6,#-4 pea -4(%a6) jbsr handler addq.l #4,%sp unlk %a6 rts .size doit, .-doit .align 2 .globl main .type main, @function main: link.w %a6,#0 jbsr doit jbsr abort nop .size main, .-main .ident "GCC: (GNU) 3.3.2"