summaryrefslogtreecommitdiff
path: root/perl.c
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>2009-02-20 14:45:36 +0100
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2009-02-20 14:45:36 +0100
commite42f52dd7fa9b0bf0979b5795fdd19196265e1f8 (patch)
tree19a87610e6542457ca9185fe59dd989b5c37cb56 /perl.c
parent9732edbb486f42c348817d585e1a7e8533f152fe (diff)
downloadperl-e42f52dd7fa9b0bf0979b5795fdd19196265e1f8.tar.gz
Silence a casting warning with memchr()
Diffstat (limited to 'perl.c')
-rw-r--r--perl.c2
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 */