関数は、次のように呼び出します。
戻り値 |
INTEGER*4 |
出力 |
コマンド行の引数の個数 |
例: iargc と getarg: 引数の個数を調べ、各引数を読み取ります。
demo% cat yarg.f character argv*10 INTEGER*4 i, iargc, n n = iargc() do 1 i = 1, n call getarg( i, argv ) 1 write( *, '( i2, 1x, a )' ) i, argv end demo% f95 yarg.f demo% a.out *.f 1 first.f 2 yarg.f |
参照: execve(2)、getenv(3F)