.file "sort2.c" .text .align 2 .globl main .type main, @function main: link.w %a6,#0 movm.l #0x3e38,-(%sp) clr.l %d6 lea Sort_array,%a4 .L18: clr.l %d3 moveq.l #9,%d5 move.w #100,%a3 moveq.l #45,%d4 .align 2 .L17: move.l %d4,%d1 add.l %d1,%d1 lea Tab,%a2 move.l %a3,%a1 .align 2 .L16: move.l %d3,%a0 addq.l #1,%d3 moveq.l #1,%d0 and.l %d1,%d0 jbeq .L14 move.l %d1,%d0 addq.l #1,%d0 move.l %d0,%d2 .L15: move.l %d2,(%a2,%a0.l*4) move.l %d0,%d1 cmp.l %d0,%a1 jbgt .L16 subq.l #1,%d5 subq.l #5,%d4 lea (-10,%a3),%a3 tst.l %d5 jbge .L17 pea 99.w pea Tab jbsr (%a4) addq.l #8,%sp addq.l #1,%d6 cmp.l #999,%d6 jble .L18 jbra .L25 .align 2 .L14: move.l %d1,%d2 subq.l #1,%d2 move.l %d1,%d0 addq.l #1,%d0 jbra .L15 .align 2 .L25: clr.l %d0 movm.l -32(%a6),#0x1c7c unlk %a6 rts .size main, .-main .align 2 .globl Sort_array .type Sort_array, @function Sort_array: link.w %a6,#0 movm.l #0x3800,-(%sp) move.l 8(%a6),%d4 move.l 12(%a6),%d3 .align 2 .L27: clr.b %d2 tst.l %d3 jble .L38 move.l %d4,%a0 move.l %d3,%d1 .align 2 .L35: move.l (%a0),%a1 move.l 4(%a0),%d0 cmp.l %a1,%d0 jbge .L32 move.l %d0,(%a0) move.l %a1,4(%a0) moveq.l #1,%d2 .L32: subq.l #1,%d1 addq.l #4,%a0 jbne .L35 .L38: tst.b %d2 jbne .L27 movm.l (%sp)+,#0x1c unlk %a6 rts .size Sort_array, .-Sort_array .align 2 .globl Print_array .type Print_array, @function Print_array: link.w %a6,#0 moveq.l #9,%d0 .align 2 .L49: subq.l #1,%d0 jbpl .L49 unlk %a6 rts .size Print_array, .-Print_array .comm Tab,400,2 .ident "GCC: (GNU) 3.3.2"