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
/
ns
/
libmon
/
head_em.s
1
.define hol0,argv,.reghp,.limhp,envp,begbss
2
.define WRITE
3
.define .ignmask, .trpreg
4
.define .stop, BRK
5
.define ERANGE,EILLINS,ECASE
6
.sect .text
7
.sect .rom
8
.sect .data
9
.sect .bss
10
.sect .text
11
12
topmem = 0xFFFFFF
13
14
ERANGE = 1
15
EILLINS = 18
16
ECASE = 20
17
18
.sect .text
19
20
movd begbss, r7
21
movd endbss, r6
22
1:
23
movqd 0, 0(r7)
24
addqd 4, r7
25
cmpd r6,r7
26
bgt 1b
27
28
movd envp,tos
29
movd argv,tos
30
movd 1,tos
31
jsr @__m_a_i_n
32
.stop:
33
movb 0x7f,tos
34
jsr @.putchar
35
bpt
36
37
BRK:
38
movd 0,r0
39
ret 0
40
41
WRITE: jump @__write
42
43
.sect .bss
44
begbss:
45
.sect .data
46
hol0:
47
.data4 0
48
.data4 0
49
argv:
50
.data4 3f
51
envp:
52
.data4 0
53
3:
54
.asciz 'PROGRAM'
55
.reghp:
56
.data4 endbss
57
.limhp:
58
.data4 endbss
59
.ignmask:
60
.data2 0
61
.trpreg:
62
.data4 0