Searched refs:in_eval (Results 1 – 5 of 5) sorted by relevance
571 my $in_eval = 0;575 $in_eval = 1;580 splainthis($exception) unless $in_eval;586 return if $in_eval;
8 tests in_eval => sub {
125 in_eval
135 PERLVAR(I, in_eval, U8) /* trap "fatal" errors? */
1965 U8 in_eval = PL_in_eval; in Perl_die_unwind() local1968 if (in_eval) { in Perl_die_unwind()2012 if (!(in_eval & EVAL_KEEPERR)) { in Perl_die_unwind()2020 if (in_eval & EVAL_KEEPERR) { in Perl_die_unwind()2080 if (!(in_eval & EVAL_KEEPERR)) { in Perl_die_unwind()