Fortran Syntax error in OPEN statement

Question

I couldn't figure out what's wrong with the following Fortran OPEN statement:

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

[I added CR for clarity]

Compiled under gfortran (from gcc-4.8.1), the above gives the following error:

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

The code might compile OK with ifort (but I don't have ifort).

Can someone please explain what went wrong and how to write the statement in a standard compliant way?

marshall.ward · Accepted Answer · 2014-10-05 11:07:16Z

5

The READONLY keyword for OPEN() is not part of the Fortran standard. Although nearly all commerical compilers support it, it does not appear to be supported by gfortran. But nowadays, you can use action='read' to get the same result, which is supported by the language standard (and also seems to work for me).

answered Oct 5, 2014 at 11:07

marshall.ward

7,2488 gold badges37 silver badges53 bronze badges

Sign up to request clarification or add additional context in comments.

1 Comment

DrOli Over a year ago

In theory, gFortran is supposed to be able to support such extension via the "-fdec" etc switches, but there are "issues", some of which are discussed here (stackoverflow.com/questions/33245989/…)

Collectives™ on Stack Overflow

Fortran Syntax error in OPEN statement

1 Answer 1

1 Comment

Your Answer

Linked

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

1 Comment

Your Answer

Sign up or log in

Post as a guest

Linked

Related