gcc/testsuite/gfortran.dg/warning-directive-2.F90

   1 ! { dg-do preprocess }
   2 ! { dg-options "-std=f95 -fdiagnostics-show-option -Werror=cpp" }
   3 ! { dg-warning "some warnings being treated as errors" "" {target "*-*-*"} 0 }
   4 #warning "Printed"
   5 ! { dg-error "\"Printed\" .-Wcpp." "" { target *-*-* } 4 }