8 lines
173 B
Fortran
8 lines
173 B
Fortran
|
! { dg-do compile }
|
||
|
|
||
|
program p
|
||
|
associate (y => z'1') ! { dg-error "cannot be a BOZ literal constant" }
|
||
|
end associate ! { dg-error "Expecting END PROGRAM" }
|
||
|
end
|
||
|
|