Mercurial > hg > Members > kono > nitros9-code

diff lib/kreiderclib/open.as @ 2824:1647f1874cdf lwtools-port

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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/open.as	Thu May 23 05:49:13 2013 -0500
@@ -0,0 +1,22 @@
+* Disassembly by Os9disasm of open.r
+
+ section code
+
+* OS-9 system function equates
+
+I$Open equ $84 
+I$Close equ $8f 
+
+open: ldx   2,s 
+ lda   5,s 
+ os9 I$Open 
+ lblo  _os9err 
+ tfr   a,b 
+ clra   
+ rts    
+close: lda   3,s 
+ os9 I$Close 
+ lbra  _sysret 
+
+ endsect  
+