OSDN Git Service

2008-09-10 Tobias Burnus <burnus@net-b.de>
authorburnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 10 Sep 2008 17:18:08 +0000 (17:18 +0000)
committerburnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 10 Sep 2008 17:18:08 +0000 (17:18 +0000)
            H. J. Lu  <hongjiu.lu@intel.com>

        * mk-sik-inc.sh: Make -Wunused-variable proof.
        * mk-srk-inc.sh: Make -Wunused-variable proof.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@140239 138bc75d-0d04-0410-961f-82ee72b054a4

libgfortran/ChangeLog
libgfortran/mk-sik-inc.sh
libgfortran/mk-srk-inc.sh

index 6018140..54d3194 100644 (file)
@@ -1,4 +1,10 @@
 2008-09-10  Tobias Burnus  <burnus@net-b.de>
+           H. J. Lu  <hongjiu.lu@intel.com>
+
+       * mk-sik-inc.sh: Make -Wunused-variable proof.
+       * mk-srk-inc.sh: Make -Wunused-variable proof.
+
+2008-09-10  Tobias Burnus  <burnus@net-b.de>
 
        * mk-kinds-h.sh: Make -Wunused-variable proof.
 
index 83dcb16..68c042f 100755 (executable)
@@ -7,6 +7,7 @@ c=0
 
 for k in $possible_kinds; do
   echo "  integer (kind=$k) :: x" > tmp$$.f90
+  echo "  x = 1_$k" >> tmp$$.f90
   echo "  end" >> tmp$$.f90
   if $compile -S tmp$$.f90 > /dev/null 2>&1; then
     kinds="$kinds $k"
index 076c24b..10c428f 100755 (executable)
@@ -7,6 +7,7 @@ c=0
 
 for k in $possible_kinds; do
   echo "  real (kind=$k) :: x" > tmp$$.f90
+  echo "  x = 1.0_$k" >> tmp$$.f90
   echo "  end" >> tmp$$.f90
   if $compile -S tmp$$.f90 > /dev/null 2>&1; then
     kinds="$kinds $k"