Mercurial > hg > Members > kono > nitros9-code
annotate lib/kreiderclib/write.as @ 3285:345ff5806dd7
Correct coco.d filename in shipped Defsfile files
It seems that 8 years ago in commit 2624:b8c7b7fbf3c9 the coco defs were put into a
new "coco.d" (from "systype"), and the various level*/<port>/defsfile were updated.
However, the level*/<port>/defs/Defsfile (that are copied to the disk images under
DEFS) were apparently wrongly updated.
| author | hpmachining <aur@hpminc.com> |
|---|---|
| date | Thu, 18 Jun 2020 20:29:32 +0200 |
| parents | 1647f1874cdf |
| children |
| rev | line source |
|---|---|
| 2824 | 1 * Disassembly by Os9disasm of write.r |
| 2 | |
| 3 section code | |
| 4 | |
| 5 * OS-9 system function equates | |
| 6 | |
| 7 I$Write equ $8a | |
| 8 I$WritLn equ $8c | |
| 9 | |
| 10 write: pshs y | |
| 11 ldy 8,s | |
| 12 beq L0015 | |
| 13 lda 5,s | |
| 14 ldx 6,s | |
| 15 os9 I$Write | |
| 16 L000e bcc L0015 | |
| 17 puls y | |
| 18 lbra _os9err | |
| 19 L0015 tfr y,d | |
| 20 puls y,pc | |
| 21 writeln: pshs y | |
| 22 ldy 8,s | |
| 23 beq L0015 | |
| 24 lda 5,s | |
| 25 ldx 6,s | |
| 26 os9 I$WritLn | |
| 27 bra L000e | |
| 28 | |
| 29 endsect | |
| 30 |