OPEN 语句中的 Fortran 语法错误

Question

我无法弄清楚以下 Fortran OPEN 语句有什么问题:

filename = 'state_save.txt'                
OPEN(FILE=TRIM(dir)//TRIM(filename),UNIT=ffunit,STATUS='old',FORM='formatted',
IOSTAT=ios, readonly)

[为了清楚起见，我添加了 CR]

在gfortran下编译(from gcc-4.8.1)，上面给出了如下错误:

(dir)//TRIM(filename),UNIT=ffunit,STATUS='old',FORM='formatted',IOSTAT=ios, rea
                                                                           1
Error: Syntax error in OPEN statement at (1)

使用 ifort 代码可能编译正常(但我没有 ifort)。

谁能解释一下出了什么问题以及如何以符合标准的方式编写声明？

Answer 1

OPEN() 的READONLY 关键字不是 Fortran 标准的一部分。尽管几乎所有商业编译器都支持它，但 gfortran 似乎不支持它。但是现在，您可以使用 action='read' 来获得相同的结果，这是语言标准所支持的(而且似乎也适合我)。