Fortran 2003 引入了 GET_COMMAND_ARGUMENT。除了获取命令参数外,它还允许检索调用程序的命令名称。这是在参数号 0 中传递的。也许您的编译器足够新以支持它。参数中传递的确切文本取决于编译器。
程序 cmd_name
字符 :: cmd*100
调用 get_command_argument(0, cmd)
print *, "命令名称:" // cmd(1:len_trim(cmd))
结束程序
在 Windows 上使用 Ifort 13.1,将打印:
命令名称:cmd_name