Fix tcsh hack in Configure
[p5sagit/p5-mst-13.2.git] / cop.h
diff --git a/cop.h b/cop.h
index a569967..3383ceb 100644 (file)
--- a/cop.h
+++ b/cop.h
@@ -241,6 +241,7 @@ struct subst {
        cx->sb_s                = s,                                    \
        cx->sb_m                = m,                                    \
        cx->sb_strend           = strend,                               \
+       cx->sb_subbase          = Nullch,                               \
        cx->sb_rx               = rx,                                   \
        cx->cx_type             = CXt_SUBST
 
@@ -265,9 +266,10 @@ struct context {
 /* "gimme" values */
 #define G_SCALAR       0
 #define G_ARRAY                1
+#define G_VOID         128     /* skip this bit when adding flags below */
 
 /* extra flags for perl_call_* routines */
 #define G_DISCARD      2       /* Call FREETMPS. */
 #define G_EVAL         4       /* Assume eval {} around subroutine call. */
 #define G_NOARGS       8       /* Don't construct a @_ array. */
-#define G_KEEPERR      16      /* Append errors to $@ rather than overwriting it */
+#define G_KEEPERR      16      /* Append errors to $@, don't overwrite it */