Mercurial > hg > Members > kono > nitros9-code

view lib/kreiderclib/process.as @ 3141:717ced83b885

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
coco3: Build SD card device descriptors for CoCo3FPGA Added "CC3FPGAFLAGS = $(AFLAGS) -DCC3FPGA=1 $(FLAGS)" to "level2/coco3/modules/makefile" for flagging Coco3FPGA specific features in modules sources. Added "llcoco3fpga", "ddsd0_coco3fpga", "sd0_coco3fpga", and "sd1_coco3fpga" to the "coco3/modules/makefile" - RBF section, which also now adds all to the "NITROS9/MODULES/RBF" on all disk images for building new Coco3FPGA disks from NitrOS9. Added new descriptor section to the "level2/coco3/modules/makefile" reflecting the new Coco3FPGA SD card descriptors and their flags.
author Bill Pierce <merlinious999@gmail.com>
date Sat, 04 Feb 2017 11:06:28 +0100
parents 1647f1874cdf
children
line wrap: on
line source

* Disassembly by Os9disasm of process.r

 section code

* OS-9 system function equates

F$Fork equ $03 
F$Wait equ $04 
F$Chain equ $05 
F$Exit equ $06 
F$Send equ $08 
F$SPrior equ $0d 

kill: lda   3,s 
 ldb   5,s 
 os9 F$Send 
 lbra  _sysret 
wait: clra   
 clrb   
 os9 F$Wait 
 lblo  _os9err 
 ldx   2,s 
 beq   L001b 
 stb   1,x 
 clr   ,x 
L001b tfr   a,b 
 clra   
 rts    
setpr: lda   3,s 
 ldb   5,s 
 os9 F$SPrior 
 lbra  _sysret 
chain: leau  ,s 
 leas  255,y 
 ldx   2,u 
 ldy   4,u 
 lda   9,u 
 asla   
 asla   
 asla   
 asla   
 ora   11,u 
 ldb   13,u 
 ldu   6,u 
 os9 F$Chain 
 os9 F$Exit 
os9fork: pshs  y,u 
 ldx   6,s 
 ldy   8,s 
 ldu   10,s 
 lda   13,s 
 ora   15,s 
 ldb   17,s 
 os9 F$Fork 
 puls  y,u 
 lblo  _os9err 
 tfr   a,b 
 clra   
 rts    

 endsect