Pristine Ack-5.5
[Ack-5.5.git] / mach / pmds / libsys / head_em.s
1 .define .lino,.filn
2 .define EXIT,WRITE,BRK
3 .define begtext,begdata,begbss
4 .define EARRAY,ERANGE,ESET,EIDIVZ,EHEAP,EILLINS,ECASE
5 .define hol0,.reghp,.limhp,.trpim,.trppc
6 .define LINO_AD,FILN_AD
7 .sect .text
8 .sect .rom
9 .sect .data
10 .sect .bss
11 .sect .text
12
13
14
15
16 LINO_AD = 0
17 FILN_AD = 4
18
19 EARRAY  = 0
20 ERANGE  = 1
21 ESET    = 2
22 EIDIVZ  = 6
23 EHEAP   = 17
24 EILLINS = 18
25 ECASE   = 20
26
27         .sect .text
28 begtext:
29         add.l   #2,sp !convert argc from 4-byte to 2-byte
30         jsr     __m_a_i_n
31         add     #010,sp
32 EXIT:
33         move.w  d0,-(sp)
34         jsr     __exit
35
36 WRITE:  jmp     __write
37
38 BRK:    jmp     __brk
39
40         .sect .data
41 begdata:
42 hol0:
43 .lino:
44         .data2  0,0     ! lino
45 .filn:
46         .data4  0       ! filn
47 .reghp:
48         .data4  endbss
49 .limhp:
50         .data4  endbss
51 .trppc:
52         .data4  0
53 .trpim:
54         .data2  0
55
56
57         .sect .bss
58 begbss: