summaryrefslogtreecommitdiffstats
path: root/fortran
diff options
context:
space:
mode:
authorScot Breitenfeld <brtnfld@hdfgroup.org>2015-06-09 21:51:27 (GMT)
committerScot Breitenfeld <brtnfld@hdfgroup.org>2015-06-09 21:51:27 (GMT)
commit625fc9db698903a472d499d14739a3267aa60ad3 (patch)
tree15ba2fa80ad957875b39ea65fdfd16f50a5648c2 /fortran
parent5097bd442939cabc9b85976c87de3649bc26417c (diff)
downloadhdf5-625fc9db698903a472d499d14739a3267aa60ad3.zip
hdf5-625fc9db698903a472d499d14739a3267aa60ad3.tar.gz
hdf5-625fc9db698903a472d499d14739a3267aa60ad3.tar.bz2
[svn-r27176] Removed debugging statements.
Diffstat (limited to 'fortran')
-rw-r--r--fortran/test/tH5T.f902
1 files changed, 0 insertions, 2 deletions
diff --git a/fortran/test/tH5T.f90 b/fortran/test/tH5T.f90
index d845f73..9aaaa73 100644
--- a/fortran/test/tH5T.f90
+++ b/fortran/test/tH5T.f90
@@ -213,10 +213,8 @@ CONTAINS
CALL check("h5tget_size_f", error, total_error)
CALL h5tget_size_f(H5T_NATIVE_INTEGER, type_sizei, error)
CALL check("h5tget_size_f", error, total_error)
- PRINT*,H5T_NATIVE_DOUBLE
CALL h5tget_size_f(H5T_NATIVE_DOUBLE, type_sized, error)
CALL check("h5tget_size_f", error, total_error)
- stop
CALL h5tget_size_f(H5T_NATIVE_REAL, type_sizer, error)
CALL check("h5tget_size_f", error, total_error)
!write(*,*) "get sizes", type_sizec, type_sizei, type_sizer, type_sized