Mercurial > hg > Members > kono > nitros9-code

view lib/kreiderclib/write.as @ 2833:0f3030598435 lwtools-port

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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 write.r

 section code

* OS-9 system function equates

I$Write equ $8a 
I$WritLn equ $8c 

write: pshs  y 
 ldy   8,s 
 beq   L0015 
 lda   5,s 
 ldx   6,s 
 os9 I$Write 
L000e bcc   L0015 
 puls  y 
 lbra  _os9err 
L0015 tfr   y,d 
 puls  y,pc 
writeln: pshs  y 
 ldy   8,s 
 beq   L0015 
 lda   5,s 
 ldx   6,s 
 os9 I$WritLn 
 bra   L000e 

 endsect