访问在其程序中传递给Fortran可执行文件的文件名

Question

我正在尝试创建一个Fortan程序，当编译成可执行文件时，可以将文件作为参数（例如，progexe文件）。

我需要对程序进行编码，以便在Fortran程序中提供文件传递（文件）。我无法弄清楚如何做到这一点。我在MingW上使用gfortran在windows上。

Answer 1

使用GET_COMMAND_ARGUMENT。它适用于gfortran 4.6.3。使用示例：

PROGRAM Main
    IMPLICIT NONE
    CHARACTER(LEN=4096) :: FileName
    CALL GET_COMMAND_ARGUMENT(1, FileName)
    WRITE(*,*) 'Your file name is ', TRIM(FileName)
STOP
ENDPROGRAM

编译并运行：

brady@rocky:~/tmp$ gfortran -o gcatest gcatest.f90 
brady@rocky:~/tmp$ ./gcatest myfile.txt
 Your file name is myfile.txt
brady@rocky:~/tmp$