summaryrefslogtreecommitdiffstats
path: root/fortran
diff options
context:
space:
mode:
Diffstat (limited to 'fortran')
-rw-r--r--fortran/src/H5Tf.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/fortran/src/H5Tf.c b/fortran/src/H5Tf.c
index 1932a56..44accfd 100644
--- a/fortran/src/H5Tf.c
+++ b/fortran/src/H5Tf.c
@@ -1432,7 +1432,7 @@ nh5tinsert_array_c2(hid_t_f * parent_id, _fcd name, int_f* namelen, size_t_f* of
}
/*----------------------------------------------------------------------------
* Name: h5tarray_create_c
- * Purpose: Call H5Tcreate_array to create array datatype
+ * Purpose: Call H5Tarray_create to create array datatype
* Inputs: base_id - identifier of array base datatype
* rank - array's rank
* dims - Size of new member array
@@ -1466,7 +1466,7 @@ nh5tarray_create_c(hid_t_f * base_id, int_f *rank, hsize_t_f* dims, hid_t_f* typ
c_base_id = (hid_t)*base_id;
c_rank = (int)*rank;
- c_type_id = H5Tcreate_array(c_base_id, c_rank, c_dims, NULL);
+ c_type_id = H5Tarray_create(c_base_id, c_rank, c_dims, NULL);
if(c_type_id < 0) {
HDfree(c_dims);