Hello,
the patch avoids warning like this one:

C:/Programmi/Devel/Perl58/lib/CORE/win32iop.h:226:1: warning: "fileno" redefined
In file included from C:/Programmi/Devel/Perl58/lib/CORE/win32.h:74,
                 from C:/Programmi/Devel/Perl58/lib/CORE/win32thread.h:4,
                 from C:/Programmi/Devel/Perl58/lib/CORE/perl.h:2056,

when building perl core and extensions on Windows with MinGW.

Regards
Mattia

--- win32iop.h  Fri Jun 24 14:55:28 2005
+++ win32iop.h  Mon Jun 27 21:17:56 2005
@@ -192,4 +192,7 @@
 #undef getchar
 #undef putchar
+#endif
+
+#if defined(__MINGW32__) || defined(__BORLANDC__)
 #undef fileno
 #endif


Reply via email to