mirror/hdf5
2
0
Fork 0
mirror of https://github.com/HDFGroup/hdf5.git synced 2025-03-31 17:10:47 +08:00
Code Issues Packages Projects Releases Wiki Activity

[svn-r22839] removed unused variable.

Browse Source 
tested: jam (pgi compiler)
This commit is contained in:
Scot Breitenfeld 2012-09-28 09:48:12 -05:00
parent 5fba5c2e3a
commit 08a5424f60
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
fortran/test/tH5T_F03.f90
View File

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