(root)/
gcc-13.2.0/
gcc/
testsuite/
gfortran.dg/
dec_exp_2.f90
! { dg-do compile }
! { dg-options "" }
!
! Make sure we still see an error for missing exponents without -fdec.
!

implicit none

real, parameter :: r1 = 8e ! { dg-error "Missing exponent" }
real, volatile :: r2
r2 = 8e ! { dg-error "Missing exponent" }

end