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

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.


Co-Authored-By: H.J. Lu <hongjiu.lu@intel.com>

From-SVN: r140239
This commit is contained in:
Tobias Burnus 2008-09-10 19:18:08 +02:00 committed by Tobias Burnus
parent 6c43852a18
commit 7666351c39
3 changed files with 8 additions and 0 deletions

View File

@ -1,3 +1,9 @@
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.

View File

@ -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"

View File

@ -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"