source: buchla-68k/libsm/strcat.c@ 7848656

Last change on this file since 7848656 was 7848656, checked in by Thomas Lopatic <thomas@…>, 7 years ago

Spaces to tabs.

  • Property mode set to 100644
File size: 457 bytes
RevLine 
[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]11int8_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.