add Berkeley/CCI specific header; fix sccsid
[unix-history] / usr / src / lib / libc / tahoe / string / strcat.s
/*
* Copyright (c) 1988 Regents of the University of California.
* All rights reserved.
*
* This code is derived from software contributed to Berkeley by
* Computer Consoles Inc.
*
* Redistribution and use in source and binary forms are permitted
* provided that this notice is preserved and that due credit is given
* to the University of California at Berkeley. The name of the University
* may not be used to endorse or promote products derived from this
* software without specific prior written permission. This software
* is provided ``as is'' without express or implied warranty.
*/
#if defined(LIBC_SCCS) && !defined(lint)
_sccsid:.asciz "@(#)strcat.s 1.2 (Berkeley) %G%"
#endif /* LIBC_SCCS and not lint */
/*
* Concatenate s2 on the end of s1. S1's space must be large enough.
* Return s1.
*
* char * strcat(s1, s2)
* register char *s1, *s2;
*/
#include "DEFS.h"
ENTRY(strcat, 0)
movl 4(fp),r0
movl r0,r1
cmps2 # r0 and r1 point at null at end of s1
movl 8(fp),r0 # source string
movs2
movl 4(fp),r0
ret