Change 29556: Silence a warning from (MinGW's) gcc

[Steve Hay]

Change 29556 by [EMAIL PROTECTED] on 2006/12/14 16:24:29

        Silence a warning from (MinGW's) gcc

Affected files ...

... //depot/perl/ext/Time/Piece/Piece.xs#10 edit

Differences ...

==== //depot/perl/ext/Time/Piece/Piece.xs#10 (text) ====
Index: perl/ext/Time/Piece/Piece.xs
--- perl/ext/Time/Piece/Piece.xs#9~29406~       2006-11-28 06:58:14.000000000 
-0800
+++ perl/ext/Time/Piece/Piece.xs        2006-12-14 08:24:29.000000000 -0800
@@ -755,7 +755,7 @@
                        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();
End of Patch.