summaryrefslogtreecommitdiff
path: root/ext/Fcntl
diff options
context:
space:
mode:
authorNick Ing-Simmons <nik@tiuk.ti.com>1998-07-21 22:26:34 +0000
committerNick Ing-Simmons <nik@tiuk.ti.com>1998-07-21 22:26:34 +0000
commitcd661bb69faf0e70cffcc62a2ca9539a1dd6a09d (patch)
treeef6d6573f56c4755875a491f6c72255470473906 /ext/Fcntl
parentbd28dd3ca083953e5682058b02b9529902e14ca9 (diff)
downloadperl-cd661bb69faf0e70cffcc62a2ca9539a1dd6a09d.tar.gz
Mingw32 PERL_OBJECT tweaks
p4raw-id: //depot/perl@1615
Diffstat (limited to 'ext/Fcntl')
-rw-r--r--ext/Fcntl/Fcntl.xs6
1 files changed, 6 insertions, 0 deletions
diff --git a/ext/Fcntl/Fcntl.xs b/ext/Fcntl/Fcntl.xs
index 18a175f1c6..5149444b68 100644
--- a/ext/Fcntl/Fcntl.xs
+++ b/ext/Fcntl/Fcntl.xs
@@ -5,7 +5,13 @@
#ifdef VMS
# include <file.h>
#else
+#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
/* This comment is a kludge to get metaconfig to see the symbols