From f9fee72df920390e75b875e0fe2ed961c7ad3d61 Mon Sep 17 00:00:00 2001 From: Quincey Koziol Date: Mon, 12 Sep 2005 12:33:55 -0500 Subject: [svn-r11392] Purpose: Bug fix Description: Recent group code changes tweaked the size of the free space in the file for this test. Update to the latest correct value. Platforms tested: h5committested --- fortran/test/tH5F.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/fortran/test/tH5F.f90 b/fortran/test/tH5F.f90 index 46832bb..d356619 100644 --- a/fortran/test/tH5F.f90 +++ b/fortran/test/tH5F.f90 @@ -747,7 +747,7 @@ ! Check the free space now CALL h5fget_freespace_f(fid, free_space, error) CALL check("h5fget_freespace_f",error,total_error) - if(error .eq.0 .and. free_space .ne. 976) then + if(error .eq.0 .and. free_space .ne. 1208) then total_error = total_error + 1 write(*,*) "Wrong amount of free space reported, ", free_space endif -- cgit v0.12