diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-11-25 19:38:50 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-11-25 19:38:50 +0000 |
| commit | 6e22d04617c44509b8a480505826f9b13b2f0dd6 (patch) | |
| tree | 13fb25161175b9adedb74f88af71154af74c94f3 /ext/POSIX/POSIX.xs | |
| parent | 456811e8a3e2c23e7fefd7aba96124b9f0502074 (diff) | |
| download | perl-6e22d04617c44509b8a480505826f9b13b2f0dd6.tar.gz | |
Win32 compilation tweaks for Blair Zajac.
p4raw-id: //depot/perl@13267
Diffstat (limited to 'ext/POSIX/POSIX.xs')
| -rw-r--r-- | ext/POSIX/POSIX.xs | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/ext/POSIX/POSIX.xs b/ext/POSIX/POSIX.xs index 60469a388b..21f69dbe4e 100644 --- a/ext/POSIX/POSIX.xs +++ b/ext/POSIX/POSIX.xs @@ -1,3 +1,5 @@ +#define PERL_EXT_POSIX + #ifdef WIN32 #define _POSIX_ #endif @@ -168,6 +170,8 @@ char *tzname[] = { "" , "" }; # define sigfillset(a) not_here("sigfillset") # define sigismember(a,b) not_here("sigismember") #ifndef NETWARE +# undef setuid +# undef setgid # define setuid(a) not_here("setuid") # define setgid(a) not_here("setgid") #endif /* NETWARE */ @@ -226,9 +230,11 @@ typedef struct termios* POSIX__Termios; /* Possibly needed prototypes */ char *cuserid (char *); +#ifndef WIN32 double strtod (const char *, char **); long strtol (const char *, char **, int); unsigned long strtoul (const char *, char **, int); +#endif #ifndef HAS_CUSERID #define cuserid(a) (char *) not_here("cuserid") |