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