diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 1998-05-21 01:37:04 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-05-21 01:37:04 +0000 |
commit | 62520c913c464c89e94916880c0661ff91051cc2 (patch) | |
tree | beb8bf0f2f62d70a5b676dfa837e58a791e81e04 /ext/POSIX | |
parent | 60ce6247fb34169ad0a0e9bbab7a376ec9f7f2ff (diff) | |
download | perl-62520c913c464c89e94916880c0661ff91051cc2.tar.gz |
[win32] fix POSIX for mingw32
p4raw-id: //depot/win32/perl@1022
Diffstat (limited to 'ext/POSIX')
-rw-r--r-- | ext/POSIX/POSIX.xs | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/ext/POSIX/POSIX.xs b/ext/POSIX/POSIX.xs index 1dba9a61f8..97404b8426 100644 --- 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: |