patch up egcs-1.1.2-mingw32 build (builds a working miniperl, but not

[perl5.git] / win32 / win32.h

diff --git a/win32/win32.h b/win32/win32.h
index 0f6f708..766f488 100644 (file)
--- a/win32/win32.h
+++ b/win32/win32.h
@@ -248,6 +248,13 @@ typedef long               gid_t;
 #define flushall       _flushall
 #define fcloseall      _fcloseall
 
+#undef __attribute__
+#define __attribute__(x)
+
+#ifndef CP_UTF8
+#  define CP_UTF8      65001
+#endif
+
 #ifdef PERL_OBJECT
 #  define MEMBER_TO_FPTR(name) &(name)
 #endif