In pp_subst, rxtainted is not a boolean, as it stores 2 bits of values.

p4raw-id: //depot/perl@33033

diff --git a/pp_hot.c b/pp_hot.c
index 95a757d..03eeb71 100644 (file)
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -2051,7 +2051,7 @@ PP(pp_subst)
     I32 maxiters;
     register I32 i;
     bool once;
-    bool rxtainted;
+    U8 rxtainted;
     char *orig;
     I32 r_flags;
     register REGEXP *rx = PM_GETRE(pm);