1! { dg-do compile }
2! { dg-options "-std=f95 -pedantic" }
3!
4! PR fortran/34342
5!
6! Some BOZ extensions where not diagnosed
7!
8integer :: k, m
9integer :: j = z'000abc' ! { dg-error "BOZ used outside a DATA statement" }
10data k/x'0003'/ ! { dg-error "uses non-standard syntax" }
11data m/'0003'z/ ! { dg-error "uses non-standard postfix syntax" }
12end
13