Mercurial > hg > Members > kono > nitros9-code
diff lib/kreiderclib/fread.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 |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/lib/kreiderclib/fread.as Thu May 23 05:49:13 2013 -0500 @@ -0,0 +1,32 @@ +* Disassembly by Os9disasm of fread.r + + section code + +fread: pshs d,x,u + ldu 8,s + clra + clrb + bra L002b +L0008 ldd 10,s + bra L0022 +L000c ldd 14,s + pshs d + lbsr getc + leas 2,s + cmpd #-1 + beq L0032 + stb ,u+ + ldd ,s + subd #1 +L0022 std ,s + bne L000c + ldd 2,s + addd #1 +L002b std 2,s + cmpd 12,s + blt L0008 +L0032 leas 2,s + puls d,u,pc + + endsect +