regcomp.c: Add cast.

[perl5.git] / regcomp.c

diff --git a/regcomp.c b/regcomp.c
index 51fe1cd..f6310c7 100644 (file)
--- a/regcomp.c
+++ b/regcomp.c
@@ -8613,7 +8613,7 @@ tryagain:
                        p += numlen;
                    }
                    else
-                       ender = *p++;
+                       ender = (U8) *p++;
                    break;
                } /* End of switch on the literal */