diff options
author | Nicholas Clark <nick@ccl4.org> | 2009-01-21 16:41:58 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2009-01-21 17:09:11 +0000 |
commit | b96d8cd966afa49291119752aac86cd1f1de5560 (patch) | |
tree | ddea44f6a0b8c59ab9835695c9936f2375fb6afd /ext/Devel/DProf/DProf.xs | |
parent | e350d0e0ab968c54f8b39c21d92b151f1f1611d5 (diff) | |
download | perl-b96d8cd966afa49291119752aac86cd1f1de5560.tar.gz |
Add get_cvs() as a shortcut for STR_WITH_LEN() and Perl_get_cvn_flags(), and
use it where possible.
Diffstat (limited to 'ext/Devel/DProf/DProf.xs')
-rw-r--r-- | ext/Devel/DProf/DProf.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/Devel/DProf/DProf.xs b/ext/Devel/DProf/DProf.xs index e3faa4a697..ea36b2408a 100644 --- a/ext/Devel/DProf/DProf.xs +++ b/ext/Devel/DProf/DProf.xs @@ -470,7 +470,7 @@ prof_mark(pTHX_ opcode ptype) static void test_time(pTHX_ clock_t *r, clock_t *u, clock_t *s) { - CV * const cv = perl_get_cv("Devel::DProf::NONESUCH_noxs", 0); + CV * const cv = get_cvs("Devel::DProf::NONESUCH_noxs", 0); HV * const oldstash = PL_curstash; struct tms t1, t2; const U32 ototal = g_total; |