source: buchla-68k/alcyon/croot.s@ 526a993

Last change on this file since 526a993 was 7bf3856, checked in by Thomas Lopatic <thomas@…>, 7 years ago

Added Alcyon C reference output.

  • Property mode set to 100644
File size: 871 bytes
Line 
1.globl _errno
2.globl __clsall
3.comm __clsall,4
4.bss
5L1:.ds.b 2
6.text
7.bss
8L2:.ds.b 120
9.text
10.globl _exit
11.text
12_exit:
13~~exit:
14~code=8
15link R14,#-4
16*line 54
17move.l __clsall,R8
18jsr (R8)
19*line 55
20move 8(R14),(sp)
21jsr _xtrap15
22L3:unlk R14
23rts
24.globl _Croot
25.text
26_Croot:
27~~Croot:
28~cp=R13
29link R14,#0
30movem.l R6-R7/R12-R13,-(sp)
31~fname=R12
32~k=R7
33*line 97
34move.l 8(R14),R13
35*line 97
36move.l #L5,L2
37*line 98
38move #1,L1
39*line 100
40move.l #__fd_cls,__clsall
41*line 101
42jsr _InitFS
43*line 159
44move.l #L2,(sp)
45move L1,-(sp)
46jsr _main
47addq.l #2,sp
48*line 160
49clr (sp)
50jsr _exit
51L4:tst.l (sp)+
52movem.l (sp)+,R7-R7/R12-R13
53unlk R14
54rts
55.data
56L5:.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.