1.4.15 getarg 和 iargc :获取命令行参数
getarg 和 iargc 访问命令行上的参数(在命令行预处理程序扩展后)。
1.4.15.1 getarg :获取命令行参数
该子例程的调用方式如下所示:
call getarg( k , arg ) | |||
k | INTEGER*4 | 输入 | 参数索引(0=第一个=命令名称) |
arg | character* n | 输出 | 第 k 个参数 |
n | INTEGER*4 | arg 的大小 | 大得足以容纳最长的参数 |
1.4.15.2 iargc :获取命令行参数的数量
该函数的调用方式如下所示:
返回值 | 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