diff options
| author | James Laird <jlaird@hdfgroup.org> | 2005-06-09 15:04:08 (GMT) |
|---|---|---|
| committer | James Laird <jlaird@hdfgroup.org> | 2005-06-09 15:04:08 (GMT) |
| commit | 6dd39e45beba3c6485dd77493fa8ad6f2c614f21 (patch) | |
| tree | f67408e3ee0c1510c18ec841e1edc5b09805f1f3 /fortran/src/H5test_kind.f90 | |
| parent | 602a9ce693270280f917bd7d90710df153dcbbd1 (diff) | |
| download | hdf5-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.f90 | 2 |
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) |