summaryrefslogtreecommitdiff
path: root/sv.c
diff options
context:
space:
mode:
authorArtur Bergman <sky@nanisky.com>2001-09-10 10:02:51 +0000
committerArtur Bergman <sky@nanisky.com>2001-09-10 10:02:51 +0000
commit19e8ce8e5f1ac60deced7aff63c00270eec46957 (patch)
tree438ab66fd0092b89295dae0b19886d33a56e9b65 /sv.c
parent7a799e204b140f54600dab7d4a7b8f748e814b8f (diff)
downloadperl-19e8ce8e5f1ac60deced7aff63c00270eec46957.tar.gz
Remove #ifdef PERL_CUSTOM_OPS, always build with PERL_CUSTOM_OPS
Rename to custop_op_name to Perl_custom_op_name to match perlapi Clone the hashtable PL_custom_op_names and PL_custop_op_descs in perl_clone. p4raw-id: //depot/perl@11968
Diffstat (limited to 'sv.c')
-rw-r--r--sv.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/sv.c b/sv.c
index 9f9d10512b..c0d77b2641 100644
--- a/sv.c
+++ b/sv.c
@@ -9894,6 +9894,8 @@ perl_clone_using(PerlInterpreter *proto_perl, UV flags,
else
PL_exitlist = (PerlExitListEntry*)NULL;
PL_modglobal = hv_dup_inc(proto_perl->Imodglobal, param);
+ PL_custom_op_names = hv_dup_inc(proto_perl->Icustom_op_names,param);
+ PL_custom_op_descs = hv_dup_inc(proto_perl->Icustom_op_descs,param);
PL_profiledata = NULL;
PL_rsfp = fp_dup(proto_perl->Irsfp, '<');