source: buchla-68k/alcyon/strncat.s@ 9519422

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

Added Alcyon C reference output.

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