FreeCalypso > hg > freecalypso-tools
diff target-utils/libc/strcat.c @ 87:7fb62fc724dc
target-utils/libc: beginning of newlib-ectomy
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Fri, 28 Oct 2016 22:20:26 +0000 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/target-utils/libc/strcat.c Fri Oct 28 22:20:26 2016 +0000 @@ -0,0 +1,19 @@ +/* + * Concatenate s2 on the end of s1. S1's space must be large enough. + * Return s1. + */ + +char * +strcat(s1, s2) + register char *s1, *s2; +{ + register char *os1; + + os1 = s1; + while (*s1++) + ; + --s1; + while (*s1++ = *s2++) + ; + return(os1); +}