|
2824
|
1 * Disassembly by Os9disasm of mem.r
|
|
|
2
|
|
|
3 * OS-9 system function equates
|
|
|
4
|
|
|
5 F$Mem equ $07
|
|
|
6
|
|
|
7 section bss
|
|
|
8
|
|
|
9 * Uninitialized data (class B)
|
|
|
10 _spare: rmb 2
|
|
|
11 * Initialized Data (class G)
|
|
|
12
|
|
|
13 endsect
|
|
|
14
|
|
|
15 section code
|
|
|
16
|
|
|
17 sbrk: ldd memend,y
|
|
|
18 pshs d
|
|
|
19 ldd 4,s
|
|
|
20 cmpd _spare,y
|
|
|
21 bcs L0035
|
|
|
22 pshs y
|
|
|
23 clra
|
|
|
24 clrb
|
|
|
25 os9 F$Mem
|
|
|
26 addd 6,s
|
|
|
27 os9 F$Mem
|
|
|
28 tfr y,d
|
|
|
29 puls y
|
|
|
30 bcc L0027
|
|
|
31 ldd #-1
|
|
|
32 leas 2,s
|
|
|
33 rts
|
|
|
34 L0027 std memend,y
|
|
|
35 addd _spare,y
|
|
|
36 subd ,s
|
|
|
37 std _spare,y
|
|
|
38 L0035 leas 2,s
|
|
|
39 ldd _spare,y
|
|
|
40 pshs d
|
|
|
41 subd 4,s
|
|
|
42 std _spare,y
|
|
|
43 ldd memend,y
|
|
|
44 subd ,s++
|
|
|
45 pshs d
|
|
|
46 clra
|
|
|
47 ldx ,s
|
|
|
48 L004e sta ,x+
|
|
|
49 cmpx memend,y
|
|
|
50 bcs L004e
|
|
|
51 puls d,pc
|
|
|
52 ibrk: ldd 2,s
|
|
|
53 addd _mtop,y
|
|
|
54 bcs L0081
|
|
|
55 cmpd _stbot,y
|
|
|
56 bcc L0081
|
|
|
57 pshs d
|
|
|
58 ldx _mtop,y
|
|
|
59 clra
|
|
|
60 L006e cmpx ,s
|
|
|
61 bcc L0076
|
|
|
62 sta ,x+
|
|
|
63 bra L006e
|
|
|
64 L0076 ldd _mtop,y
|
|
|
65 puls x
|
|
|
66 stx _mtop,y
|
|
|
67 rts
|
|
|
68 L0081 ldd #-1
|
|
|
69 rts
|
|
|
70 unbrk: ldd 2,s
|
|
|
71 pshs y
|
|
|
72 os9 F$Mem
|
|
|
73 bcc L0093
|
|
|
74 ldd #-1
|
|
|
75 puls y,pc
|
|
|
76 L0093 tfr y,d
|
|
|
77 puls y
|
|
|
78 std memend,y
|
|
|
79 clra
|
|
|
80 clrb
|
|
|
81 std _spare,y
|
|
|
82 rts
|
|
|
83
|
|
|
84 endsect
|
|
|
85
|
