This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
perl.h: STMT_START/END don't need a special case for suncc anymore
authorBrian Fraser <fraserbn@gmail.com>
Wed, 11 Sep 2013 19:49:37 +0000 (16:49 -0300)
committerBrian Fraser <fraserbn@gmail.com>
Tue, 24 Sep 2013 00:20:59 +0000 (21:20 -0300)
perl.h

diff --git a/perl.h b/perl.h
index 1c22586..11a7bfb 100644 (file)
--- a/perl.h
+++ b/perl.h
 #   define STMT_START  (void)( /* gcc supports "({ STATEMENTS; })" */
 #   define STMT_END    )
 # else
 #   define STMT_START  (void)( /* gcc supports "({ STATEMENTS; })" */
 #   define STMT_END    )
 # else
-   /* Now which other defined()s do we need here ??? */
-#  if (defined(sun) || defined(__sun__)) && !defined(__GNUC__)
-#   define STMT_START  if (1)
-#   define STMT_END    else (void)0
-#  else
 #   define STMT_START  do
 #   define STMT_END    while (0)
 #   define STMT_START  do
 #   define STMT_END    while (0)
-#  endif
 # endif
 #endif
 
 # endif
 #endif