https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67509
--- Comment #2 from Pat Haugen <pthaugen at gcc dot gnu.org> ---
(In reply to Francois-Xavier Coudert from comment #1)
> Thanks Andreas for reporting this. Could you please compile and run the
> following Fortran source, and paste the output here? It's been a long time
> since I have used a ppc machine (and it was a darwin one, so maybe different
> support).
>
> $ cat z.f90
> use iso_fortran_env
> use ieee_arithmetic
> integer, parameter :: maxreal = real_kinds(size(real_kinds))
> print *, real_kinds
> print *, maxval(real_kinds), maxreal
> print *, range(0._maxreal)
> print *, selected_real_kind(0,range(0._maxreal))
> print *, ieee_selected_real_kind(0,range(0._maxreal))
> print *, selected_real_kind(0,range(0._maxreal)+1)
> print *, ieee_selected_real_kind(0,range(0._maxreal)+1)
> end
> $ ./bin/gfortran z.f90 && ./a.out
I see the same thing on both powerpc64/powerpc64le:
pthaugen@genoa:~$ ~/install/gcc/trunk/bin/gfortran z.f90 && ./a.out
4 8 16
16 16
291
8
8
8
8
