diff options
| author | burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-09-10 16:39:15 +0000 |
|---|---|---|
| committer | burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-09-10 16:39:15 +0000 |
| commit | eae83ec65a403428546421a0a903e8fde8030bb1 (patch) | |
| tree | 047e99a2d9f8ad840a48ab4786534fc281bf0124 /libgfortran | |
| parent | 60c954e30a250b631c42338278eb76b03a93e0de (diff) | |
| download | gcc-eae83ec65a403428546421a0a903e8fde8030bb1.tar.gz | |
2008-09-10 Tobias Burnus <burnus@net-b.de>
* mk-kinds-h.sh: Make -Wunused-variable proof.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@140237 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran')
| -rw-r--r-- | libgfortran/ChangeLog | 4 | ||||
| -rwxr-xr-x | libgfortran/mk-kinds-h.sh | 2 |
2 files changed, 6 insertions, 0 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index 3a0b2483532..60181400d2e 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,3 +1,7 @@ +2008-09-10 Tobias Burnus <burnus@net-b.de> + + * mk-kinds-h.sh: Make -Wunused-variable proof. + 2008-09-07 Thomas Koenig <tkoenig@gcc.gnu.org> PR fortran/37203 diff --git a/libgfortran/mk-kinds-h.sh b/libgfortran/mk-kinds-h.sh index 6e893ff5ee7..c5d20fe12c5 100755 --- a/libgfortran/mk-kinds-h.sh +++ b/libgfortran/mk-kinds-h.sh @@ -13,6 +13,7 @@ largest="" smallest="" for k in $possible_integer_kinds; do echo " integer (kind=$k) :: i" > tmp$$.f90 + echo " i = 1_$k" >> tmp$$.f90 echo " end" >> tmp$$.f90 if $compile -S tmp$$.f90 > /dev/null 2>&1; then s=`expr 8 \* $k` @@ -46,6 +47,7 @@ echo "" for k in $possible_real_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 case $k in |