diff options
| author | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2012-09-28 14:48:12 (GMT) |
|---|---|---|
| committer | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2012-09-28 14:48:12 (GMT) |
| commit | 08a5424f6031759ef2660b3c9f07ff0e69c9d8bd (patch) | |
| tree | 66b676bae80f111b8589db603cf8516377a5c153 /fortran/test/tH5T_F03.f90 | |
| parent | 5fba5c2e3aaea7e2215e129f268beefdd94c9530 (diff) | |
| download | hdf5-08a5424f6031759ef2660b3c9f07ff0e69c9d8bd.zip hdf5-08a5424f6031759ef2660b3c9f07ff0e69c9d8bd.tar.gz hdf5-08a5424f6031759ef2660b3c9f07ff0e69c9d8bd.tar.bz2 | |
[svn-r22839] removed unused variable.
tested: jam (pgi compiler)
Diffstat (limited to 'fortran/test/tH5T_F03.f90')
| -rw-r--r-- | fortran/test/tH5T_F03.f90 | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/fortran/test/tH5T_F03.f90 b/fortran/test/tH5T_F03.f90 index cdb9372..dbd8b0a 100644 --- a/fortran/test/tH5T_F03.f90 +++ b/fortran/test/tH5T_F03.f90 @@ -1988,7 +1988,6 @@ SUBROUTINE t_regref(total_error) TYPE(C_PTR) :: f_ptr CHARACTER(LEN=ds2dim0) :: chrvar CHARACTER(LEN=20), DIMENSION(1:2) :: chrref_correct - TYPE(h5o_info_t) :: oinfo ! Object info struct chrvar = "The quick brown " READ(chrvar,'(16A1)') wdata2(1:16,1) |