Signedness nit.

p4raw-id: //depot/perl@13005

diff --git a/regexec.c b/regexec.c
index 4904e57..8c3ff2e 100644 (file)
--- a/regexec.c
+++ b/regexec.c
@@ -3331,7 +3331,7 @@ S_regmatch(pTHX_ regnode *prog)
                            c1 = c2 = -1000;
                            goto assume_ok_easy;
                        }
-                       s = PL_bostr + ln;
+                       s = (U8*)PL_bostr + ln;
                    }
                    else { s = (U8*)STRING(text_node); }