|
2824
|
1 * Disassembly by Os9disasm of signal.r
|
|
|
2
|
|
|
3 * OS-9 system function equates
|
|
|
4
|
|
|
5 F$Exit equ $06
|
|
|
6 F$Icpt equ $09
|
|
|
7
|
|
|
8 section bss
|
|
|
9
|
|
|
10 * Uninitialized data (class B)
|
|
|
11 B0000 rmb 60
|
|
|
12 B003c rmb 1
|
|
|
13 * Initialized Data (class G)
|
|
|
14
|
|
|
15 endsect
|
|
|
16
|
|
|
17 section code
|
|
|
18
|
|
|
19 _sigint: ldd 2,s
|
|
|
20 tstb
|
|
|
21 beq L000c
|
|
|
22 tsta
|
|
|
23 bne L000c
|
|
|
24 bsr L003c
|
|
|
25 bne L0010
|
|
|
26 L000c ldd #-1
|
|
|
27 rts
|
|
|
28 L0010 ldd 1,x
|
|
|
29 pshs d
|
|
|
30 ldd 6,s
|
|
|
31 std 1,x
|
|
|
32 bne L001e
|
|
|
33 clr ,x
|
|
|
34 L001c puls d,pc
|
|
|
35 L001e ldb 5,s
|
|
|
36 stb ,x
|
|
|
37 tst B003c,y
|
|
|
38 bne L001c
|
|
|
39 exg y,u
|
|
|
40 leax >L006a,pcr
|
|
|
41 os9 F$Icpt
|
|
|
42 exg y,u
|
|
|
43 puls d
|
|
|
44 bcs L000c
|
|
|
45 inc B003c,y
|
|
|
46 rts
|
|
|
47 L003c clr ,-s
|
|
|
48 clr ,-s
|
|
|
49 leax B003c,y
|
|
|
50 pshs x
|
|
|
51 leax B0000,y
|
|
|
52 L004a cmpx ,s
|
|
|
53 beq L0065
|
|
|
54 cmpb ,x
|
|
|
55 bne L0057
|
|
|
56 leas 4,s
|
|
|
57 andcc #251
|
|
|
58 rts
|
|
|
59 L0057 lda ,x
|
|
|
60 ora 2,s
|
|
|
61 ora 3,s
|
|
|
62 bne L0061
|
|
|
63 stx 2,s
|
|
|
64 L0061 leax 3,x
|
|
|
65 bra L004a
|
|
|
66 L0065 ldx 2,s
|
|
|
67 leas 4,s
|
|
|
68 rts
|
|
|
69 L006a leay ,u
|
|
|
70 bsr L003c
|
|
|
71 beq L0076
|
|
|
72 pshs x
|
|
|
73 ldx 1,x
|
|
|
74 bne L0081
|
|
|
75 L0076 os9 F$Exit
|
|
|
76 cmpx #1
|
|
|
77 bne L0081
|
|
|
78 leas 2,s
|
|
|
79 rti
|
|
|
80 L0081 clra
|
|
|
81 pshs d
|
|
|
82 jsr ,x
|
|
|
83 puls d,x
|
|
|
84 clra
|
|
|
85 clrb
|
|
|
86 sta ,x
|
|
|
87 std 1,x
|
|
|
88 rti
|
|
|
89
|
|
|
90 endsect
|
|
|
91
|
