.file "20000224-1.c" .globl loop_1 .data .align 2 .type loop_1, @object .size loop_1, 4 loop_1: .long 100 .globl loop_2 .align 2 .type loop_2, @object .size loop_2, 4 loop_2: .long 7 .globl flag .section .bss .align 2 .type flag, @object .size flag, 4 flag: .zero 4 .text .align 2 .globl test .type test, @function test: link.w %a6,#0 move.l %d2,-(%sp) sub.l %a0,%a0 move.l loop_1,%a1 tst.l %a1 jble .L13 move.l flag,%d1 move.l loop_2,%d2 .align 2 .L11: moveq.l #1,%d0 and.l %d1,%d0 jbeq .L5 tst.l %d2 jble .L5 move.l %d2,%d0 .align 2 .L10: addq.l #1,%a0 subq.l #1,%d0 jbne .L10 .align 2 .L5: move.l %d1,%d0 addq.l #1,%d0 move.l %d0,%d1 cmp.l %a1,%a0 jblt .L11 move.l %d0,flag .L13: moveq.l #1,%d0 move.l (%sp)+,%d2 unlk %a6 rts .size test, .-test .align 2 .globl main .type main, @function main: link.w %a6,#0 jbsr test moveq.l #1,%d1 cmp.l %d0,%d1 jbeq .L17 jbsr abort .align 2 .L17: clr.l -(%sp) jbsr exit nop .size main, .-main .ident "GCC: (GNU) 3.3.2"