diff options
author | Shawn M Moore <code@sartak.org> | 2012-08-24 10:35:08 +0200 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2012-08-28 07:13:44 -0700 |
commit | fe83c362fb182e46bac02c1bd1cf0b8d82c9f1bf (patch) | |
tree | 9d7da5e5a98ef9a21b90f1067f175b54145e3de6 /dump.c | |
parent | 9e7f031c1856270daeb95d2b6db9817469855476 (diff) | |
download | perl-fe83c362fb182e46bac02c1bd1cf0b8d82c9f1bf.tar.gz |
"op-entry" DTrace probe
Diffstat (limited to 'dump.c')
-rw-r--r-- | dump.c | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -2129,6 +2129,8 @@ Perl_runops_debug(pTHX) if (DEBUG_t_TEST_) debop(PL_op); if (DEBUG_P_TEST_) debprof(PL_op); } + + OP_ENTRY_PROBE(OP_NAME(PL_op)); } while ((PL_op = PL_op->op_ppaddr(aTHX))); DEBUG_l(Perl_deb(aTHX_ "leaving RUNOPS level\n")); |