Silence 4 "unreferenced local variable" warnings from VC++

p4raw-id: //depot/perl@29406

diff --git a/ext/Time/Piece/Piece.pm b/ext/Time/Piece/Piece.pm
index b7e4327..a3c4bfa 100644 (file)
--- a/ext/Time/Piece/Piece.pm
+++ b/ext/Time/Piece/Piece.pm
@@ -22,7 +22,7 @@ our %EXPORT_TAGS = (
     ':override' => 'internal',
     );
 
-our $VERSION = '1.11';
+our $VERSION = '1.11_01';
 
 bootstrap Time::Piece $VERSION;
 

diff --git a/ext/Time/Piece/Piece.xs b/ext/Time/Piece/Piece.xs
index ad265d2..fa97c4c 100644 (file)
--- a/ext/Time/Piece/Piece.xs
+++ b/ext/Time/Piece/Piece.xs
@@ -799,7 +799,7 @@ MODULE = Time::Piece     PACKAGE = Time::Piece
 
 PROTOTYPES: ENABLE
 
-char *
+void
 _strftime(fmt, sec, min, hour, mday, mon, year, wday = -1, yday = -1, isdst = -1)
     char *        fmt
     int        sec
@@ -886,12 +886,9 @@ _strptime ( string, format )
        char * string
        char * format
   PREINIT:
-       char tmpbuf[128];
        struct tm mytm;
        time_t t;
        char * remainder;
-       int len;
-       int tzdiff;
   PPCODE:
        t = 0;
        mytm = *gmtime(&t);