.file "930518-1.c" .globl bar .section .bss .align 2 .type bar, @object .size bar, 4 bar: .zero 4 .text .align 2 .globl f .type f, @function f: link.w %a6,#0 move.l %d2,-(%sp) move.l 8(%a6),%a0 moveq.l #2,%d1 move.l bar,%d0 cmp.l %d1,%d0 jbge .L7 .align 2 .L5: sub.l %d0,%d1 move.l %d1,(%a0)+ moveq.l #1,%d0 move.l %d0,bar cmp.l %d1,%d0 jblt .L5 .L7: move.l (%sp)+,%d2 unlk %a6 rts .size f, .-f .align 2 .globl main .type main, @function main: link.w %a6,#-8 clr.l -4(%a6) clr.l -8(%a6) pea -8(%a6) jbsr f addq.l #4,%sp moveq.l #2,%d0 cmp.l -8(%a6),%d0 jbne .L10 moveq.l #1,%d0 cmp.l -4(%a6),%d0 jbeq .L9 .L10: jbsr abort .align 2 .L9: clr.l -(%sp) jbsr exit nop .size main, .-main .ident "GCC: (GNU) 3.3.2"