From: Roderick Schertler Date: Sat, 20 Dec 1997 23:01:40 +0000 (-0500) Subject: DG/UX tweaks to perl.h: X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=16de4a3eb5e2e5404a0e20c9aab265691171d76f;p=p5sagit%2Fp5-mst-13.2.git DG/UX tweaks to perl.h: Subject: [PATCH] _56 on dgux without threads p4raw-id: //depot/perl@407 --- diff --git a/perl.h b/perl.h index 9138ba6..bec110c 100644 --- a/perl.h +++ b/perl.h @@ -113,7 +113,8 @@ register struct op *op asm(stringify(OP_IN_REGISTER)); # define STANDARD_C 1 #endif -#if defined(__cplusplus) || defined(WIN32) || defined(__sgi) || defined(OS2) +#if defined(__cplusplus) || defined(WIN32) || defined(__sgi) || defined(OS2) \ + || defined(__DGUX) # define DONT_DECLARE_STD 1 #endif @@ -1382,7 +1383,9 @@ int runops_debug _((void)); /* VMS doesn't use environ array and NeXT has problems with crt0.o globals */ #if !defined(VMS) && !(defined(NeXT) && defined(__DYNAMIC__)) -#if !defined(DONT_DECLARE_STD) || (defined(__svr4__) && defined(__GNUC__) && defined(sun)) || defined(__sgi) +#if !defined(DONT_DECLARE_STD) \ + || (defined(__svr4__) && defined(__GNUC__) && defined(sun)) \ + || defined(__sgi) || defined(__DGUX) extern char ** environ; /* environment variables supplied via exec */ #endif #else