mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-23 00:14:25 +00:00
38 lines
989 B
C
38 lines
989 B
C
/****************************************************************************
|
||
* STRNCAT - concatenate strings (limited)
|
||
*
|
||
|
||
* BYTE *strncat(s1,s2,n)
|
||
* BYTE *s1, *s2; WORD n;
|
||
*
|
||
* 'strncat' copies at most n bytes of s2 onto the end of s1.
|
||
*
|
||
* Assumes null terminated strings. No check is made for string area
|
||
* overflow.
|
||
****************************************************************************/
|
||
|
||
#include <portab.h>
|
||
|
||
BYTE * strncat(s1,s2,num) /* CLEAR FUNCTION ***********/
|
||
BYTE *s1;
|
||
REG BYTE *s2; /* 'n' unsigned: if n<0, we'll */
|
||
WORD num; /* still decrement to 0. */
|
||
{
|
||
REG BYTE *cp;
|
||
|
||
for( cp=s1; *cp; cp++) /* save s1 for return. */
|
||
;
|
||
while( *s2 && num-- > 0 ) /* copy until eos(s2) or n==0: */
|
||
*cp++ = *s2++; /* no copy if n==0. */
|
||
*cp = NULL; /* make sure string gets eos. */
|
||
return(s1);
|
||
}
|
||
copy if n==0. */
|
||
*cp = NULL; /* make sure string gets eos. */
|
||
return(s1);
|
||
}
|
||
copy if n==0. */
|
||
*cp = NULL; /* make sure string gets eos. */
|
||
return(s1);
|
||
}
|