Mercurial > hg > Members > kono > nitros9-code
annotate lib/kreiderclib/fwrite.as @ 2824:1647f1874cdf lwtools-port
Added Kreidier C library
| author | Boisy Pitre <boisy.pitre@nuance.com> |
|---|---|
| date | Thu, 23 May 2013 05:49:13 -0500 |
| parents | |
| children |
| rev | line source |
|---|---|
| 2824 | 1 * Disassembly by Os9disasm of fwrite.r |
| 2 | |
| 3 section code | |
| 4 | |
| 5 fwrite: pshs d,x,u | |
| 6 ldu 8,s | |
| 7 clra | |
| 8 clrb | |
| 9 bra L002b | |
| 10 L0008 ldd 10,s | |
| 11 bra L0022 | |
| 12 L000c ldx 14,s | |
| 13 ldb ,u+ | |
| 14 pshs d,x | |
| 15 lbsr putc | |
| 16 leas 4,s | |
| 17 cmpd #-1 | |
| 18 beq L0032 | |
| 19 ldd ,s | |
| 20 subd #1 | |
| 21 L0022 std ,s | |
| 22 bne L000c | |
| 23 ldd 2,s | |
| 24 addd #1 | |
| 25 L002b std 2,s | |
| 26 cmpd 12,s | |
| 27 blt L0008 | |
| 28 L0032 leas 2,s | |
| 29 puls d,u,pc | |
| 30 | |
| 31 endsect | |
| 32 |