Files
Sepp J Morris 31738079c4 Upload
Digital Research
2020-11-06 18:50:37 +01:00

34 lines
896 B
C
Raw Permalink Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

/**********************************************************************
* STRCPY - copies from one string to another
*
* BYTE *strcpy(s1,s2)
* BYTE *s1, *s2;
*
* Copies bytes from s2 to s1, stopping after null has been moved.
* Returns s1.
* No check for overflow of s1.
***********************************************************************/
#include <portab.h>
#include <klib.h>
BYTE *strcpy(s1,s2)
REG BYTE *s1, *s2;
{ REG BYTE *cp;
cp = s1; /* save for return. */
while( *cp++ = *s2++ ) /* isn't C fun? */
;
return(s1);
}
*s2++ ) /* isn't C fun? */
;
return(s1);
}
*s2++ ) /* isn't C fun? */
;
return(s1);
}