|
|
1.1 ! root 1: /* ! 2: * Copyright (c) 1980 Regents of the University of California. ! 3: * All rights reserved. The Berkeley software License Agreement ! 4: * specifies the terms and conditions for redistribution. ! 5: * ! 6: * @(#)iargc_.c 5.1 6/7/85 ! 7: */ ! 8: ! 9: /* ! 10: * return the number of args on the command line following the command name ! 11: * ! 12: * calling sequence: ! 13: * nargs = iargc() ! 14: * where: ! 15: * nargs will be set to the number of args ! 16: */ ! 17: ! 18: extern int xargc; ! 19: ! 20: long iargc_() ! 21: { ! 22: return ((long)(xargc - 1)); ! 23: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.