gcc/testsuite/gfortran.dg/hollerith5.f90

   1        ! { dg-do compile }
   2        implicit none
   3        logical b
   4        b = 4Habcd ! { dg-warning "has undefined result" }
   5        end
   6
   7 ! { dg-warning "Hollerith constant" "const" { target *-*-* } 4 }
   8 ! { dg-warning "Conversion" "conversion" { target *-*-* } 4 }