various fixes for clean build and test on win32; configpm broken,

[p5sagit/p5-mst-13.2.git] / op.c

diff --git a/op.c b/op.c
index 13f2a15..919d9d8 100644 (file)
--- a/op.c
+++ b/op.c
@@ -4782,7 +4782,7 @@ ck_fun(OP *o)
                    }
                    else {
                        I32 flags = OPf_SPECIAL;
-                       I32 private = 0;
+                       I32 priv = 0;
                        /* is this op a FH constructor? */
                        if (is_handle_constructor(o,numargs)) {
                            flags   = 0;                         
@@ -4790,7 +4790,7 @@ ck_fun(OP *o)
                             * need to "prove" flag does not mean something
                             * else already - NI-S 1999/05/07
                             */ 
-                           private = OPpDEREF; 
+                           priv = OPpDEREF; 
 #if 0
                            /* Helps with open($array[$n],...) 
                               but is too simplistic - need to do selectively
@@ -4800,8 +4800,8 @@ ck_fun(OP *o)
                        }
                        kid->op_sibling = 0;
                        kid = newUNOP(OP_RV2GV, flags, scalar(kid));
-                       if (private) {
-                           kid->op_private |= private;
+                       if (priv) {
+                           kid->op_private |= priv;
                        }
                    }
                    kid->op_sibling = sibl;