1! { dg-do compile }
2! { dg-options "" }
3!
4! Make sure we still see an error for missing exponents without -fdec.
5!
6
7implicit none
8
9real, parameter :: r1 = 8e ! { dg-error "Missing exponent" }
10real, volatile :: r2
11r2 = 8e ! { dg-error "Missing exponent" }
12
13end
14