summaryrefslogtreecommitdiff
path: root/pp_hot.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2011-01-09 11:27:19 +0000
committerNicholas Clark <nick@ccl4.org>2011-01-09 11:59:14 +0000
commit981b7185ef2472d1c02fc44a48e3319544ae0baf (patch)
tree17d8128afa9ae24a810beffe6a2382b35a08c9f9 /pp_hot.c
parent897d398936dd2fc088a265fba2a7b62fa97ed458 (diff)
downloadperl-981b7185ef2472d1c02fc44a48e3319544ae0baf.tar.gz
regen/opcode.pl should only generate prototypes for pp_* functions that exist.
It now generates prototypes for all functions that implement OPs. Hence Perl_unimplemented_op no longer needs a special-case prototype. As it is now generating a prototype for Perl_do_kv, no need for regen/embed.pl to duplicate this. Convert the last two users of the macro do_kv() to Perl_do_kv(aTHX).
Diffstat (limited to 'pp_hot.c')
-rw-r--r--pp_hot.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/pp_hot.c b/pp_hot.c
index bd0402af99..4c7b8a1848 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -908,7 +908,7 @@ PP(pp_rv2av)
/* The guts of pp_rv2hv */
if (gimme == G_ARRAY) { /* array wanted */
*PL_stack_sp = sv;
- return do_kv();
+ return Perl_do_kv(aTHX);
}
else if (gimme == G_SCALAR) {
dTARGET;