diplodocus.org Git - nmh/blob - docs/historical/mh-jun-1982/Extras/libh/cat.c

   1 #ifdef COMMENT
   2         Proprietary Rand Corporation, 1981.
   3         Further distribution of this software
   4         subject to the terms of the Rand
   5         license agreement.
   6 #endif
   7
   8 char cat_buf[80];
   9
  10
  11 char *cat(s1,s2)
  12 char *s1, *s2;
  13 {
  14         register char *r1, *r2, *bp;
  15         r1 = s1; r2 = s2;
  16         bp = cat_buf;
  17         while(*bp++ = *r1++);
  18         bp--;
  19         while(*bp++ = *r2++);
  20         return(cat_buf);
  21 }