REAL_KINDS: a compilation error in Windows but not in Linux ?
Jorge D'ELIA
jdelia@intec.unl.edu.ar
Sun Aug 14 14:40:00 GMT 2011
Hi there,
In a notebook (Pentium(R) Dual-Core CPU T4400, 2.2 GHz)
with windows 7 Starter (2009), I found a compilation
error that does not appear with the Linux version.
The sample code, compiler version and output are:
module m_test
use ISO_FORTRAN_ENV
implicit none
public
integer, parameter :: iin = kind (1)
integer, parameter :: isp = REAL_KINDS (1)
integer, parameter :: idp = REAL_KINDS (2)
integer, parameter :: iep = REAL_KINDS (3)
integer, parameter :: iqp = REAL_KINDS (4)
end module m_test
C:\Users\TEST\gfortran --version
GNU Fortran (GCC) 4.7.0 20110419 (experimental) [trunk revision 170140]
Copyright (C) 2011 Free Software Foundation, Inc.
C:\Users\TEST\gfortran -Wall -std=f2003 -c m_test.f90 m_test.f90:6.29:
integer, parameter :: isp = REAL_KINDS (1)
1
Error: Function 'real_kinds' at (1) has no IMPLICIT type
m_test.f90:7.29:
integer, parameter :: idp = REAL_KINDS (2)
1
Error: Function 'real_kinds' at (1) has no IMPLICIT type
m_test.f90:8.29:
integer, parameter :: iep = REAL_KINDS (3)
1
Error: Function 'real_kinds' at (1) has no IMPLICIT type
m_test.f90:9.29:
integer, parameter :: iqp = REAL_KINDS (4)
1
Error: Function 'real_kinds' at (1) has no IMPLICIT type
Regards,
Jorge.
--
More information about the Fortran
mailing list