From: Nick Ing-Simmons <nik@tiuk.ti.com>
Date: Sat, 12 Sep 1998 09:53:36 +0000 (+0000)
Subject: Two tweaks to allow quiet compile qith egcs-1.1
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b1d1613bf6e49670f3a515bd2ac1feeee2e7ccba;p=p5sagit%2Fp5-mst-13.2.git

Two tweaks to allow quiet compile qith egcs-1.1

p4raw-id: //depot/maint-5.005/perl@1784
---

diff --git a/win32/win32.h b/win32/win32.h
index 5b3f91d..0a3f19b 100644
--- a/win32/win32.h
+++ b/win32/win32.h
@@ -27,7 +27,9 @@ typedef long long __int64;
 /* GCC does not do __declspec() - render it a nop 
  * and turn on options to avoid importing data 
  */
+#ifndef __declspec
 #  define __declspec(x)
+#endif
 #  ifndef PERL_OBJECT
 #    define PERL_GLOBAL_STRUCT
 #    define MULTIPLICITY
@@ -213,7 +215,9 @@ struct mgvtbl {								\
 
 typedef long		uid_t;
 typedef long		gid_t;
+#ifndef _environ
 #define _environ	environ
+#endif
 #define flushall	_flushall
 #define fcloseall	_fcloseall