SV: END {} blocks run in perl_run

[p5sagit/p5-mst-13.2.git] / intrpvar.h

diff --git a/intrpvar.h b/intrpvar.h
index 6447b27..4fa7374 100644 (file)
--- a/intrpvar.h
+++ b/intrpvar.h
@@ -476,13 +476,17 @@ PERLVAR(Inumeric_radix_sv,        SV *)   /* The radix separator if not '.' */
 #endif
 
 #if defined(USE_ITHREADS)
-PERLVAR(Iregex_pad,     SV**)    /* All regex objects */
-PERLVAR(Iregex_padav,   AV*)    /* All regex objects */
+PERLVAR(Iregex_pad,     SV**)          /* All regex objects */
+PERLVAR(Iregex_padav,   AV*)           /* All regex objects */
+
+#ifdef USE_REENTRANT_API
+PERLVAR(Ireentrant_buffer, REBUF*)     /* here we store the _r buffers */
+#endif
+
 #endif
 
+PERLVAR(Isavebegin,     bool)  /* save BEGINs for compiler     */
+
 /* New variables must be added to the very end for binary compatibility.
  * XSUB.h provides wrapper functions via perlapi.h that make this
  * irrelevant, but not all code may be expected to #include XSUB.h. */
-
-
-