source: buchla-68k/alcyon/strcat.s@ ca867c1

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

Added Alcyon C reference output.

  • Property mode set to 100644
File size: 451 bytes
Line 
1.globl _strcat
2.text
3_strcat:
4~~strcat:
5~s1=R13
6~s2=R12
7link R14,#0
8movem.l R7-R7/R11-R13,-(sp)
9~os1=R11
10*line 17
11move.l 8(R14),R13
12*line 17
13move.l 12(R14),R12
14*line 17
15move.l R13,R11
16*line 19
17bra L4
18L3:L4:
19*line 20
20tst.b (R13)+
21bne L3
22L2:
23*line 22
24sub.l #1,R13
25*line 24
26bra L7
27L6:L7:
28*line 25
29move.b (R12)+,(R13)+
30bne L6
31L5:
32*line 27
33move.l R11,R0
34bra L1
35L1:tst.l (sp)+
36movem.l (sp)+,R11-R13
37unlk R14
38rts
39.data
Note: See TracBrowser for help on using the repository browser.