Mercurial > hg > Members > kono > nitros9-code

comparison lib/kreiderclib/system.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
comparison
equal deleted inserted replaced
2823:ad769d2a03e4 2824:1647f1874cdf
1 * Disassembly by Os9disasm of system.r
2
3 section code
4
5 * class D external label equates
6
7 D0000 equ $0000
8
9 * class X external label equates
10
11 X6865 equ $6865
12
13 system: pshs u
14 ldd #$ff5a
15 lbsr _stkcheck
16 leas -86,s
17 ldd #$0051
18 ldu 90,s
19 leax ,s
20 pshs d
21 pshs x,u
22 lbsr strncpy
23 leas 6,s
24 clr 80,s
25 leax >L0066,pcr
26 pshs d,x
27 lbsr strcat
28 leas 4,s
29 clra
30 clrb
31 pshs d
32 incb
33 pshs d
34 pshs d
35 leax 6,s
36 pshs x
37 pshs x
38 lbsr strlen
39 std ,s
40 leax >L0061,pcr
41 pshs x
42 lbsr os9fork
43 leas 12,s
44 std 82,s
45 L004c leax 84,s
46 pshs x
47 lbsr wait
48 leas 2,s
49 cmpd 82,s
50 bne L004c
51 leas 84,s
52 puls d,u,pc
53 L0061 com X6865
54 inc 12,s
55 L0066 tst D0000
56
57 endsect
58