source:
buchla-68k/alcyon/croot.s@
0170798
Last change on this file since 0170798 was 7bf3856, checked in by , 7 years ago | |
---|---|
|
|
File size: 871 bytes |
Rev | Line | |
---|---|---|
[7bf3856] | 1 | .globl _errno |
2 | .globl __clsall | |
3 | .comm __clsall,4 | |
4 | .bss | |
5 | L1:.ds.b 2 | |
6 | .text | |
7 | .bss | |
8 | L2:.ds.b 120 | |
9 | .text | |
10 | .globl _exit | |
11 | .text | |
12 | _exit: | |
13 | ~~exit: | |
14 | ~code=8 | |
15 | link R14,#-4 | |
16 | *line 54 | |
17 | move.l __clsall,R8 | |
18 | jsr (R8) | |
19 | *line 55 | |
20 | move 8(R14),(sp) | |
21 | jsr _xtrap15 | |
22 | L3:unlk R14 | |
23 | rts | |
24 | .globl _Croot | |
25 | .text | |
26 | _Croot: | |
27 | ~~Croot: | |
28 | ~cp=R13 | |
29 | link R14,#0 | |
30 | movem.l R6-R7/R12-R13,-(sp) | |
31 | ~fname=R12 | |
32 | ~k=R7 | |
33 | *line 97 | |
34 | move.l 8(R14),R13 | |
35 | *line 97 | |
36 | move.l #L5,L2 | |
37 | *line 98 | |
38 | move #1,L1 | |
39 | *line 100 | |
40 | move.l #__fd_cls,__clsall | |
41 | *line 101 | |
42 | jsr _InitFS | |
43 | *line 159 | |
44 | move.l #L2,(sp) | |
45 | move L1,-(sp) | |
46 | jsr _main | |
47 | addq.l #2,sp | |
48 | *line 160 | |
49 | clr (sp) | |
50 | jsr _exit | |
51 | L4:tst.l (sp)+ | |
52 | movem.l (sp)+,R7-R7/R12-R13 | |
53 | unlk R14 | |
54 | rts | |
55 | .data | |
56 | L5:.dc.b $7B,$42,$75,$63,$68,$6C,$61,$20,$37,$30,$30,$20,$43,$72,$6F,$6F,$74,$20,$2D,$20,$56,$65,$72,$73,$69,$6F,$6E,$20,$38,$20 | |
57 | .dc.b $2D,$20,$31,$39,$38,$37,$2D,$30,$36,$2D,$32,$39,$7D,$0 |
Note:
See TracBrowser
for help on using the repository browser.