.file "20001124-1.c" .text .align 2 .type isofs_bread, @function isofs_bread: link.w %a6,#0 tst.l 8(%a6) jbeq .L2 jbsr abort .align 2 .L2: clr.l -(%sp) jbsr exit nop .size isofs_bread, .-isofs_bread .globl __ashrdi3 .align 2 .type do_isofs_readdir, @function do_isofs_readdir: link.w %a6,#-12 movm.l #0x3f3c,-(%sp) move.l 8(%a6),%a5 move.l 12(%a6),%a2 move.l 8(%a5),%a3 move.l (%a3),%d7 move.b 4(%a3),-5(%a6) sub.l %a4,%a4 move.l (%a2),%d2 move.l 4(%a2),%d3 move.l (%a5),%d0 move.l 4(%a5),%d1 sub.l %d3,%d1 subx.l %d2,%d0 jble .L3 move.l %d7,%d0 subq.l #1,%d0 move.l %d0,-4(%a6) move.l %d0,%d4 and.l 4(%a2),%d4 move.b -5(%a6),%d1 clr.l -(%sp) move.b %d1,(3,%sp) move.l %d3,-(%sp) move.l %d2,-(%sp) jbsr __ashrdi3 lea (12,%sp),%sp move.l %d1,-10(%a6) move.l 6(%a3),%d2 clr.l %d3 .align 2 .L12: tst.l %a4 jbeq .L15 .L8: move.b -5(%a6),%d3 move.l -10(%a6),%d0 lsl.l %d3,%d0 add.l %d0,%d2 jbne .L9 clr.l %d5 moveq.l #1,%d6 add.l %d6,4(%a2) move.l (%a2),%d0 addx.l %d5,%d0 move.l %d0,(%a2) .L9: cmp.l %d4,%d7 jbhi .L10 and.l -4(%a6),%d4 .L10: tst.b (%a4) jbeq .L11 clr.l %d5 moveq.l #1,%d6 add.l %d6,4(%a2) move.l (%a2),%d0 addx.l %d5,%d0 move.l %d0,(%a2) .L11: move.l (%a2),%d0 move.l 4(%a2),%d1 clr.l %d5 moveq.l #1,%d6 add.l %d1,%d6 addx.l %d0,%d5 move.l %d5,(%a2) move.l %d6,4(%a2) clr.l %d6 addq.l #1,%d1 addx.l %d6,%d0 move.l (%a5),%d5 move.l 4(%a5),%d6 sub.l %d6,%d1 subx.l %d5,%d0 jblt .L12 jbra .L3 .align 2 .L15: move.l -10(%a6),-(%sp) jbsr isofs_bread move.l %a0,%a4 addq.l #4,%sp jbra .L8 .align 2 .L3: clr.l %d0 movm.l -52(%a6),#0x3cfc unlk %a6 rts .size do_isofs_readdir, .-do_isofs_readdir .align 2 .globl main .type main, @function main: link.w %a6,#0 lea s,%a0 move.l #512,(%a0) move.b #9,s+4 lea i,%a1 clr.l (%a1) move.l #2048,4(%a1) move.l %a0,i+8 lea f,%a0 clr.l (%a0) clr.l 4(%a0) move.l %a0,-(%sp) move.l %a1,-(%sp) jbsr do_isofs_readdir jbsr abort nop .size main, .-main .comm s,10,2 .comm i,12,2 .comm f,8,2 .ident "GCC: (GNU) 3.3.2"