https://gcc.gnu.org/bugzilla/show_bug.cgi?id=91752
--- Comment #4 from Jürgen Reuter <juergen.reuter at desy dot de> --- (In reply to kargl from comment #3) > See the documentation. -fallow-invalid-boz reduces the error to a warning. > The warning can only be silenced by -w. This was done with intent. Actually not all of them, this one is still flagged as an error: implicit none integer :: h h = B"11" select case (h) case (B"11") print *, "Found" end select end