From 625fc9db698903a472d499d14739a3267aa60ad3 Mon Sep 17 00:00:00 2001 From: Scot Breitenfeld Date: Tue, 9 Jun 2015 16:51:27 -0500 Subject: [svn-r27176] Removed debugging statements. --- fortran/test/tH5T.f90 | 2 -- 1 file changed, 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 -- cgit v0.12