Change 11565 by jhi@alpha on 2001/08/03 13:46:40
Subject: Re: [ID 20010731.105] MinGW can't compile win32.c on Windows 2000
From: John Kristian <[EMAIL PROTECTED]>
Date: Fri, 03 Aug 2001 00:59:08 -0700
Message-id: <03a101c11bf2$2c9b5ee0$0100a8c0@JOHNKRISTIAN>
Affected files ...
... //depot/perl/win32/win32.c#166 edit
Differences ...
==== //depot/perl/win32/win32.c#166 (text) ====
Index: perl/win32/win32.c
--- perl/win32/win32.c.~1~ Fri Aug 3 08:00:05 2001
+++ perl/win32/win32.c Fri Aug 3 08:00:05 2001
@@ -1652,7 +1652,8 @@
char *arch;
GetSystemInfo(&info);
-#if (defined(__BORLANDC__)&&(__BORLANDC__<=0x520)) || defined(__MINGW32__)
+#if (defined(__BORLANDC__)&&(__BORLANDC__<=0x520)) \
+ || (defined(__MINGW32__) && !defined(_ANONYMOUS_UNION))
switch (info.u.s.wProcessorArchitecture) {
#else
switch (info.wProcessorArchitecture) {
@@ -2072,7 +2073,7 @@
DllExport char *
win32_strerror(int e)
{
-#ifndef __BORLANDC__ /* Borland intolerance */
+#if !defined __BORLANDC__ && !defined __MINGW32__ /* compiler intolerance */
extern int sys_nerr;
#endif
DWORD source = 0;
@@ -2539,7 +2540,8 @@
StreamId.dwStreamId = BACKUP_LINK;
StreamId.dwStreamAttributes = 0;
StreamId.dwStreamNameSize = 0;
-#if defined(__BORLANDC__) || defined(__MINGW32__)
+#if defined(__BORLANDC__) \
+ ||(defined(__MINGW32__) && !defined(_ANONYMOUS_UNION))
StreamId.Size.u.HighPart = 0;
StreamId.Size.u.LowPart = dwLen;
#else
End of Patch.