1 /* Copyright (c) 1979 Regents of the University of California */ 2 3 static char sccsid[] = "@(#)ARGV.c 1.1 10/30/80"; 4 5 #include "h00vars.h" 6 #include "h01errs.h" 7 8 ARGV(subscript, var, size) 9 10 int subscript; /* subscript into argv */ 11 register char *var; /* pointer to pascal char array */ 12 register int size; /* sizeof(var) */ 13 { 14 register char *cp; 15 16 if (subscript >= _argc) { 17 ERROR(EARGV, subscript); 18 return; 19 } 20 cp = _argv[subscript]; 21 do { 22 *var++ = *cp++; 23 } while (--size && *cp); 24 while (size--) 25 *var++ = ' '; 26 } 27