Searched refs:PL_dowarn (Results 1 – 17 of 17) sorted by relevance
82 # define ckWARN(a) (PL_dowarn & G_WARN_ON)84 # define ckWARN(a) PL_dowarn
32 PL_dowarn113 # define PL_dowarn dowarn399 ppp_TESTVAR(PL_dowarn);
176 #define isWARN_ONCE (PL_dowarn & (G_WARN_ON|G_WARN_ONCE))
1132 sv_setiv(sv, (IV)cBOOL(PL_dowarn & G_WARN_ON)); in Perl_magic_get()3160 if ( ! (PL_dowarn & G_WARN_ALL_MASK)) { in Perl_magic_set()3162 PL_dowarn = (PL_dowarn & ~G_WARN_ON) in Perl_magic_set()3167 if ( ! (PL_dowarn & G_WARN_ALL_MASK)) { in Perl_magic_set()3184 PL_dowarn |= G_WARN_ONCE ; in Perl_magic_set()3197 PL_dowarn |= G_WARN_ONCE ; in Perl_magic_set()
1008 PL_dowarn = G_WARN_OFF; in perl_destruct()1907 PL_dowarn = G_WARN_OFF; in perl_parse()3898 if (! (PL_dowarn & G_WARN_ALL_MASK)) { in Perl_moreswitches()3899 PL_dowarn |= G_WARN_ON; in Perl_moreswitches()3904 PL_dowarn = G_WARN_ALL_ON|G_WARN_ON; in Perl_moreswitches()3909 PL_dowarn = G_WARN_ALL_OFF; in Perl_moreswitches()
100 # define PL_dowarn (vTHX->Idowarn) macro
74 SAVEI8(PL_dowarn); in Perl__force_out_malformed_utf8_message()77 PL_dowarn = G_WARN_ALL_ON|G_WARN_ON; in Perl__force_out_malformed_utf8_message()
4918 U8 oldwarn = PL_dowarn; in S_fold_constants()5023 if ( ! (PL_dowarn & G_WARN_ALL_MASK)) in S_fold_constants()5024 PL_dowarn |= G_WARN_ON; in S_fold_constants()5058 PL_dowarn = oldwarn; in S_fold_constants()5105 U8 oldwarn = PL_dowarn; in S_gen_constant_list()5144 if ( ! (PL_dowarn & G_WARN_ALL_MASK)) in S_gen_constant_list()5145 PL_dowarn |= G_WARN_ON; in S_gen_constant_list()5172 PL_dowarn = oldwarn; in S_gen_constant_list()8068 if (shortver >= SHORTVER(5, 35) && !(PL_dowarn & G_WARN_ALL_MASK)) { in Perl_utilize()8070 PL_dowarn |= G_WARN_ONCE; in Perl_utilize()
2325 else if (old_warnings == pWARN_STD && (PL_dowarn & G_WARN_ON) == 0)2328 (old_warnings == pWARN_STD && PL_dowarn & G_WARN_ON)) {4096 if (PL_dowarn & G_WARN_ALL_ON) in S_doeval_compile()4098 else if (PL_dowarn & G_WARN_ALL_OFF) in S_doeval_compile()
2284 return PL_dowarn & G_WARN_ON; in Perl_ckwarn()
15753 PL_dowarn = proto_perl->Idowarn;
416 if ((PL_dowarn & G_WARN_ON) || ckWARN(WARN_SYNTAX)) {
170 if (PL_dowarn) warn("Unrecognized iotype %c for %s in binmode",
12132 # define PL_dowarn dowarn macro14697 # define ckWARN(a) (PL_dowarn & G_WARN_ON)14699 # define ckWARN(a) PL_dowarn
425 PL_dowarn # M added by devel/scanprov
691 RETVAL = ix ? PL_dowarn : PL_sub_generation;
706 mnd|U8|PL_dowarn