source: buchla-68k/alcyon/strlcmp.s@ 0170798

Last change on this file since 0170798 was 7bf3856, checked in by Thomas Lopatic <thomas@…>, 7 years ago

Added Alcyon C reference output.
  • Property mode set to 100644
File size: 559 bytes
Line 
1.globl _strlcmp
2.text
3_strlcmp:
4~~strlcmp:
5~s=8
6~l=12
7link R14,#-6
8~rc=-2
9*line 23
10clr -2(R14)
11*line 25
12bra L4
13L3:
14*line 26
15*line 27
16*line 28
17move.l 12(R14),R8
18move -2(R14),R9
19add.l R9,R9
20add.l R9,R9
21move.l 0(R8,R9.l),(sp)
22move.l 8(R14),-(sp)
23jsr _strcmp
24addq.l #4,sp
25tst R0
26bne L5
27*line 28
28add #1,-2(R14)
29move -2(R14),R0
30bra L1
31*line 29
32L5:
33*line 30
34add #1,-2(R14)
35L4:
36*line 31
37move.l 12(R14),R8
38move -2(R14),R9
39add.l R9,R9
40add.l R9,R9
41tst.l 0(R8,R9.l)
42bne L3
43L2:
44*line 33
45clr R0
46bra L1
47L1:unlk R14
48rts
49.data
Note: See TracBrowser for help on using the repository browser.