diff options
| author | Nick Ing-Simmons <nik@tiuk.ti.com> | 1998-07-21 22:26:34 +0000 |
|---|---|---|
| committer | Nick Ing-Simmons <nik@tiuk.ti.com> | 1998-07-21 22:26:34 +0000 |
| commit | cd661bb69faf0e70cffcc62a2ca9539a1dd6a09d (patch) | |
| tree | ef6d6573f56c4755875a491f6c72255470473906 /ext/IO/IO.xs | |
| parent | bd28dd3ca083953e5682058b02b9529902e14ca9 (diff) | |
| download | perl-cd661bb69faf0e70cffcc62a2ca9539a1dd6a09d.tar.gz | |
Mingw32 PERL_OBJECT tweaks
p4raw-id: //depot/perl@1615
Diffstat (limited to 'ext/IO/IO.xs')
| -rw-r--r-- | ext/IO/IO.xs | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/ext/IO/IO.xs b/ext/IO/IO.xs index afe7f7775b..a434cca78b 100644 --- a/ext/IO/IO.xs +++ b/ext/IO/IO.xs @@ -7,7 +7,14 @@ # include <unistd.h> #endif #ifdef I_FCNTL +#if defined(__GNUC__) && defined(__cplusplus) && defined(WIN32) +#define _NO_OLDNAMES +#endif # include <fcntl.h> +#if defined(__GNUC__) && defined(__cplusplus) && defined(WIN32) +#undef _NO_OLDNAMES +#endif + #endif #ifdef PerlIO |