/p vs (?p)

[perl5.git] / cflags.SH

diff --git a/cflags.SH b/cflags.SH
index 1c542a0..af1b43b 100755 (executable)
--- a/cflags.SH
+++ b/cflags.SH
@@ -17,6 +17,11 @@ case "$0" in
 */*) cd `expr X$0 : 'X\(.*\)/'` ;;
 esac
 
+if test -f config_h.SH -a ! -f config.h; then
+    . ./config_h.SH
+    CONFIG_H=already-done
+fi
+
 warn=''
 
 # Add -Wall for the core modules iff gcc and not already -Wall
@@ -114,7 +119,7 @@ case "$gccversion" in
 '') ;;
 [12]*) ;; # gcc versions 1 (gasp!) and 2 are not good for this.
 Intel*) ;; # # Is that you, Intel C++?
-*)  for opt in -ansi -pedantic -std=c89 -W -Wextra -Wdeclaration-after-statement -Wendif-labels
+*)  for opt in -ansi -pedantic -std=c89 -W -Wextra -Wdeclaration-after-statement -Wendif-labels -Wc++-compat
     do
        case " $ccflags " in
        *" $opt "*) ;; # Skip if already there.
@@ -122,6 +127,7 @@ Intel*) ;; # # Is that you, Intel C++?
           case "`$cc $cflags $opt _cflags.c -o _cflags$_exe 2>&1`" in
           *"unrecognized"*) ;;
           *"Invalid"*) ;;
+          *"is valid for C"*) ;;
           *) if test -x _cflags$_exe
              then
                case "$opt" in
@@ -138,28 +144,29 @@ Intel*) ;; # # Is that you, Intel C++?
 esac
 rm -f _cflags.c _cflags$_exe
 
-# If we have g++, we cannot have the -Wdeclaration-after-statement.
-# Some g++s accept it but then whine about it with every file.
-# This removal is also done "later", in cflags run time.
-case "$cc" in
-*g++*) warn="`echo $warn|sed 's/-Wdeclaration-after-statement/ /'`" ;;
-esac
-
-# If we have -Duse64bitint (or equivalent) in effect and the quadtype
-# has become 'long long', gcc -pedantic becomes unbearable (moreso
-# when combined with -Wall) because long long and LL and %lld|%Ld
-# become warn-worthy.  So let's drop the -pedantic in that case.
-case "$quadtype:$sPRId64" in
-"long long"*|*lld*|*Ld*)
-  ccflags="`echo $ccflags|sed 's/-pedantic/ /'`"
-  warn="`echo $warn|sed 's/-pedantic/ /'`"
+case "$gccversion" in
+'') ;;
+*)
+  if [ "$gccansipedantic" = "" ]; then
+    # If we have -Duse64bitint (or equivalent) in effect and the quadtype
+    # has become 'long long', gcc -pedantic becomes unbearable (moreso
+    # when combined with -Wall) because long long and LL and %lld|%Ld
+    # become warn-worthy.  So let's drop the -pedantic in that case.
+    case "$quadtype:$sPRId64" in
+    "long long"*|*lld*|*Ld*)
+      ccflags="`echo $ccflags|sed 's/-pedantic/ /'`"
+      warn="`echo $warn|sed 's/-pedantic/ /'`"
+      ;;
+    esac
+  fi
+  # Using certain features (like the gcc statement expressions)
+  # requires knowing whether -pedantic has been specified.
+  case "$warn$ccflags" in
+  *-pedantic*) warn="$warn -DPERL_GCC_PEDANTIC" ;;
+  esac
   ;;
 esac
 
-case "$warn$ccflags" in
-*-pedantic*) warn="$warn -DPERL_GCC_PEDANTIC" ;;
-esac
-
 # Code to set any extra flags here.
 extra=''
 
@@ -288,8 +295,13 @@ for file do
 
 case "$cc" in
 *g++*)
-  # We need to remove this also in here (removed also earlier in cflags.SH).
-  ccflags="`echo $ccflags|sed 's/-Wdeclaration-after-statement/ /'`"
+  # Extra paranoia in case people have bad canned ccflags:
+  # bad in the sense that the flags are accepted by g++,
+  # but then whined about.
+  for f in -Wdeclaration-after-statement -std=c89
+  do
+    ccflags=`echo $ccflags|sed 's/$f/ /'`
+  done
   ;;
 esac