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