FORTRAN 编译错误

Question

f77    -c -o alqueva.o alqueva.f
alqueva.f: In program `ssssss':
alqueva.f:402: 
           DO WHILE (.NOT. EOF(12))
                     1     2
.NOT. operator at (1) must operate on subexpression of logical type, but the subexpression at (2) is not of logical type
alqueva.f:415: 
                   DO WHILE (.NOT. EOF(iread))
                             1     2
.NOT. operator at (1) must operate on subexpression of logical type, but the subexpression at (2) is not of logical type
make: *** [alqueva.o] Error 1

Answer 1

我已经有一段时间没有做很多 fortran 工作了，但我不相信 EOF 函数是 fortran 77 标准的一部分，而且我总是使用 end=label 习惯用法

10 read (blah,end=20)
   process stuff
   goto 10
20 close (blah) 

（但可能使用 < code>do 而不是 goto...)

这是讨论几个选项的页面，包括上述选项和基于 iostat 的选项