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