xref: /original-bsd/lib/libc/tahoe/string/strcat.s (revision c3e32dec)
1/*
2 * Copyright (c) 1988, 1993
3 *	The Regents of the University of California.  All rights reserved.
4 *
5 * %sccs.include.redist.c%
6 *
7 * This code is derived from software contributed to Berkeley by
8 * Computer Consoles Inc.
9 */
10
11#if defined(LIBC_SCCS) && !defined(lint)
12	.asciz "@(#)strcat.s	8.1 (Berkeley) 06/04/93"
13#endif /* LIBC_SCCS and not lint */
14
15/*
16 * Concatenate s2 on the end of s1.  S1's space must be large enough.
17 * Return s1.
18 *
19 * char * strcat(s1, s2)
20 * register char *s1, *s2;
21*/
22#include "DEFS.h"
23
24ENTRY(strcat, 0)
25	movl	4(fp),r0
26	movl	r0,r1
27	cmps2			# r0 and r1 point at null at end of s1
28	movl	8(fp),r0	# source string
29	movs2
30	movl	4(fp),r0
31	ret
32