diff options
| author | Nicholas Clark <nick@ccl4.org> | 2011-06-27 20:51:04 +0200 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2011-07-01 14:05:40 +0200 |
| commit | 4185c9197f4aefd1943fba0b9999fc3200fd902c (patch) | |
| tree | 34f48cfebcfa6a796f4496c890400c3a7d89da6c /intrpvar.h | |
| parent | 75fc7bf602cd498829b35780623ebe139c0a0483 (diff) | |
| download | perl-4185c9197f4aefd1943fba0b9999fc3200fd902c.tar.gz | |
Store C<study>'s data in in mg_ptr instead of interpreter variables.
This allows more than one C<study> to be active at the same time.
It eliminates PL_screamfirst, PL_lastscream, PL_maxscream.
Diffstat (limited to 'intrpvar.h')
| -rw-r--r-- | intrpvar.h | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/intrpvar.h b/intrpvar.h index 3a64cb23af..cb8a86171b 100644 --- a/intrpvar.h +++ b/intrpvar.h @@ -155,9 +155,6 @@ PERLVAR(Iefloatsize, STRLEN) /* regex stuff */ -PERLVAR(Iscreamfirst, I32 *) -PERLVAR(Ilastscream, SV *) - PERLVAR(Ireg_state, struct re_save_state) PERLVAR(Iregdummy, regnode) /* from regcomp.c */ @@ -232,7 +229,7 @@ When you replace this variable, it is considered a good practice to store the po PERLVARI(Iopfreehook, Perl_ophook_t, 0) /* op_free() hook */ -PERLVARI(Imaxscream, I32, -1) +/* Space for U32 */ PERLVARI(Ireginterp_cnt,I32, 0) /* Whether "Regexp" was interpolated. */ PERLVARI(Iwatchaddr, char **, 0) PERLVAR(Iwatchok, char *) |