![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to interface.s CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Research Unix] / researchv10no / cmd / spitbol / ocint|
Return to interface.s CVS log | Up to [Research Unix] / researchv10no / cmd / spitbol / ocint |
1.1 root 1: .globl sysax
2: .globl sysbx
3: .globl sysdc
4: .globl sysdm
5: .globl sysdt
6: # .globl sysef
7: # .globl sysej
8: .globl sysem
9: # .globl sysen
10: .globl sysep
11: .globl sysex
12: # .globl sysfc
13: # .globl syshs
14: # .globl sysid
15: # .globl sysil
16: # .globl sysin
17: # .globl sysio
18: .globl sysld
19: # .globl sysmm
20: # .globl sysmx
21: .globl sysou
22: # .globl syspi
23: # .globl syspp
24: # .globl syspr
25: # .globl sysrd
26: # .globl sysri
27: .globl sysrw
28: # .globl sysst
29: # .globl systm
30: .globl systt
31: .globl sysul
32: # .globl sysxi
33:
34: .data
35: .globl _reg_ra
36: .globl _reg_cp
37: .globl _reg_ia
38: .globl _reg_wa
39: .globl _reg_wb
40: .globl _reg_wc
41: .globl _reg_xr
42: .globl _reg_xl
43:
44: .align 2
45: _reg_ra: .space 4
46: _reg_cp: .space 4
47: _reg_ia: .space 4
48: _reg_wa: .space 4
49: _reg_wb: .space 4
50: _reg_wc: .space 4
51: _reg_xr: .space 4
52: _reg_xl: .space 4
53:
54: .text
55:
56: sysax: jsb ccall
57: .long _sysax
58:
59: sysbx: jsb ccall
60: .long _sysbx
61:
62: sysdc: jsb ccall
63: .long _sysdc
64:
65: sysdm: jsb ccall
66: .long _sysdm
67:
68: sysdt: jsb ccall
69: .long _sysdt
70:
71: #sysef: jsb ccall
72: # .long _sysef
73:
74: #sysej: jsb ccall
75: # .long _sysej
76:
77: sysem: jsb ccall
78: .long _sysem
79:
80: #sysen: jsb ccall
81: # .long _sysen
82:
83: sysep: jsb ccall
84: .long _sysep
85:
86: sysex: jsb ccall
87: .long _sysex
88:
89: #sysfc: jsb ccall
90: # .long _sysfc
91:
92: #syshs: jsb ccall
93: # .long _syshs
94:
95: #sysid: jsb ccall
96: # .long _sysid
97:
98: #sysil: jsb ccall
99: # .long _sysil
100:
101: #sysin: jsb ccall
102: # .long _sysin
103:
104: #sysio: jsb ccall
105: # .long _sysio
106:
107: sysld: jsb ccall
108: .long _sysld
109:
110: #sysmm: jsb ccall
111: # .long _sysmm
112:
113: #sysmx: jsb ccall
114: # .long _sysmx
115:
116: sysou: jsb ccall
117: .long _sysou
118:
119: #syspi: jsb ccall
120: # .long _syspi
121:
122: #syspp: jsb ccall
123: # .long _syspp
124:
125: #syspr: jsb ccall
126: # .long _syspr
127:
128: #sysrd: jsb ccall
129: # .long _sysrd
130:
131: #sysri: jsb ccall
132: # .long _sysri
133:
134: sysrw: jsb ccall
135: .long _sysrw
136:
137: #sysst: jsb ccall
138: # .long _sysst
139:
140: #systm: jsb ccall
141: # .long _systm
142:
143: systt: jsb ccall
144: .long _systt
145:
146: sysul: jsb ccall
147: .long _sysul
148:
149: #sysxi: jsb ccall
150: # .long _sysxi
151:
152: ccall: movl r2,_reg_ra
153: movl r3,_reg_cp
154: movl r5,_reg_ia
155: movl r6,_reg_wa
156: movl r7,_reg_wb
157: movl r8,_reg_wc
158: movl r9,_reg_xr
159: movl r10,_reg_xl
160: movl (sp)+,r0
161: movl (r0),r0
162: calls $0,(r0)
163: ashl $2,r0,r0
164: addl2 r0,(sp)
165: movl _reg_ra,r2
166: movl _reg_cp,r3
167: movl _reg_ia,r5
168: movl _reg_wa,r6
169: movl _reg_wb,r7
170: movl _reg_wc,r8
171: movl _reg_xr,r9
172: movl _reg_xl,r10
173: rsb
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.