diff options
| author | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2015-03-19 17:11:47 (GMT) |
|---|---|---|
| committer | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2015-03-19 17:11:47 (GMT) |
| commit | 8f8cbb62257a2df11f14801f09df6500f589c506 (patch) | |
| tree | 4b662554b414819ad30a01a872ca6458981f1f0f /fortran/test/tH5E_F03.f90 | |
| parent | c2c3294c2152a95e58ba595d65f0e7a1d1ca3e26 (diff) | |
| download | hdf5-8f8cbb62257a2df11f14801f09df6500f589c506.zip hdf5-8f8cbb62257a2df11f14801f09df6500f589c506.tar.gz hdf5-8f8cbb62257a2df11f14801f09df6500f589c506.tar.bz2 | |
[svn-r26479] Fix for: HDFFV-9162
h5pget_class_f should return hid_t for classtype
Also removed all left over C comment artifacts /* and */ in the Fortran comments.
Tested: h5committest
Diffstat (limited to 'fortran/test/tH5E_F03.f90')
| -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 82ba27c..a7d45f2 100644 --- a/fortran/test/tH5E_F03.f90 +++ b/fortran/test/tH5E_F03.f90 @@ -39,11 +39,11 @@ MODULE test_my_hdf5_error_handler CONTAINS -!/**************************************************************** +!*************************************************************** !** !** my_hdf5_error_handler: Custom error callback routine. !** -!****************************************************************/ +!*************************************************************** INTEGER FUNCTION my_hdf5_error_handler(estack_id, data_inout) bind(C) @@ -173,10 +173,10 @@ SUBROUTINE test_error(total_error) !!$#ifdef H5_USE_16_API !!$ if (old_func != (H5E_auto_t)H5Eprint) !!$ TEST_ERROR; -!!$#else /* H5_USE_16_API */ +!!$#else H5_USE_16_API !!$ if (old_func != (H5E_auto2_t)H5Eprint2) !!$ TEST_ERROR; -!!$#endif /* H5_USE_16_API */ +!!$#endif H5_USE_16_API ! set the customized error handling routine |