Mercurial > hg > Members > kono > nitros9-code
comparison 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 |
comparison
equal
deleted
inserted
replaced
2823:ad769d2a03e4 | 2824:1647f1874cdf |
---|---|
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 |