1*47944Sbostic /*- 2*47944Sbostic * Copyright (c) 1980 The Regents of the University of California. 3*47944Sbostic * All rights reserved. 42524Sdlw * 5*47944Sbostic * %sccs.include.proprietary.c% 623029Skre */ 723029Skre 8*47944Sbostic #ifndef lint 9*47944Sbostic static char sccsid[] = "@(#)iargc_.c 5.2 (Berkeley) 04/12/91"; 10*47944Sbostic #endif /* not lint */ 11*47944Sbostic 1223029Skre /* 132524Sdlw * return the number of args on the command line following the command name 142524Sdlw * 152524Sdlw * calling sequence: 162524Sdlw * nargs = iargc() 172524Sdlw * where: 182524Sdlw * nargs will be set to the number of args 192524Sdlw */ 202524Sdlw 212524Sdlw extern int xargc; 222524Sdlw iargc_()232524Sdlwlong iargc_() 242524Sdlw { 252524Sdlw return ((long)(xargc - 1)); 262524Sdlw } 27