diff options
Diffstat (limited to 'fortran/src/H5Eff.F90')
-rw-r--r-- | fortran/src/H5Eff.F90 | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/fortran/src/H5Eff.F90 b/fortran/src/H5Eff.F90 index 0d7a873..7e833ab 100644 --- a/fortran/src/H5Eff.F90 +++ b/fortran/src/H5Eff.F90 @@ -54,6 +54,8 @@ CONTAINS !! \param hdferr \fortran_error !! \param estack_id Error Stack id !! +!! See C API: @ref herr_t H5Eclear2(hid_t err_stack); +!! SUBROUTINE h5eclear_f(hdferr, estack_id) IMPLICIT NONE INTEGER, INTENT(OUT) :: hdferr @@ -82,6 +84,8 @@ CONTAINS !! \param hdferr \fortran_error !! \param name Name of the file that contains print output !! +!! See C API: @ref herr_t H5Eprint2(hid_t err_stack, FILE *stream); +!! SUBROUTINE h5eprint_f(hdferr, name) CHARACTER(LEN=*), OPTIONAL, INTENT(IN) :: name INTEGER, INTENT(OUT) :: hdferr @@ -118,6 +122,8 @@ CONTAINS !! \param namelen Number of characters in the name buffer. !! \param hdferr \fortran_error !! +!! See C API: @ref char *H5Eget_major(H5E_major_t maj); +!! SUBROUTINE h5eget_major_f(error_no, name, namelen, hdferr) INTEGER, INTENT(IN) :: error_no CHARACTER(LEN=*), INTENT(OUT) :: name @@ -145,6 +151,8 @@ CONTAINS !! \param name Character string describing the error. !! \param hdferr \fortran_error !! +!! See C API: @ref char *H5Eget_minor(H5E_minor_t min); +!! SUBROUTINE h5eget_minor_f(error_no, name, hdferr) INTEGER, INTENT(IN) :: error_no CHARACTER(LEN=*), INTENT(OUT) :: name @@ -173,6 +181,8 @@ CONTAINS !! \param client_data Data passed to the error function. !! \param hdferr \fortran_error !! +!! See C API: @ref herr_t H5Eset_auto2(hid_t estack_id, H5E_auto2_t func, void *client_data); +!! SUBROUTINE h5eset_auto_f(printflag, hdferr, estack_id, func, client_data) USE, INTRINSIC :: ISO_C_BINDING, ONLY : C_PTR, C_FUNPTR INTEGER , INTENT(IN) :: printflag |