We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 9acaa98 commit c669642Copy full SHA for c669642
utf8.c
@@ -2404,7 +2404,7 @@ Perl_utf8_to_bytes(pTHX_ U8 *s, STRLEN *lenp)
2404
/* There is some start-up/tear-down overhead with this, so no real gain
2405
* unless the remaining portion of the string is long enough. The current
2406
* value is just a guess. */
2407
- if ((send - s) > 5 * PERL_WORDSIZE) {
+ if ((send - s) > (ptrdiff_t) (5 * PERL_WORDSIZE)) {
2408
2409
/* First, go through the string a word at-a-time to verify that it is
2410
* downgradable. If it contains any start byte besides C2 and C3, then
0 commit comments