public
/
Ack-5.5.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
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: