1 files changed, 1 insertions, 1 deletions
diff --git a/perl.c b/perl.c
index 512e47a49a..ce6c383534 100644
--- a/perl.c
+++ b/perl.c
@@ -4558,7 +4558,7 @@ S_incpush_use_sep(pTHX_ const char *p, STRLEN len, U32 flags)
     end = p + len;
 
     /* Break at all separators */
-    while ((s = memchr(p, PERLLIB_SEP, end - p))) {
+    while ((s = (const char*)memchr(p, PERLLIB_SEP, end - p))) {
 	if (s == p) {
 	    /* skip any consecutive separators */