diplodocus.org Git - nmh/blob - docs/historical/mh-nov-1983/subs/copyip.c

   1 int *copyip(ipf, ipt)
   2 register int *ipf, *ipt;
   3 {
   4         while((*ipt = *ipf)  && *ipf++ != -1)
   5                 ipt++;
   6         *ipt = 0;
   7         return(ipt);
   8 }
   9