From: Steve Hay <SteveHay@planit.com>
Date: Thu, 14 Dec 2006 16:24:29 +0000 (+0000)
Subject: Silence a warning from (MinGW's) gcc
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d56c6e853ae19a0276051f71a6e0fae57f8ffcba;p=p5sagit%2Fp5-mst-13.2.git

Silence a warning from (MinGW's) gcc

p4raw-id: //depot/perl@29556
---

diff --git a/ext/Time/Piece/Piece.xs b/ext/Time/Piece/Piece.xs
index fa97c4c..868a448 100644
--- a/ext/Time/Piece/Piece.xs
+++ b/ext/Time/Piece/Piece.xs
@@ -755,7 +755,7 @@ label:
 			for (cp = buf; *cp && isupper((unsigned char)*cp); ++cp) 
                             {/*empty*/}
 			if (cp - buf) {
-				zonestr = alloca(cp - buf + 1);
+				zonestr = (char *)alloca(cp - buf + 1);
 				strncpy(zonestr, buf, cp - buf);
 				zonestr[cp - buf] = '\0';
 				tzset();