From bd978a47e06b48783c0af438cd5d2d1daa80da6d Mon Sep 17 00:00:00 2001 From: burnus Date: Wed, 16 Jan 2008 09:13:39 +0000 Subject: [PATCH] 2008-01-16 Steven Bosscher PR libfortran/34669 * mk-kinds-h.sh: Compile with -S to avoid calling the assembler, to avoid piping the -fdump-parse-tree output to the assembler when configuring with -pipe. * mk-sik-inc.sh: Likewise. * mk-srk-inc.sh: Likewise. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@131567 138bc75d-0d04-0410-961f-82ee72b054a4 --- libgfortran/ChangeLog | 9 +++++++++ libgfortran/mk-kinds-h.sh | 10 +++++----- libgfortran/mk-sik-inc.sh | 2 +- libgfortran/mk-srk-inc.sh | 2 +- 4 files changed, 16 insertions(+), 7 deletions(-) diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index 389861a82fc..11b798f9b73 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,3 +1,12 @@ +2008-01-16 Steven Bosscher + + PR libfortran/34669 + * mk-kinds-h.sh: Compile with -S to avoid calling the assembler, + to avoid piping the -fdump-parse-tree output to the assembler + when configuring with -pipe. + * mk-sik-inc.sh: Likewise. + * mk-srk-inc.sh: Likewise. + 2008-01-15 Thomas Koenig PR libfortran/34671 diff --git a/libgfortran/mk-kinds-h.sh b/libgfortran/mk-kinds-h.sh index 02c152c9ce5..6e893ff5ee7 100755 --- a/libgfortran/mk-kinds-h.sh +++ b/libgfortran/mk-kinds-h.sh @@ -14,7 +14,7 @@ smallest="" for k in $possible_integer_kinds; do echo " integer (kind=$k) :: i" > tmp$$.f90 echo " end" >> tmp$$.f90 - if $compile -c tmp$$.f90 > /dev/null 2>&1; then + if $compile -S tmp$$.f90 > /dev/null 2>&1; then s=`expr 8 \* $k` largest="$k" @@ -47,7 +47,7 @@ echo "" for k in $possible_real_kinds; do echo " real (kind=$k) :: x" > tmp$$.f90 echo " end" >> tmp$$.f90 - if $compile -c tmp$$.f90 > /dev/null 2>&1; then + if $compile -S tmp$$.f90 > /dev/null 2>&1; then case $k in 4) ctype="float" ; suffix="f" ;; 8) ctype="double" ; suffix="" ;; @@ -58,19 +58,19 @@ for k in $possible_real_kinds; do # Check for the value of HUGE echo "print *, huge(0._$k) ; end" > tmq$$.f90 - huge=`$compile -c -fdump-parse-tree tmq$$.f90 | grep TRANSFER \ + huge=`$compile -S -fdump-parse-tree tmq$$.f90 | grep TRANSFER \ | sed 's/ *TRANSFER *//' | sed 's/_.*//'` rm -f tmq$$.* # Check for the value of DIGITS echo "print *, digits(0._$k) ; end" > tmq$$.f90 - digits=`$compile -c -fdump-parse-tree tmq$$.f90 | grep TRANSFER \ + digits=`$compile -S -fdump-parse-tree tmq$$.f90 | grep TRANSFER \ | sed 's/ *TRANSFER *//'` rm -f tmq$$.* # Check for the value of RADIX echo "print *, radix(0._$k) ; end" > tmq$$.f90 - radix=`$compile -c -fdump-parse-tree tmq$$.f90 | grep TRANSFER \ + radix=`$compile -S -fdump-parse-tree tmq$$.f90 | grep TRANSFER \ | sed 's/ *TRANSFER *//'` rm -f tmq$$.* diff --git a/libgfortran/mk-sik-inc.sh b/libgfortran/mk-sik-inc.sh index a2f29e1e30a..83dcb16999e 100755 --- a/libgfortran/mk-sik-inc.sh +++ b/libgfortran/mk-sik-inc.sh @@ -8,7 +8,7 @@ c=0 for k in $possible_kinds; do echo " integer (kind=$k) :: x" > tmp$$.f90 echo " end" >> tmp$$.f90 - if $compile -c tmp$$.f90 > /dev/null 2>&1; then + if $compile -S tmp$$.f90 > /dev/null 2>&1; then kinds="$kinds $k" c=`expr $c + 1` fi diff --git a/libgfortran/mk-srk-inc.sh b/libgfortran/mk-srk-inc.sh index d036d682679..076c24bb5b7 100755 --- a/libgfortran/mk-srk-inc.sh +++ b/libgfortran/mk-srk-inc.sh @@ -8,7 +8,7 @@ c=0 for k in $possible_kinds; do echo " real (kind=$k) :: x" > tmp$$.f90 echo " end" >> tmp$$.f90 - if $compile -c tmp$$.f90 > /dev/null 2>&1; then + if $compile -S tmp$$.f90 > /dev/null 2>&1; then kinds="$kinds $k" c=`expr $c + 1` fi -- 2.11.0