Mercurial > hg > Members > kono > nitros9-code
view lib/kreiderclib/cldiv.as @ 2833:0f3030598435 lwtools-port
Really fix level 1 builds: Do not use os9 dcopy
Bugs in os9 dcopy make it run into infinite recursion before it
eventually dies of buffer overflow.
Instead use os9 makdir and copy, which was already used some places.
| author | Tormod Volden <debian.tormod@gmail.com> |
|---|---|
| date | Wed, 10 Jul 2013 19:09:05 +0200 |
| parents | 1647f1874cdf |
| children |
line wrap: on
line source
* Disassembly by Os9disasm of cldiv.r section bss * Uninitialized data (class B) B0000 rmb 1 * Initialized Data (class G) endsect section code _ldiv: bsr L0048 lda 1,s beq L0009 L0006 lbsr _lnegx L0009 leas 8,s lbra _lbexit _lmod: lda ,x ora 1,x ora 2,x ora 3,x bne L0029 ldd ,x std _flacc,y ldd 2,x leax _flacc,y std 2,x lbra _lbexit L0029 lda 2,s sta B0000,y bsr L005e ldd 10,s leax _flacc,y std ,x ldd 12,s std 2,x tst B0000,y bmi L0006 leas 8,s lbra _lbexit L0048 lda ,x ora 1,x ora 2,x ora 3,x bne L005e ldd 2,s std 6,s leas 6,s ldd #$002d lbra _rpterr L005e ldd ,x ldx 2,x pshs d,x ldd #0 pshs d std _flacc,y std _flacc+2,y tst 2,s bpl L007c leax 2,s lbsr _lnegx inc 1,s L007c tst 10,s bpl L0087 leax 10,s lbsr _lnegx com 1,s L0087 leax _flacc,y lda #1 L008d inca asl 5,s rol 4,s rol 3,s rol 2,s bpl L008d sta ,s L009a ldd 12,s subd 4,s std 12,s ldd 10,s sbcb 3,s sbca 2,s std 10,s bcc L00bc ldd 12,s addd 4,s std 12,s ldd 10,s adcb 3,s adca 2,s std 10,s andcc #254 bra L00be L00bc orcc #1 L00be rol 3,x rol 2,x rol 1,x rol ,x lsr 2,s ror 3,s ror 4,s ror 5,s dec ,s bne L009a jmp [6,s] endsect