summaryrefslogtreecommitdiff
path: root/objXSUB.h
diff options
context:
space:
mode:
authorIlya Zakharevich <ilya@math.berkeley.edu>1998-11-25 21:46:20 -0500
committerGurusamy Sarathy <gsar@cpan.org>1998-11-28 18:46:05 +0000
commit9661b5442a5f8dacc64d54eb1de98575f21de5f2 (patch)
tree84e57af266a3e6712f3ef5d10290439b25673c13 /objXSUB.h
parent4b6a72707ac8d719699d8abaea2936e151652d33 (diff)
downloadperl-9661b5442a5f8dacc64d54eb1de98575f21de5f2.tar.gz
applied suggested patch with PERL_OBJECT tweaks
Message-Id: <199811260746.CAA23164@monk.mps.ohio-state.edu> Subject: [PATCH 5.005_53] Enable $_ and pos() inside (?{ CODE }) in RExen p4raw-id: //depot/perl@2367
Diffstat (limited to 'objXSUB.h')
-rw-r--r--objXSUB.h6
1 files changed, 6 insertions, 0 deletions
diff --git a/objXSUB.h b/objXSUB.h
index d4d101d68b..ae1dab5524 100644
--- a/objXSUB.h
+++ b/objXSUB.h
@@ -500,6 +500,10 @@
#define PL_reg_flags pPerl->PL_reg_flags
#undef PL_reg_ganch
#define PL_reg_ganch pPerl->PL_reg_ganch
+#undef PL_reg_magic
+#define PL_reg_magic pPerl->PL_reg_magic
+#undef PL_reg_oldpos
+#define PL_reg_oldpos pPerl->PL_reg_oldpos
#undef PL_reg_re
#define PL_reg_re pPerl->PL_reg_re
#undef PL_reg_start_tmp
@@ -2643,6 +2647,8 @@
#define restore_lex_expect pPerl->Perl_restore_lex_expect
#undef restore_magic
#define restore_magic pPerl->Perl_restore_magic
+#undef restore_pos
+#define restore_pos pPerl->Perl_restore_pos
#undef restore_rsfp
#define restore_rsfp pPerl->Perl_restore_rsfp
#undef rninstr