X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/671c33bff945cf11371c6f4b51ad63cb17e83f55..5141f98e1f2246ec68c50524e948acf8e11514ab:/utf8.c

diff --git a/utf8.c b/utf8.c
index 28947a3..1b8c168 100644
--- a/utf8.c
+++ b/utf8.c
@@ -1237,7 +1237,7 @@ Perl_to_uni_lower_lc(pTHX_ U32 c)
 }
 
 bool
-S_is_utf8_common(pTHX_ const U8 const *p, SV **swash,
+S_is_utf8_common(pTHX_ const U8 *const p, SV **swash,
 		 const char *const swashname)
 {
     if (!is_utf8_char(p))