FreeCalypso > hg > freecalypso-tools
comparison 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 |
comparison
equal
deleted
inserted
replaced
86:684eddecbc62 | 87:7fb62fc724dc |
---|---|
1 /* | |
2 * Concatenate s2 on the end of s1. S1's space must be large enough. | |
3 * Return s1. | |
4 */ | |
5 | |
6 char * | |
7 strcat(s1, s2) | |
8 register char *s1, *s2; | |
9 { | |
10 register char *os1; | |
11 | |
12 os1 = s1; | |
13 while (*s1++) | |
14 ; | |
15 --s1; | |
16 while (*s1++ = *s2++) | |
17 ; | |
18 return(os1); | |
19 } |