source: buchla-68k/alcyon/strccpy.s@ ad89950

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

Added Alcyon C reference output.

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