2 ! { dg-options "-Wno-intrinsic-shadow -fall-intrinsics" }
5 ! Check that the "intrinsic shadow" warnings are not emitted if the warning
13 REAL FUNCTION asin (arg) ! { dg-bogus "shadow the intrinsic" }
20 REAL FUNCTION acos (arg) ! { dg-bogus "of an intrinsic" }
25 ! We do only compile, so no main program needed.