my_strerror is defined since perl 5.21.x
authorSlaven Rezic <slaven@rezic.de>
Thu, 21 Aug 2014 18:15:38 +0000 (20:15 +0200)
committerTony Cook <tony@develop-help.com>
Mon, 25 Aug 2014 05:10:32 +0000 (15:10 +1000)
This change fixes https://rt.cpan.org/Ticket/Display.html?id=98234

perlio.c

index d69e519..c4a6e87 100644 (file)
--- a/perlio.c
+++ b/perlio.c
@@ -18,6 +18,8 @@ static int
 perlio_closer(void *handle);
 static void
 perlio_destroy(void *handle);
 perlio_closer(void *handle);
 static void
 perlio_destroy(void *handle);
+/* my_strerror is defined since perl 5.21.x */
+#undef my_strerror
 static const char *my_strerror(pTHX_ int err);
 
 #ifndef tTHX
 static const char *my_strerror(pTHX_ int err);
 
 #ifndef tTHX