rev-global.as
2.6 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
.globl readInt
.globl writeInt
.globl readBool
.globl writeBool
.globl readReal
.globl writeReal
.globl writeChar
.globl ar
.data
ar:
.space 400
.globl rev
.text
rev:
# args: 4 bytes
# result: 1 bytes
# locals: 4 bytes
# temps: 12 bytes
#
# n: argument (4 bytes) at (ap)
# i: local (4 bytes) at -4(fp)
#
movl sp, fp
subl2 $16, sp
movl $0, -4(fp)
Lbg_1:
movl -4(fp), r0
movl (ap), r1
divl2 $2, r1
movb $1, r2
cmpl r0, r1
jlss Lro_1
movb $0, r2
Lro_1:
jlbc r2, Lel_1
movl (ap), r0
movl -4(fp), r1
subl2 r1, r0
subl2 $1, r0
movab ar, r1
mull2 $4, r0
addl2 r0, r1
movl (r1), -12(fp)
movl -4(fp), r0
movab ar, r1
mull2 $4, r0
addl2 r0, r1
movl (r1), -8(fp)
movl -4(fp), r0
mull2 $4, r0
movab ar, r1
addl2 r0, r1
movl -12(fp), (r1)
movl (ap), r0
movl -4(fp), r2
subl2 r2, r0
subl2 $1, r0
mull2 $4, r0
movab ar, r2
addl2 r0, r2
movl -8(fp), (r2)
movl -4(fp), r0
movl r0, -16(fp)
pushr $0x3806
movab -16(fp), r11
moval -16(fp), ap
jsb writeInt
popr $0x3806
movl $10, -16(fp)
pushr $0x3806
movab -16(fp), r11
moval -16(fp), ap
jsb writeChar
popr $0x3806
movl -4(fp), r0
addl3 $1, r0, -4(fp)
jbr Lbg_1
Lel_1:
Leg_1:
movl fp, sp
rsb
.globl program
.text
program:
# args: 0 bytes
# result: 4 bytes
# locals: 8 bytes
# temps: 5 bytes
#
# n: local (4 bytes) at -4(fp)
# k: local (4 bytes) at -8(fp)
#
movl sp, fp
subl2 $13, sp
pushr $0x3800
moval -4(fp), r11
movab -8(fp), ap
jsb readInt
popr $0x3800
movl $0, -8(fp)
Lbg_2:
movl -8(fp), r0
movl -4(fp), r1
movb $1, r2
cmpl r0, r1
jlss Lro_2
movb $0, r2
Lro_2:
jlbc r2, Lel_2
movl -8(fp), r0
mull2 $4, r0
movab ar, r1
addl2 r0, r1
pushr $0x3802
moval (r1), r11
movab -8(fp), ap
jsb readInt
popr $0x3802
movl -8(fp), r0
addl3 $1, r0, -8(fp)
jbr Lbg_2
Lel_2:
Leg_2:
Lbg_3:
pushr $0x3802
movab -9(fp), r11
movab -8(fp), ap
jsb readBool
popr $0x3802
jlbc -9(fp), Lel_3
movl -4(fp), r0
movl r0, -13(fp)
pushr $0x3802
movab -9(fp), r11
moval -13(fp), ap
jsb rev
popr $0x3802
jbr Leg_3
Lel_3:
Leg_3:
movl $0, -8(fp)
Lbg_4:
movl -8(fp), r0
movl -4(fp), r2
movb $1, r3
cmpl r0, r2
jlss Lro_3
movb $0, r3
Lro_3:
jlbc r3, Lel_4
movl -8(fp), r0
movab ar, r2
mull2 $4, r0
addl2 r0, r2
movl (r2), r0
movl r0, -13(fp)
pushr $0x3802
movab -8(fp), r11
moval -13(fp), ap
jsb writeInt
popr $0x3802
movl $32, -13(fp)
pushr $0x3802
movab -8(fp), r11
moval -13(fp), ap
jsb writeChar
popr $0x3802
movl -8(fp), r0
addl3 $1, r0, -8(fp)
jbr Lbg_4
Lel_4:
Leg_4:
movl $10, -13(fp)
pushr $0x3802
movab -8(fp), r11
moval -13(fp), ap
jsb writeChar
popr $0x3802
movl fp, sp
rsb