Update File::Fetch to 0.16

[perl5.git] / intrpvar.h

diff --git a/intrpvar.h b/intrpvar.h
index 787543f..4a62779 100644 (file)
--- a/intrpvar.h
+++ b/intrpvar.h
@@ -124,7 +124,7 @@ PERLVAR(Idefstash,  HV *)           /* main symbol table */
 PERLVAR(Icurstash,     HV *)           /* symbol table for current package */
 
 PERLVAR(Irestartop,    OP *)           /* propagating an error from croak? */
-PERLVAR(Icurcop,       COP * VOL)
+PERLVAR(Icurcop,       COP *)
 PERLVAR(Icurstack,     AV *)           /* THE STACK */
 PERLVAR(Icurstackinfo, PERL_SI *)      /* current stack + context */
 PERLVAR(Imainstack,    AV *)           /* the stack when nothing funny is
@@ -189,7 +189,7 @@ PERLVAR(Ilocalizing,        U8)             /* are we processing a local() list? */
 PERLVAR(Icolorset,     bool)           /* from regcomp.c */
 PERLVARI(Idirty,       bool, FALSE)    /* in the middle of tearing things
                                           down? */
-PERLVAR(Iin_eval,      VOL U8)         /* trap "fatal" errors? */
+PERLVAR(Iin_eval,      U8)             /* trap "fatal" errors? */
 PERLVAR(Itainted,      bool)           /* using variables controlled by $< */
 
 /* This value may be set when embedding for full cleanup  */
@@ -221,7 +221,6 @@ PERLVAR(Iminus_l,   bool)
 PERLVAR(Iminus_a,      bool)
 PERLVAR(Iminus_F,      bool)
 PERLVAR(Idoswitches,   bool)
-
 PERLVAR(Iminus_E,      bool)
 
 /*
@@ -241,6 +240,7 @@ PERLVAR(Iexit_flags,        U8)             /* was exit() unexpected, etc. */
 PERLVAR(Isrand_called, bool)
 /* Part of internal state, but makes the 16th 1 byte variable in a row.  */
 PERLVAR(Itainting,     bool)           /* doing taint checks */
+/* Space for a U8 */
 PERLVAR(Iinplace,      char *)
 PERLVAR(Ie_script,     SV *)
 
@@ -564,7 +564,8 @@ PERLVAR(Iregex_pad,     SV**)               /* Shortcut into the array of
                                           regex_padav */
 PERLVAR(Iregex_padav,   AV*)           /* All regex objects, indexed via the
                                           values in op_pmoffset of pmop.
-                                          Entry 0 is an array of IVs listing
+                                          Entry 0 is an SV whose PV is a
+                                          "packed" list of IVs listing
                                           the now-free slots in the array */
 #endif