--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/gcc/testsuite/gfortran.dg/boz_float_2.f90 Thu Feb 13 11:34:05 2020 +0900 @@ -0,0 +1,5 @@ +! { dg-do compile } +! { dg-options "-fallow-invalid-boz" } +program foo + print *, float(z'1234') ! { dg-warning "cannot appear in" } +end program foo