FreeCalypso > hg > freecalypso-tools
view target-utils/libc/strcpy.c @ 292:0af5009bd52f
fc-cal2bin written, compiles
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Sat, 18 Nov 2017 07:38:36 +0000 |
parents | 7fb62fc724dc |
children |
line wrap: on
line source
/* * Copy string s2 to s1. s1 must be large enough. * return s1 */ char * strcpy(s1, s2) register char *s1, *s2; { register char *os1; os1 = s1; while (*s1++ = *s2++) ; return(os1); }