diff options
| author | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2011-10-13 04:49:36 (GMT) |
|---|---|---|
| committer | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2011-10-13 04:49:36 (GMT) |
| commit | 0e0fa10599346054c01709aa9f378ffa350eebf3 (patch) | |
| tree | 74a3fefa9c5269c41a16392b0911031a8593316f /fortran/test | |
| parent | c09f1dbc244461e1063457cd31ca666c3496fb22 (diff) | |
| download | hdf5-0e0fa10599346054c01709aa9f378ffa350eebf3.zip hdf5-0e0fa10599346054c01709aa9f378ffa350eebf3.tar.gz hdf5-0e0fa10599346054c01709aa9f378ffa350eebf3.tar.bz2 | |
[svn-r21536] Desciption: Removed H5Eget_auto_f from source, moved to F2003_new branch for
further testing.
Tested: jam (gnu)
Diffstat (limited to 'fortran/test')
| -rw-r--r-- | fortran/test/tH5E_F03.f90 | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/fortran/test/tH5E_F03.f90 b/fortran/test/tH5E_F03.f90 index 75a534e..04e3190 100644 --- a/fortran/test/tH5E_F03.f90 +++ b/fortran/test/tH5E_F03.f90 @@ -158,10 +158,10 @@ SUBROUTINE test_error(total_error) !!$ CALL VERIFY("H5Eset_auto_f",my_hdf5_error_handler_data(1),10, total_error) !!$ CALL VERIFY("H5Eset_auto_f",my_hdf5_error_handler_data(2),20, total_error) - ! Test enabling and disabling default printing - - CALL H5Eget_auto_f(H5E_DEFAULT_F, func1, f_ptr1, error) - CALL VERIFY("H5Eget_auto_f", error, 0, total_error) +!!$ ! Test enabling and disabling default printing +!!$ +!!$ CALL H5Eget_auto_f(H5E_DEFAULT_F, func1, f_ptr1, error) +!!$ CALL VERIFY("H5Eget_auto_f", error, 0, total_error) ! PRINT*,c_associated(f_ptr1) |