Searched refs:oldwarn (Results 1 – 3 of 3) sorted by relevance
501 my $oldwarn;539 $oldwarn = $SIG{__WARN__};550 $SIG{__WARN__} = $oldwarn || '';563 goto &$oldwarn if defined $oldwarn and $oldwarn and $oldwarn ne \&warn_trap;
42 my $oldwarn = $SIG{__WARN__};47 local $SIG{__WARN__} = $oldwarn;
4918 U8 oldwarn = PL_dowarn; in S_fold_constants() local5058 PL_dowarn = oldwarn; in S_fold_constants()5105 U8 oldwarn = PL_dowarn; in S_gen_constant_list() local5172 PL_dowarn = oldwarn; in S_gen_constant_list()