[Bug fortran/67509] New: [6 regression] FAIL: gfortran.dg/ieee/ieee_7.f90 -O0 execution test

[schwab@linux-m68k.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67509

            Bug ID: 67509
           Summary: [6 regression] FAIL: gfortran.dg/ieee/ieee_7.f90   -O0
                     execution test
           Product: gcc
           Version: 6.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: schwab@linux-m68k.org
                CC: fxcoudert at gcc dot gnu.org
  Target Milestone: ---
            Target: powerpc*-*-*

$ gcc/gfortran -Bgcc/ -Bpowerpc64-suse-linux/32/libgfortran/
../gcc/testsuite/gfortran.dg/ieee/ieee_7.f90 -O0 -pedantic-errors
-fintrinsic-modules-path $PWD/powerpc64-suse-linux/./libgfortran/
-fno-unsafe-math-optimizations -frounding-math -fsignaling-nans
-Bpowerpc64-suse-linux/./libgfortran/.libs
-Lpowerpc64-suse-linux/./libgfortran/.libs
-Lpowerpc64-suse-linux/./libgfortran/.libs
-Lpowerpc64-suse-linux/./libatomic/.libs -lm -m64 -o ./ieee_7.exe -g
$
LD_LIBRARY_PATH=.:powerpc64-suse-linux/./libgfortran/.libs:powerpc64-suse-linux/./libgfortran/.libs:gcc
./ieee_7.exe 

Program aborted. Backtrace:
#0  0x3FFFB2FF3D93
Aborted

Breakpoint 1, MAIN__ () at ../gcc/testsuite/gfortran.dg/ieee/ieee_7.f90:37
37        if (ieee_selected_real_kind(0,range(0._maxreal)+1) /= -2) call abort
(gdb) s
ieee_arithmetic::ieee_selected_real_kind (p=0, r=292, 
    radix=<error reading variable: Cannot access memory at address 0x0>)
    at ../../../libgfortran/ieee/ieee_arithmetic.F90:790
790         res = SELECTED_REAL_KIND (P, R, RADIX)
(gdb) fin
Run till exit from #0  ieee_arithmetic::ieee_selected_real_kind (p=0, r=292, 
    radix=<error reading variable: Cannot access memory at address 0x0>)
    at ../../../libgfortran/ieee/ieee_arithmetic.F90:790
0x0000000010000c7c in MAIN__ ()
    at ../gcc/testsuite/gfortran.dg/ieee/ieee_7.f90:37
37        if (ieee_selected_real_kind(0,range(0._maxreal)+1) /= -2) call abort
Value returned is $1 = 8