summaryrefslogtreecommitdiff
path: root/thrdvar.h
diff options
context:
space:
mode:
authorIlya Zakharevich <ilya@math.berkeley.edu>1998-11-27 19:33:17 -0500
committerGurusamy Sarathy <gsar@cpan.org>1998-11-28 19:28:00 +0000
commit5c5e4c245abefef949ee72dd179eff31d923dcb2 (patch)
tree9c6302c8f1b182fc3bed8cfc03f53acc8011406f /thrdvar.h
parent364723c2ea2c2681016fad994c4f40cc3a0bb17d (diff)
downloadperl-5c5e4c245abefef949ee72dd179eff31d923dcb2.tar.gz
Finishing off SNOBOL: $1 in (?{})
Message-Id: <199811280533.AAA25654@monk.mps.ohio-state.edu> p4raw-id: //depot/perl@2372
Diffstat (limited to 'thrdvar.h')
-rw-r--r--thrdvar.h2
1 files changed, 2 insertions, 0 deletions
diff --git a/thrdvar.h b/thrdvar.h
index d9cb9c6334..cb39d0896d 100644
--- a/thrdvar.h
+++ b/thrdvar.h
@@ -160,6 +160,8 @@ PERLVAR(Treg_ganch, char *) /* position of \G */
PERLVAR(Treg_sv, SV *) /* what we match against */
PERLVAR(Treg_magic, MAGIC *) /* pos-magic of what we match */
PERLVAR(Treg_oldpos, I32) /* old pos of what we match */
+PERLVARI(Treg_oldcurpm, PMOP*, NULL) /* curpm before match */
+PERLVARI(Treg_curpm, PMOP*, NULL) /* curpm during match */
PERLVARI(Tregcompp, regcomp_t, FUNC_NAME_TO_PTR(pregcomp))
/* Pointer to RE compiler */