Merge pull request #377 from pcercuei/libretro
[pcsx_rearmed.git] / deps / lightning / check / put.tst
1 .data   8
2 ok:
3 .c      "ok"
4
5 .code
6         jmpi main
7
8         name putr
9 putr:
10         prolog
11         frame 160
12         arg $ac
13         arg $auc
14         arg $as
15         arg $aus
16         arg $ai
17 #if __WORDSIZE == 64
18         arg $aui
19         arg $al
20 #endif
21         arg_f $af
22         arg_d $ad
23         arg $a
24 #if __WORDSIZE == 64
25         arg $_l
26         arg $_ui
27 #endif
28         arg $_i
29         arg $_us
30         arg $_s
31         arg $_uc
32         arg $_c
33         getarg_c %r0 $ac
34         negr %r0 %r0
35         putargr %r0 $ac
36         getarg_uc %r0 $auc
37         negr %r0 %r0
38         putargr %r0 $auc
39         getarg_s %r0 $as
40         negr %r0 %r0
41         putargr %r0 $as
42         getarg_us %r0 $aus
43         negr %r0 %r0
44         putargr %r0 $aus
45         getarg_i %r0 $ai
46         negr %r0 %r0
47         putargr %r0 $ai
48 #if __WORDSIZE == 64
49         getarg_ui %r0 $aui
50         negr %r0 %r0
51         putargr %r0 $aui
52         getarg_l %r0 $al
53         negr %r0 %r0
54         putargr %r0 $al
55 #endif
56         getarg_f %f0 $af
57         negr_f %f0 %f0
58         putargr_f %f0 $af
59         getarg_d %f0 $ad
60         negr_d %f0 %f0
61         putargr_d %f0 $ad
62         getarg %r0 $a
63         negr %r0 %r0
64         putargr %r0 $a
65 #if __WORDSIZE == 64
66         getarg_l %r0 $_l
67         negr %r0 %r0
68         putargr %r0 $_l
69         getarg_ui %r0 $_ui
70         negr %r0 %r0
71         putargr %r0 $_ui
72 #endif
73         getarg_i %r0 $_i
74         negr %r0 %r0
75         putargr %r0 $_i
76         getarg_us %r0 $_us
77         negr %r0 %r0
78         putargr %r0 $_us
79         getarg_s %r0 $_s
80         negr %r0 %r0
81         putargr %r0 $_s
82         getarg_uc %r0 $_uc
83         negr %r0 %r0
84         putargr %r0 $_uc
85         getarg_c %r0 $_c
86         negr %r0 %r0
87         putargr %r0 $_c
88         jmpi _putr
89 rputr:
90         putargi 17 $ac
91         putargi 16 $auc
92         putargi 15 $as
93         putargi 14 $aus
94         putargi 13 $ai
95 #if __WORDSIZE == 64
96         putargi 12 $aui
97         putargi 11 $al
98 #endif
99         putargi_f 10 $af
100         putargi_d 9 $ad
101         putargi 8 $a
102 #if __WORDSIZE == 64
103         putargi 7 $_l
104         putargi 6 $_ui
105 #endif
106         putargi 5 $_i
107         putargi 4 $_us
108         putargi 3 $_s
109         putargi 2 $_uc
110         putargi 1 $_c
111         jmpi _puti
112 rputi:
113         ret
114         epilog
115
116         name _putr
117 _putr:
118         prolog
119         tramp 160
120         arg $ac
121         arg $auc
122         arg $as
123         arg $aus
124         arg $ai
125 #if __WORDSIZE == 64
126         arg $aui
127         arg $al
128 #endif
129         arg_f $af
130         arg_d $ad
131         arg $a
132 #if __WORDSIZE == 64
133         arg $_l
134         arg $_ui
135 #endif
136         arg $_i
137         arg $_us
138         arg $_s
139         arg $_uc
140         arg $_c
141         getarg_c %r0 $ac
142         beqi rac %r0 -1
143         calli @abort
144 rac:
145         getarg_uc %r0 $auc
146         beqi rauc %r0 $(-2 & 0xff)
147         calli @abort
148 rauc:
149         getarg_s %r0 $as
150         beqi ras %r0 -3
151         calli @abort
152 ras:
153         getarg_us %r0 $aus
154         beqi raus %r0 $(-4 & 0xffff)
155         calli @abort
156 raus:
157         getarg_i %r0 $ai
158         beqi rai %r0 -5
159         calli @abort
160 rai:
161 #if __WORDSIZE == 64
162         getarg_ui %r0 $aui
163         beqi raui %r0 $(-6 & 0xffffffff)
164         calli @abort
165 raui:
166         getarg_l %r0 $al
167         beqi ral %r0 -7
168         calli @abort
169 ral:
170 #endif
171         getarg_f %f0 $af
172         beqi_f raf %f0 -8
173         calli @abort
174 raf:
175         getarg_d %f0 $ad
176         beqi_d rad %f0 -9
177         calli @abort
178 rad:
179         getarg %r0 $a
180         beqi ra %r0 -10
181         calli @abort
182 ra:
183 #if __WORDSIZE == 64
184         getarg %r0 $_l
185         beqi r_l %r0 -11
186         calli @abort
187 r_l:
188         getarg_ui %r0 $_ui
189         beqi r_ui %r0 $(-12 & 0xffffffff)
190         calli @abort
191 r_ui:
192 #endif
193         getarg_i %r0 $_i
194         beqi r_i %r0 -13
195         calli @abort
196 r_i:
197         getarg_us %r0 $_us
198         beqi r_us %r0 $(-14 & 0xffff)
199         calli @abort
200 r_us:
201         getarg_s %r0 $_s
202         beqi r_s %r0 -15
203         calli @abort
204 r_s:
205         getarg_uc %r0 $_uc
206         beqi r_uc %r0 $(-16 & 0xff)
207         calli @abort
208 r_uc:
209         getarg_c %r0 $_c
210         beqi r_c %r0 -17
211         calli @abort
212 r_c:
213         jmpi rputr
214         epilog
215
216         name _puti
217 _puti:
218         prolog
219         tramp 160
220         arg $ac
221         arg $auc
222         arg $as
223         arg $aus
224         arg $ai
225 #if __WORDSIZE == 64
226         arg $aui
227         arg $al
228 #endif
229         arg_f $af
230         arg_d $ad
231         arg $a
232 #if __WORDSIZE == 64
233         arg $_l
234         arg $_ui
235 #endif
236         arg $_i
237         arg $_us
238         arg $_s
239         arg $_uc
240         arg $_c
241         getarg_c %r0 $ac
242         beqi iac %r0 17
243         calli @abort
244 iac:
245         getarg_uc %r0 $auc
246         beqi iauc %r0 16
247         calli @abort
248 iauc:
249         getarg_s %r0 $as
250         beqi ias %r0 15
251         calli @abort
252 ias:
253         getarg_us %r0 $aus
254         beqi iaus %r0 14
255         calli @abort
256 iaus:
257         getarg_i %r0 $ai
258         beqi iai %r0 13
259         calli @abort
260 iai:
261 #if __WORDSIZE == 64
262         getarg_ui %r0 $aui
263         beqi iaui %r0 12
264         calli @abort
265 iaui:
266         getarg_l %r0 $al
267         beqi ial %r0 11
268         calli @abort
269 ial:
270 #endif
271         getarg_f %f0 $af
272         beqi_f iaf %f0 10
273         calli @abort
274 iaf:
275         getarg_d %f0 $ad
276         beqi_d iad %f0 9
277         calli @abort
278 iad:
279         getarg %r0 $a
280         beqi ia %r0 8
281         calli @abort
282 ia:
283 #if __WORDSIZE == 64
284         getarg %r0 $_l
285         beqi i_l %r0 7
286         calli @abort
287 i_l:
288         getarg_ui %r0 $_ui
289         beqi i_ui %r0 6
290         calli @abort
291 i_ui:
292 #endif
293         getarg_i %r0 $_i
294         beqi i_i %r0 5
295         calli @abort
296 i_i:
297         getarg_us %r0 $_us
298         beqi i_us %r0 4
299         calli @abort
300 i_us:
301         getarg_s %r0 $_s
302         beqi i_s %r0 3
303         calli @abort
304 i_s:
305         getarg_uc %r0 $_uc
306         beqi i_uc %r0 2
307         calli @abort
308 i_uc:
309         getarg_c %r0 $_c
310         beqi i_c %r0 1
311         calli @abort
312 i_c:
313         jmpi rputi
314         epilog
315
316         name putf
317 putf:
318         prolog
319         frame 56
320         arg $i1
321         arg_d $d1
322         arg_f $f1
323         arg_f $f2
324         arg_f $f3
325         arg $i2
326         arg_d $d2
327         getarg %r0 $i1
328         addi %r0 %r0 1
329         putargr %r0 $i1
330         getarg_d %f0 $d1
331         addi_d %f0 %f0 1
332         putargr_d %f0 $d1
333         getarg_f %f0 $f1
334         addi_f %f0 %f0 1
335         putargr_f %f0 $f1
336         getarg_f %f0 $f2
337         subi_f %f0 %f0 1
338         putargr_f %f0 $f2
339         putargi_f -5 $f3
340         putargi -6 $i2
341         putargi_d -7 $d2
342         jmpi _putf
343 rputf:
344         ret
345         epilog
346
347         name _putf
348 _putf:
349         prolog
350         tramp 56
351         arg $i1
352         arg_d $d1
353         arg_f $f1
354         arg_f $f2
355         arg_f $f3
356         arg $i2
357         arg_d $d2
358         getarg %r0 $i1
359         beqi fi1 %r0 2
360         calli @abort
361 fi1:
362         getarg_d %f0 $d1
363         beqi_d fd1 %f0 3
364         calli @abort
365 fd1:
366         getarg_f %f0 $f1
367         beqi_f ff1 %f0 4
368         calli @abort
369 ff1:
370         getarg_f %f0 $f2
371         beqi_f ff2 %f0 3
372         calli @abort
373 ff2:
374         getarg_f %f0 $f3
375         beqi_f ff3 %f0 -5
376         calli @abort
377 ff3:
378         getarg %r0 $i2
379         beqi fi2 %r0 -6
380         calli @abort
381 fi2:
382         getarg_d %f0 $d2
383         beqi_d fd2 %f0 -7
384         calli @abort
385 fd2:
386         jmpi rputf
387         epilog
388
389         name main
390 main:
391         prolog
392         prepare
393                 pushargi 1
394                 pushargi 2
395                 pushargi 3
396                 pushargi 4
397                 pushargi 5
398 #if __WORDSIZE == 64
399                 pushargi 6
400                 pushargi 7
401 #endif
402                 pushargi_f 8
403                 pushargi_d 9
404                 pushargi 10
405 #if __WORDSIZE == 64
406                 pushargi 11
407                 pushargi 12
408 #endif
409                 pushargi 13
410                 pushargi 14
411                 pushargi 15
412                 pushargi 16
413                 pushargi 17
414         finishi putr
415         prepare
416                 pushargi 1
417                 pushargi_d 2
418                 pushargi_f 3
419                 pushargi_f 4
420                 pushargi_f 5
421                 pushargi 6
422                 pushargi_d 7
423         finishi putf
424         prepare
425                 pushargi ok
426         finishi @puts
427         ret
428         epilog