/*****
******
**	TITLE:			STRXCPY - LIMITED STRING COPY ROUTINE WHICH
**				RETURNS THE ADDRESS OF THE TERMINATING NULL
**	SYSTEM:			COMMON DEC
**	ENTRY POINT:		STRXCPY
**	SOURCE FILE:		STRXCPY.C
**	PROGRAMMER:		Wayne E. Baisley
**	SOFTWARE TREE:		CLIB.STS
**      DATE:                   March 22, 1984
**
**	REVISIONS:	DATE	PROGRAMMER		DESCRIPTION
**			----	--------------	-----------------------------
**
**         1)         03/22/84  W. E. Baisley   Original release.
**
******
*****/
	
char *strxcpy (t, s, n)
	
char *t;				/* target string */
char *s;				/* source string */
int n;					/* target length */
	
{
	
	register char *op = t;		/* output string */
	register char *ip = s;		/* input  string */
	register int i = n;		/* output length */
	
	for (; --i >= 0; )	{
	
		if ((*op++ = *ip++) == '\0')	{
	
			ip = op--;
			while (--i >= 0)
				*ip++ = '\0';
			break;
	
		}
	
	}
	
	return (op);			/* return the address of the next character */
	
}
/*	CMS GENERATION  CMS REPLACEMENT HISTORY 	*/


/*	CMS GENERATION *1 COMPILER 17-JUL-1984 10:56:16 "[.pccaccnt]"	*/
