1*30472Slepreau static char Sccsid[] "@(#)cat	2.2";
2*30472Slepreau /*
3*30472Slepreau 	Concatenate strings.
4*30472Slepreau 
5*30472Slepreau 	cat(destination,source1,source2,...,sourcen,0);
6*30472Slepreau 
7*30472Slepreau 	returns destination.
8*30472Slepreau */
9*30472Slepreau 
10*30472Slepreau char *cat(dest,source)
11*30472Slepreau char *dest, *source;
12*30472Slepreau {
13*30472Slepreau 	register char *d, *s, **sp;
14*30472Slepreau 
15*30472Slepreau 	d = dest;
16*30472Slepreau 	for (sp = &source; s = *sp; sp++) {
17*30472Slepreau 		while (*d++ = *s++) ;
18*30472Slepreau 		d--;
19*30472Slepreau 	}
20*30472Slepreau 	return(dest);
21*30472Slepreau }
22