X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/e4006f9d1f2c5dc0644d4ed90e50d01a91624c34..9331e88fec8adcad7b90a706da0720fa58b85bac:/ext/Time/Piece/Piece.xs?ds=sidebyside

diff --git a/ext/Time/Piece/Piece.xs b/ext/Time/Piece/Piece.xs
index ad265d2..fa97c4c 100644
--- 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);