When compiling EuroBen mod3a benchmark, following errors terminate the
compilation:
gfortran -c mod3a.f
mod3a.f:61.72:
& Status = 'scratch' )
1
Error: The STATUS specified in OPEN statement at (1) cannot have the value
SCRATCH if a FILE specifier is present
mod3a.f:63.72:
& Status = 'scratch' )
1
Error: The STATUS specified in OPEN statement at (1) cannot have the value
SCRATCH if a FILE specifier is present
mod3a.f:65.72:
& Status = 'scratch' )
1
Error: The STATUS specified in OPEN statement at (1) cannot have the value
SCRATCH if a FILE specifier is present
For comparison, ifort issues only a warning:
fortcom: Warning: mod3a.f, line 60: The STATUS= specifier has the value
SCRATCH, the FILE= specifier will be ignored in the OPEN statement. ['jara']
Open( lua, File = 'jara', Form = 'unformatted',
Testcase (test.f):
--cut here--
Program mod3a
Integer, Parameter :: lua = 1, luc = 9, luna = 10
! --- Open files for input and to hold 'c', 'na', 'ja', and 'ra'.
!
Open( 2, File = 'mod3a.in' )
Open( lua, File = 'jara', Form = 'unformatted',
& Status = 'scratch' )
Open( luc, File = 'cvals', Form = 'unformatted',
& Status = 'scratch' )
Open( luna, File = 'nafl', Form = 'unformatted',
& Status = 'scratch' )
End Program mod3a
--cut here--
BTW: EuroBen benchmark can be downloaded from http://www.euroben.nl,
single-CPU, MPI and OpenMP version.
--
Summary: The STATUS specified in OPEN statement at (1) cannot
have the value SCRATCH if a FILE specifier is present
Product: gcc
Version: 4.3.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: ubizjak at gmail dot com
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=30170
