home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 3 / PDCD_3.iso / languages / pascal / PTC / _PtC1 / ARGVGT < prev    next >
Encoding:
Text File  |  1991-03-04  |  321 b   |  19 lines
  1. # include <stdio.h>
  2. # include "ptcmain.h"
  3.  
  4. static char rcsid[] = "$Id: c.ARGVGT 1.2 91/03/04 14:12:16 gtoal Exp Locker: gtoal $";
  5.  
  6. void
  7. Argvgt(n, cp, l)
  8.      int n;
  9.      unsigned char *cp;
  10.      int l;
  11. {
  12.   unsigned char *sp;
  13.  
  14.   for (sp = argv[n]; l > 0 && *sp; l--)
  15.     *cp++ = *sp++;
  16.   while (l-- > 0)
  17.     *cp++ = ' ';
  18. }
  19.