If it looks like UTF-8 (either nl_langinfo or locale variables),
[p5sagit/p5-mst-13.2.git] / intrpvar.h
index 4486d2f..94125c5 100644 (file)
@@ -487,12 +487,9 @@ 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 */
+PERLVAR(Ireentrant_buffer, REENTR*)    /* here we store the _r buffers */
 #endif
 
-PERLVAR(sharedsv_space,                PerlInterpreter*)
-PERLVAR(sharedsv_space_mutex,  perl_mutex)
-
 #endif
 
 PERLVAR(Isavebegin,     bool)  /* save BEGINs for compiler     */
@@ -513,11 +510,13 @@ PERLVAR(Idebug_pad,       struct perl_debug_pad)  /* always needed because of the re ex
 PERLVAR(Itaint_warn, bool)      /* taint warns instead of dying */
 
 #ifdef PL_OP_SLAB_ALLOC
-PERLVAR(IOpPtr,IV **)
-PERLVARI(IOpSpace,int,0)
-PERLVAR(IOpSlab,IV *)
+PERLVAR(IOpPtr,I32 **)
+PERLVARI(IOpSpace,I32,0)
+PERLVAR(IOpSlab,I32 *)
 #endif
 
+PERLVAR(Iwantutf8, bool)       /* want utf8 as the default discipline */
+
 /* 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. */