.file "20000717-3.c" .globl c .data .align 2 .type c, @object .size c, 4 c: .long -1 .text .align 2 .globl foo .type foo, @function foo: link.w %a6,#0 move.l 8(%a6),%a0 move.l c,%d0 moveq.l #-10,%d1 add.l %d1,(%a0) unlk %a6 rts .size foo, .-foo .align 2 .globl main .type main, @function main: link.w %a6,#-4 moveq.l #1,%d0 move.l %d0,-4(%a6) pea -4(%a6) jbsr foo addq.l #4,%sp moveq.l #-1,%d1 cmp.l %d0,%d1 jbne .L4 moveq.l #-9,%d0 cmp.l -4(%a6),%d0 jbeq .L3 .L4: jbsr abort .align 2 .L3: clr.l -(%sp) jbsr exit nop .size main, .-main .ident "GCC: (GNU) 3.3.2"