http://gcc.gnu.org/bugzilla/show_bug.cgi?id=57871
Dominique d'Humieres <dominiq at lps dot ens.fr> changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|UNCONFIRMED |RESOLVED
Resolution|--- |INVALID
--- Comment #1 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
> gfortran 4.8.1 -freal-4-real-16 gives real(16) kind with
> selected_real_kind(1) but it ought to give real(8) because that is
> the smallest decimal precision available with that compiler option.
> Same problem with -freal-4-real-10 giving real(10) instead of real(8). ...
Why are you expecting that? The manual says:
-freal-4-real-8
-freal-4-real-10
-freal-8-real-4
-freal-8-real-10
-freal-8-real-16
Promote all REAL(KIND=M) entities to REAL(KIND=N) entities. If REAL(KIND=N) is
unavailable, then an error will be issued. All other real kind types are
unaffected by this option. These options should be used with care and may not
be suitable for your codes. Areas of possible concern include calls to external
procedures, alignment in EQUIVALENCE and/or COMMON, generic interfaces, BOZ
literal constant conversion, and I/O. Inspection of the intermediate
representation of the translated Fortran code, produced by
-fdump-tree-original, is suggested.
and your example does exactly that: Closing as INVALID.
