Lines Matching refs:WARN_IO
225 if (ckWARN(WARN_IO))
226 Perl_warner(aTHX_ packWARN(WARN_IO),
546 if (ckWARN(WARN_IO)) {
549 Perl_warner(aTHX_ packWARN(WARN_IO),
555 Perl_warner(aTHX_ packWARN(WARN_IO),
1050 else if (ckWARN(WARN_IO) && (IoTYPE(io) == IoTYPE_WRONLY))
1388 if (ckWARN(WARN_IO)) {
1389 Perl_warner(aTHX_ packWARN(WARN_IO), "Use of -l on filehandle %s",
1399 if (SvROK(sv) && SvTYPE(SvRV(sv)) == SVt_PVGV && ckWARN(WARN_IO)) {
1400 Perl_warner(aTHX_ packWARN(WARN_IO), "Use of -l on filehandle %s",