summaryrefslogtreecommitdiffstats
path: root/fortran
diff options
context:
space:
mode:
Diffstat (limited to 'fortran')
-rw-r--r--fortran/src/H5Tff_F03.f905
-rw-r--r--fortran/src/H5Tff_F90.f902
2 files changed, 2 insertions, 5 deletions
diff --git a/fortran/src/H5Tff_F03.f90 b/fortran/src/H5Tff_F03.f90
index 60a83e9..616ff58 100644
--- a/fortran/src/H5Tff_F03.f90
+++ b/fortran/src/H5Tff_F03.f90
@@ -151,18 +151,15 @@ CONTAINS
INTEGER(C_INT), TARGET :: c_value
TYPE(C_PTR) :: f_ptr
- PRINT*,'b',value
! make sure 'value' is the same type as the C int
c_value = INT(value, C_INT)
f_ptr = C_LOC(c_value)
-
- PRINT*,value
CALL h5tenum_insert_ptr(type_id, name, f_ptr, hdferr)
END SUBROUTINE h5tenum_insert_integer
!
-!****s* H5T/h5tenaum_insert_f_F03
+!****s* H5T/h5tenum_insert_f_F03
!
! NAME
! h5tenaum_insert_f
diff --git a/fortran/src/H5Tff_F90.f90 b/fortran/src/H5Tff_F90.f90
index f2ff543..24af4bb 100644
--- a/fortran/src/H5Tff_F90.f90
+++ b/fortran/src/H5Tff_F90.f90
@@ -40,7 +40,7 @@ MODULE H5T_PROVISIONAL
CONTAINS
!
-!****s* H5T/h5tenaum_insert_f
+!****s* H5T/h5tenum_insert_f
!
! NAME
! h5tenaum_insert_f