summaryrefslogtreecommitdiffstats
path: root/fortran/src/H5test_kind.f90
diff options
context:
space:
mode:
authorJames Laird <jlaird@hdfgroup.org>2005-06-09 15:04:08 (GMT)
committerJames Laird <jlaird@hdfgroup.org>2005-06-09 15:04:08 (GMT)
commit6dd39e45beba3c6485dd77493fa8ad6f2c614f21 (patch)
treef67408e3ee0c1510c18ec841e1edc5b09805f1f3 /fortran/src/H5test_kind.f90
parent602a9ce693270280f917bd7d90710df153dcbbd1 (diff)
downloadhdf5-6dd39e45beba3c6485dd77493fa8ad6f2c614f21.zip
hdf5-6dd39e45beba3c6485dd77493fa8ad6f2c614f21.tar.gz
hdf5-6dd39e45beba3c6485dd77493fa8ad6f2c614f21.tar.bz2
[svn-r10883] Purpose:
Bug fix Description: H5test_kind.f90 had an error when being compiled by pgf90. Solution: A variable wasn't declared. Declared it to fix the bug. Platforms tested: heping, mir
Diffstat (limited to 'fortran/src/H5test_kind.f90')
-rw-r--r--fortran/src/H5test_kind.f902
1 files changed, 1 insertions, 1 deletions
diff --git a/fortran/src/H5test_kind.f90 b/fortran/src/H5test_kind.f90
index 4af696f..db2971e 100644
--- a/fortran/src/H5test_kind.f90
+++ b/fortran/src/H5test_kind.f90
@@ -3,7 +3,7 @@
! This fortran program generates H5fortran_detect.f90
!
program test_kind
- integer :: i, j, last, kind_numbers(10)
+ integer :: i, j, ii, last, kind_numbers(10)
last = -1
ii = 0
j = selected_int_kind(18)