[win32] fix POSIX for mingw32

[p5sagit/p5-mst-13.2.git] / ext / POSIX / POSIX.xs

diff --git a/ext/POSIX/POSIX.xs b/ext/POSIX/POSIX.xs
index 1dba9a6..97404b8 100644 (file)
--- a/ext/POSIX/POSIX.xs
+++ b/ext/POSIX/POSIX.xs
@@ -108,6 +108,10 @@
 #  ifdef _MSC_VER
 #    define mode_t short
 #  endif
+#  ifdef __MINGW32__
+#    define mode_t short
+#    define tzset()            not_here("tzset")
+#  endif
 #  define sigaction(a,b,c)     not_here("sigaction")
 #  define sigpending(a)                not_here("sigpending")
 #  define sigprocmask(a,b,c)   not_here("sigprocmask")
@@ -255,13 +259,13 @@ unsigned long strtoul _((const char *, char **, int));
 #define localeconv() not_here("localeconv")
 #endif
 
-#ifndef WIN32
 #ifdef HAS_TZNAME
+#  ifndef WIN32
 extern char *tzname[];
+#  endif
 #else
 char *tzname[] = { "" , "" };
 #endif
-#endif
 
 /* XXX struct tm on some systems (SunOS4/BSD) contains extra (non POSIX)
  * fields for which we don't have Configure support yet: