| Subject: | [PATCH] Silence warning on Solaris |
--- gzip.xs.old Wed Jul 18 15:32:12 2007
+++ gzip.xs Wed Jul 18 15:27:30 2007
@@ -441,7 +441,7 @@
bad:
if (temp) {
STRLEN len;
- STDCHAR *ptr = SvPV(temp, len);
+ STDCHAR *ptr = (STDCHAR *)SvPV(temp, len);
PerlIOGzip *g = PerlIOSelf(f,PerlIOGzip);
#if DEBUG_LAYERGZIP