diff options
author | Artur Bergman <sky@nanisky.com> | 2001-09-10 10:02:51 +0000 |
---|---|---|
committer | Artur Bergman <sky@nanisky.com> | 2001-09-10 10:02:51 +0000 |
commit | 19e8ce8e5f1ac60deced7aff63c00270eec46957 (patch) | |
tree | 438ab66fd0092b89295dae0b19886d33a56e9b65 /sv.c | |
parent | 7a799e204b140f54600dab7d4a7b8f748e814b8f (diff) | |
download | perl-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.c | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -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, '<'); |