/**********************************************************************
*   STRNCPY  -  copies at most n chars from one string to another
*
*	BYTE *strcpy(s1,s2,n)
*	BYTE *s1, *s2;
*	UWORD n;
*
*	Copies at most n bytes from s2 to s1, stopping after null 
*	  has been moved.
*	Truncates or null-pads s2, depending on n.
*	Returns s1.
*	No check for overflow of s1.
***********************************************************************/

#include <portab.h>

BYTE *strncpy(s1,s2,n)
REG	BYTE *s1, *s2;
REG	WORD n;
{	REG BYTE *cp;

	for( cp=s1; n-- > 0 && (*cp = *s2); cp++,s2++ ) /* isn't C fun?	*/
		;
	n++;				/* bump n back up.		*/
	while( n-- )			/* while #chars != 0		*/
		*cp++ = ZERO;		/*   null pad.			*/
	return(s1);
}