------- Comment #8 from dominiq at lps dot ens dot fr 2007-08-02 23:02 -------
Subject: Re: selected_(int|real)_kind fail with
-fdefault-integer-8
> Can you try the attached patch?
It fixes the problem for -fdefault-integer-8, but without it,
it gives on your test (and others) the infamous:
intrinsic_sir_kind_red.f90:4.3:
end
1
Internal Error at (1):
intrinsic_sir_kind_red.f90:3.28:
print *, selected_real_kind(i)
1
Can't convert INTEGER(4) to INTEGER(4) at (1)
I think you need the same kind of machinery as for
PR32954, i.e., change to 4 only if it is different from 4.
BTW, did you consider the second optional argument for
selected_real_kind(i)?
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=32968
