diff options
author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2009-02-20 14:45:36 +0100 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2009-02-20 14:45:36 +0100 |
commit | e42f52dd7fa9b0bf0979b5795fdd19196265e1f8 (patch) | |
tree | 19a87610e6542457ca9185fe59dd989b5c37cb56 /perl.c | |
parent | 9732edbb486f42c348817d585e1a7e8533f152fe (diff) | |
download | perl-e42f52dd7fa9b0bf0979b5795fdd19196265e1f8.tar.gz |
Silence a casting warning with memchr()
Diffstat (limited to 'perl.c')
-rw-r--r-- | perl.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -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 */ |