summaryrefslogtreecommitdiff
path: root/pp.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.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.c')
-rw-r--r--pp.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/pp.c b/pp.c
index 37b388c72e..ba12f6c84c 100644
--- a/pp.c
+++ b/pp.c
@@ -121,7 +121,7 @@ PP(pp_padhv)
}
gimme = GIMME_V;
if (gimme == G_ARRAY) {
- RETURNOP(do_kv());
+ RETURNOP(Perl_do_kv(aTHX));
}
else if (gimme == G_SCALAR) {
SV* const sv = Perl_hv_scalar(aTHX_ MUTABLE_HV(TARG));