Consistently use __sun to identify SunOS

The core mostly used __sun already, but '__sun__' and 'sun' were
also present.

2 files changed, 2 insertions, 2 deletions

diff --git a/perl.h b/perl.h
index 163178c0bf..afc2bc8f50 100644
--- a/perl.h
+++ b/perl.h
@@ -4028,7 +4028,7 @@ EXT char *** environ_pointer;
    /* VMS and some other platforms don't use the environ array */
 #  ifdef USE_ENVIRON_ARRAY
 #    if !defined(DONT_DECLARE_STD) || \
-        (defined(__svr4__) && defined(__GNUC__) && defined(sun)) || \
+        (defined(__svr4__) && defined(__GNUC__) && defined(__sun)) || \
         defined(__sgi)
 extern char **	environ;	/* environment variables supplied via exec */
 #    endif
diff --git a/perlio.c b/perlio.c
index 46933662b0..2591f89ce9 100644
--- a/perlio.c
+++ b/perlio.c
@@ -3169,7 +3169,7 @@ PerlIOStdio_invalidate_fileno(pTHX_ FILE *f)
      */	
     f->_fileno = -1;
     return 1;
-#  elif defined(__sun__)
+#  elif defined(__sun)
     PERL_UNUSED_ARG(f);
     return 0;
 #  elif defined(__hpux)