source:
buchla-68k/libsm/strcat.c@
411371e
| Last change on this file since 411371e was 7848656, checked in by , 8 years ago | |
|---|---|
|
|
| File size: 457 bytes | |
| Rev | Line | |
|---|---|---|
| [f40a309] | 1 | /* |
| 2 | ============================================================================= | |
| 3 | strcat.c -- concatenate strings | |
| 4 | Version 1 -- 1987-06-12 | |
| 5 | ||
| 6 | Concatenate s2 onto the end of s1. S1's space must be large enough. | |
| 7 | Return s1. | |
| 8 | ============================================================================= | |
| 9 | */ | |
| 10 | ||
| [7258c6a] | 11 | int8_t *strcat(int8_t *s1, int8_t *s2) |
| [f40a309] | 12 | { |
| [7848656] | 13 | register int8_t *os1; |
| [f40a309] | 14 | |
| [7848656] | 15 | os1 = s1; |
| [f40a309] | 16 | |
| [7848656] | 17 | while(*s1++) |
| 18 | ; | |
| [f40a309] | 19 | |
| [7848656] | 20 | --s1; |
| [f40a309] | 21 | |
| [7848656] | 22 | while(*s1++ = *s2++) |
| 23 | ; | |
| [f40a309] | 24 | |
| [7848656] | 25 | return(os1); |
| [f40a309] | 26 | } |
Note:
See TracBrowser
for help on using the repository browser.
![(please configure the [header_logo] section in trac.ini)](http://bob.lopatic.de/chrome/site/logo.png)