1*30488Slepreau static char Sccsid[] = "@(#)cat.c 1.2 02/15/87";
230472Slepreau /*
330472Slepreau Concatenate strings.
430472Slepreau
530472Slepreau cat(destination,source1,source2,...,sourcen,0);
630472Slepreau
730472Slepreau returns destination.
830472Slepreau */
930472Slepreau
cat(dest,source)1030472Slepreau char *cat(dest,source)
1130472Slepreau char *dest, *source;
1230472Slepreau {
1330472Slepreau register char *d, *s, **sp;
1430472Slepreau
1530472Slepreau d = dest;
1630472Slepreau for (sp = &source; s = *sp; sp++) {
1730472Slepreau while (*d++ = *s++) ;
1830472Slepreau d--;
1930472Slepreau }
2030472Slepreau return(dest);
2130472Slepreau }
22