| ! { 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 |