summaryrefslogtreecommitdiff
path: root/pp_ctl.c
diff options
context:
space:
mode:
authorShawn M Moore <code@sartak.org>2012-08-19 17:12:27 +0200
committerFather Chrysostomos <sprout@cpan.org>2012-08-28 07:13:56 -0700
commit32aeab29cd5db14b760cb77d37cd86d6878f0553 (patch)
tree232115738823a7ce0ced48c068a0af33b60bacf7 /pp_ctl.c
parentfe83c362fb182e46bac02c1bd1cf0b8d82c9f1bf (diff)
downloadperl-32aeab29cd5db14b760cb77d37cd86d6878f0553.tar.gz
"loading-file" and "loaded-file" DTrace probes
Diffstat (limited to 'pp_ctl.c')
-rw-r--r--pp_ctl.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/pp_ctl.c b/pp_ctl.c
index b85728ba04..14773733de 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -3696,6 +3696,8 @@ PP(pp_require)
}
}
+ LOADING_FILE_PROBE(unixname);
+
/* prepare to compile file */
if (path_is_absolute(name)) {
@@ -3998,6 +4000,8 @@ PP(pp_require)
/* Restore encoding. */
PL_encoding = encoding;
+ LOADED_FILE_PROBE(unixname);
+
return op;
}