This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Implement killpg() for MSWin32
[perl5.git] / utfebcdic.h
index bdc1359..4b27b41 100644 (file)
@@ -337,7 +337,7 @@ EXTCONST unsigned char PL_a2e[];
 
 END_EXTERN_C
 
-#define UTF8SKIP(s) PL_utf8skip[*(const U8*)s]
+#define UTF8SKIP(s) PL_utf8skip[*(const U8*)(s)]
 
 /* EBCDIC-happy ways of converting native code to UTF-8 */