syscons util remove use kbdcontrol & vidcontrol instead
[unix-history] / lib / libF77 / iargc_.c
CommitLineData
547779a8
WH
1#include "f2c.h"
2
3#ifdef KR_headers
4ftnint iargc_()
5#else
6ftnint iargc_(void)
7#endif
8{
9extern int xargc;
10return ( xargc - 1 );
11}