diff options
Diffstat (limited to 'fortran')
| -rw-r--r-- | fortran/src/H5Af.c | 12 | ||||
| -rw-r--r-- | fortran/src/H5Df.c | 18 | ||||
| -rw-r--r-- | fortran/src/H5Ef.c | 4 | ||||
| -rw-r--r-- | fortran/src/H5Ff.c | 12 | ||||
| -rw-r--r-- | fortran/src/H5Gf.c | 12 | ||||
| -rw-r--r-- | fortran/src/H5If.c | 2 | ||||
| -rw-r--r-- | fortran/src/H5Lf.c | 12 | ||||
| -rw-r--r-- | fortran/src/H5Of.c | 14 | ||||
| -rw-r--r-- | fortran/src/H5Pf.c | 28 | ||||
| -rw-r--r-- | fortran/src/H5Rf.c | 4 | ||||
| -rw-r--r-- | fortran/src/H5Sf.c | 2 | ||||
| -rw-r--r-- | fortran/src/H5Tf.c | 12 |
12 files changed, 66 insertions, 66 deletions
diff --git a/fortran/src/H5Af.c b/fortran/src/H5Af.c index db1c040..64a972e 100644 --- a/fortran/src/H5Af.c +++ b/fortran/src/H5Af.c @@ -178,7 +178,7 @@ h5aget_name_c(hid_t_f *attr_id, size_t_f *bufsize, _fcd buf) /******/ { size_t c_bufsize; - char * c_buf = NULL; /* Buffer to hold C string */ + char *c_buf = NULL; /* Buffer to hold C string */ int_f ret_value = 0; /* Return value */ c_bufsize = (size_t)*bufsize + 1; @@ -465,10 +465,10 @@ h5aget_name_by_idx_c(hid_t_f *loc_id, _fcd obj_name, size_t_f *obj_namelen, int_ hsize_t_f *n, _fcd name, size_t_f *size, hid_t_f *lapl_id) /******/ { - char * c_obj_name = NULL; /* Buffer to hold C string */ + char *c_obj_name = NULL; /* Buffer to hold C string */ ssize_t c_size; size_t c_buf_size; - char * c_buf = NULL; + char *c_buf = NULL; int_f ret_value = 0; /* Return value */ /* @@ -668,7 +668,7 @@ h5aget_info_by_idx_c(hid_t_f *loc_id, _fcd obj_name, size_t_f *obj_namelen, int_ hsize_t_f *data_size) /******/ { - char * c_obj_name = NULL; /* Buffer to hold C string */ + char *c_obj_name = NULL; /* Buffer to hold C string */ H5A_info_t ainfo; int_f ret_value = 0; /* Return value */ @@ -734,8 +734,8 @@ h5aget_info_by_name_c(hid_t_f *loc_id, _fcd obj_name, size_t_f *obj_namelen, _fc int_f *cset, hsize_t_f *data_size) /******/ { - char * c_obj_name = NULL; /* Buffer to hold C string */ - char * c_attr_name = NULL; /* Buffer to hold C string */ + char *c_obj_name = NULL; /* Buffer to hold C string */ + char *c_attr_name = NULL; /* Buffer to hold C string */ H5A_info_t ainfo; int_f ret_value = 0; /* Return value */ diff --git a/fortran/src/H5Df.c b/fortran/src/H5Df.c index a780683..ba3e5d4 100644 --- a/fortran/src/H5Df.c +++ b/fortran/src/H5Df.c @@ -532,7 +532,7 @@ h5dvlen_get_max_len_c(hid_t_f *dset_id, hid_t_f *type_id, hid_t_f *space_id, siz hid_t c_dset_id; hid_t c_type_id; hid_t c_space_id; - hvl_t * c_buf; + hvl_t *c_buf; int i; hssize_t num_elem; herr_t status; @@ -605,7 +605,7 @@ h5dwrite_vl_integer_c(hid_t_f *dset_id, hid_t_f *mem_type_id, hid_t_f *mem_space int_f *tmp; size_t max_len; - hvl_t * c_buf; + hvl_t *c_buf; hsize_t i; hsize_t num_elem; @@ -681,7 +681,7 @@ h5dread_vl_integer_c(hid_t_f *dset_id, hid_t_f *mem_type_id, hid_t_f *mem_space_ herr_t status; size_t max_len; - hvl_t * c_buf; + hvl_t *c_buf; hsize_t i; hssize_t num_elem; @@ -753,10 +753,10 @@ h5dwrite_vl_string_c(hid_t_f *dset_id, hid_t_f *mem_type_id, hid_t_f *mem_space_ hid_t c_file_space_id; hid_t c_xfer_prp; herr_t status; - char * tmp, *tmp_p; + char *tmp, *tmp_p; size_t max_len; - char ** c_buf; + char **c_buf; hsize_t i; hsize_t num_elem; @@ -844,10 +844,10 @@ h5dread_vl_string_c(hid_t_f *dset_id, hid_t_f *mem_type_id, hid_t_f *mem_space_i hid_t c_file_space_id; hid_t c_xfer_prp; herr_t status; - char * tmp, *tmp_p; + char *tmp, *tmp_p; size_t max_len; - char ** c_buf; + char **c_buf; hsize_t i; hsize_t num_elem; @@ -935,7 +935,7 @@ h5dwrite_vl_real_c(hid_t_f *dset_id, hid_t_f *mem_type_id, hid_t_f *mem_space_id real_f *tmp; size_t max_len; - hvl_t * c_buf; + hvl_t *c_buf; hsize_t i; hsize_t num_elem; @@ -1011,7 +1011,7 @@ h5dread_vl_real_c(hid_t_f *dset_id, hid_t_f *mem_type_id, hid_t_f *mem_space_id, herr_t status; size_t max_len; - hvl_t * c_buf; + hvl_t *c_buf; hsize_t i; hssize_t num_elem; diff --git a/fortran/src/H5Ef.c b/fortran/src/H5Ef.c index ec38fd7..13bd5c8 100644 --- a/fortran/src/H5Ef.c +++ b/fortran/src/H5Ef.c @@ -160,7 +160,7 @@ int_f h5eget_major_c(int_f *error_no, _fcd name, size_t_f *namelen) /******/ { - char * c_name = NULL; + char *c_name = NULL; size_t c_namelen = (size_t)*namelen; int_f ret_value = 0; @@ -208,7 +208,7 @@ int_f h5eget_minor_c(int_f *error_no, _fcd name, size_t_f *namelen) /******/ { - char * c_name = NULL; + char *c_name = NULL; size_t c_namelen = (size_t)*namelen; int_f ret_value = 0; diff --git a/fortran/src/H5Ff.c b/fortran/src/H5Ff.c index 339f8b7..2cb8654 100644 --- a/fortran/src/H5Ff.c +++ b/fortran/src/H5Ff.c @@ -48,7 +48,7 @@ h5fcreate_c(_fcd name, int_f *namelen, int_f *access_flags, hid_t_f *crt_prp, hi /******/ { int ret_value = -1; - char * c_name; + char *c_name; int_f c_namelen; hid_t c_file_id; unsigned c_access_flags; @@ -156,7 +156,7 @@ h5fmount_c(hid_t_f *loc_id, _fcd dsetname, int_f *namelen, hid_t_f *file_id, hid /******/ { int ret_value = -1; - char * c_name; + char *c_name; int_f c_namelen; hid_t c_loc_id; hid_t c_file_id; @@ -214,7 +214,7 @@ h5funmount_c(hid_t_f *loc_id, _fcd dsetname, int_f *namelen) /******/ { int ret_value = -1; - char * c_name; + char *c_name; int_f c_namelen; hid_t c_loc_id; htri_t status; @@ -265,7 +265,7 @@ h5fopen_c(_fcd name, int_f *namelen, int_f *access_flags, hid_t_f *acc_prp, hid_ /******/ { int ret_value = -1; - char * c_name; + char *c_name; int_f c_namelen; hid_t c_file_id; unsigned c_access_flags; @@ -506,7 +506,7 @@ h5fget_obj_ids_c(hid_t_f *file_id, int_f *obj_type, size_t_f *max_objs, hid_t_f size_t u; size_t c_max_objs; ssize_t c_num_objs; - hid_t * c_obj_ids; + hid_t *c_obj_ids; c_file_id = (hid_t)*file_id; c_obj_type = (unsigned)*obj_type; @@ -578,7 +578,7 @@ int_f h5fget_name_c(hid_t_f *obj_id, size_t_f *size, _fcd buf, size_t_f *buflen) /******/ { - char * c_buf = NULL; /* Buffer to hold C string */ + char *c_buf = NULL; /* Buffer to hold C string */ ssize_t size_c = -1; int_f ret_value = 0; /* Return value */ diff --git a/fortran/src/H5Gf.c b/fortran/src/H5Gf.c index 0201761..7bf4529 100644 --- a/fortran/src/H5Gf.c +++ b/fortran/src/H5Gf.c @@ -173,9 +173,9 @@ h5gget_obj_info_idx_c(hid_t_f *loc_id, _fcd name, int_f *namelen, int_f *idx, _f { H5O_info2_t oinfo; hid_t c_loc_id = (hid_t)*loc_id; - char * c_name = NULL; + char *c_name = NULL; size_t c_obj_namelen; - char * c_obj_name = NULL; + char *c_obj_name = NULL; hsize_t c_idx = (hsize_t)*idx; hid_t gid = (-1); /* Temporary group ID */ int ret_value = -1; @@ -251,7 +251,7 @@ int_f h5gn_members_c(hid_t_f *loc_id, _fcd name, int_f *namelen, int_f *nmembers) /******/ { - char * c_name = NULL; + char *c_name = NULL; H5G_info_t ginfo; int ret_value = -1; @@ -750,7 +750,7 @@ int_f h5gget_comment_c(hid_t_f *loc_id, _fcd name, int_f *namelen, size_t_f *bufsize, _fcd comment) /******/ { - char * c_name = NULL, *c_comment = NULL; + char *c_name = NULL, *c_comment = NULL; size_t c_bufsize; int ret_value = -1; @@ -954,7 +954,7 @@ h5gget_info_by_idx_c(hid_t_f *loc_id, _fcd group_name, size_t_f *group_namelen, int_f *max_corder, int_f *mounted) /******/ { - char * c_group_name = NULL; /* Buffer to hold group name C string */ + char *c_group_name = NULL; /* Buffer to hold group name C string */ int_f ret_value = 0; /* Return value */ H5G_info_t ginfo; /* @@ -1024,7 +1024,7 @@ h5gget_info_by_name_c(hid_t_f *loc_id, _fcd group_name, size_t_f *group_namelen, int_f *storage_type, int_f *nlinks, int_f *max_corder, int_f *mounted) /******/ { - char * c_group_name = NULL; /* Buffer to hold group name C string */ + char *c_group_name = NULL; /* Buffer to hold group name C string */ int_f ret_value = 0; /* Return value */ H5G_info_t ginfo; /* diff --git a/fortran/src/H5If.c b/fortran/src/H5If.c index c51f3ec..2305550 100644 --- a/fortran/src/H5If.c +++ b/fortran/src/H5If.c @@ -89,7 +89,7 @@ h5iget_name_c(hid_t_f *obj_id, _fcd buf, size_t_f *buf_size, size_t_f *name_size hid_t c_obj_id; ssize_t c_size; size_t c_buf_size; - char * c_buf = NULL; + char *c_buf = NULL; /* * Allocate buffer to hold name of an object diff --git a/fortran/src/H5Lf.c b/fortran/src/H5Lf.c index b71ab45..461e39d 100644 --- a/fortran/src/H5Lf.c +++ b/fortran/src/H5Lf.c @@ -342,7 +342,7 @@ h5ldelete_by_idx_c(hid_t_f *loc_id, _fcd group_name, size_t_f *group_namelen, in int_f *order, hsize_t_f *n, hid_t_f *lapl_id) /******/ { - char * c_group_name = NULL; /* Buffer to hold C string */ + char *c_group_name = NULL; /* Buffer to hold C string */ H5_index_t c_index_field; H5_iter_order_t c_order; int_f ret_value = 0; /* Return value */ @@ -455,7 +455,7 @@ h5lget_info_c(hid_t_f *link_loc_id, _fcd link_name, size_t_f *link_namelen, int_ int_f *corder_valid, int_f *link_type, H5O_token_t *token, size_t_f *val_size, hid_t_f *lapl_id) /******/ { - char * c_link_name = NULL; /* Buffer to hold C string */ + char *c_link_name = NULL; /* Buffer to hold C string */ int_f ret_value = 0; /* Return value */ H5L_info2_t link_buff; @@ -524,7 +524,7 @@ h5lget_info_by_idx_c(hid_t_f *loc_id, _fcd group_name, size_t_f *group_namelen, int_f *cset, H5O_token_t *token, size_t_f *val_size, hid_t_f *lapl_id) /******/ { - char * c_group_name = NULL; /* Buffer to hold C string */ + char *c_group_name = NULL; /* Buffer to hold C string */ H5_index_t c_index_field; H5_iter_order_t c_order; int_f ret_value = 0; /* Return value */ @@ -698,8 +698,8 @@ h5lget_name_by_idx_c(hid_t_f *loc_id, _fcd group_name, size_t_f *group_namelen, int_f *order, hsize_t_f *n, size_t_f *size, _fcd name, hid_t_f *lapl_id) /******/ { - char * c_group_name = NULL; /* Buffer to hold C string */ - char * c_name = NULL; /* Buffer to hold C string */ + char *c_group_name = NULL; /* Buffer to hold C string */ + char *c_name = NULL; /* Buffer to hold C string */ size_t c_size; ssize_t c_size_link; int_f ret_value = 0; /* Return value */ @@ -1039,7 +1039,7 @@ h5literate_by_name_c(hid_t_f *loc_id, _fcd name, size_t_f *namelen, int_f *index int_f ret_value = -1; /* Return value */ herr_t func_ret_value; /* H5Linterate return value */ hsize_t idx_c = 0; - char * c_name = NULL; /* Buffer to hold C string */ + char *c_name = NULL; /* Buffer to hold C string */ /* * Convert FORTRAN name to C name diff --git a/fortran/src/H5Of.c b/fortran/src/H5Of.c index 269e37e..6a3c530 100644 --- a/fortran/src/H5Of.c +++ b/fortran/src/H5Of.c @@ -308,7 +308,7 @@ h5oget_info_by_name_c(hid_t_f *loc_id, _fcd name, size_t_f *namelen, hid_t_f *la H5O_info_t_f *object_info, int_f *fields) /******/ { - char * c_name = NULL; /* Buffer to hold C string */ + char *c_name = NULL; /* Buffer to hold C string */ int_f ret_value = 0; /* Return value */ H5O_info2_t Oinfo; @@ -358,7 +358,7 @@ h5oget_info_by_idx_c(hid_t_f *loc_id, _fcd group_name, size_t_f *namelen, int_f hsize_t_f *n, hid_t_f *lapl_id, H5O_info_t_f *object_info, int_f *fields) /******/ { - char * c_group_name = NULL; /* Buffer to hold C string */ + char *c_group_name = NULL; /* Buffer to hold C string */ int_f ret_value = 0; /* Return value */ H5O_info2_t Oinfo; H5_index_t c_index_field; @@ -512,7 +512,7 @@ h5ovisit_by_name_c(hid_t_f *loc_id, _fcd object_name, size_t_f *namelen, int_f * { int_f ret_value = -1; /* Return value */ herr_t func_ret_value; /* H5Linterate return value */ - char * c_object_name = NULL; /* Buffer to hold C string */ + char *c_object_name = NULL; /* Buffer to hold C string */ /* * Convert FORTRAN name to C name @@ -758,7 +758,7 @@ h5oopen_by_idx_c(hid_t_f *loc_id, _fcd group_name, size_t_f *group_namelen, int_ hsize_t_f *n, hid_t_f *obj_id, hid_t_f *lapl_id) /******/ { - char * c_group_name = NULL; /* Buffer to hold C string */ + char *c_group_name = NULL; /* Buffer to hold C string */ int_f ret_value = 0; H5_index_t c_index_type; H5_iter_order_t c_order; @@ -807,7 +807,7 @@ int_f h5oget_comment_c(hid_t_f *object_id, _fcd comment, size_t_f *commentsize, hssize_t_f *bufsize) /******/ { - char * c_comment = NULL; /* Buffer to hold C string */ + char *c_comment = NULL; /* Buffer to hold C string */ int_f ret_value = 0; /* Return value */ size_t c_commentsize; @@ -864,8 +864,8 @@ h5oget_comment_by_name_c(hid_t_f *loc_id, _fcd name, size_t_f *name_size, _fcd c size_t_f *bufsize, hid_t_f *lapl_id) /******/ { - char * c_comment = NULL; /* Buffer to hold C string */ - char * c_name = NULL; /* Buffer to hold C string */ + char *c_comment = NULL; /* Buffer to hold C string */ + char *c_name = NULL; /* Buffer to hold C string */ int_f ret_value = 0; /* Return value */ ssize_t c_bufsize; size_t c_commentsize; diff --git a/fortran/src/H5Pf.c b/fortran/src/H5Pf.c index ab09ab9..876457f 100644 --- a/fortran/src/H5Pf.c +++ b/fortran/src/H5Pf.c @@ -1438,8 +1438,8 @@ h5pset_fapl_split_c(hid_t_f *prp_id, int_f *meta_len, _fcd meta_ext, hid_t_f *me hid_t c_meta_plist; hid_t c_raw_plist; herr_t ret = -1; - char * c_meta_ext; - char * c_raw_ext; + char *c_meta_ext; + char *c_raw_ext; c_meta_ext = (char *)HD5f2cstring(meta_ext, (size_t)*meta_len); if (c_meta_ext == NULL) @@ -1817,7 +1817,7 @@ h5pget_filter_c(hid_t_f *prp_id, int_f *filter_number, int_f *flags, size_t_f *c size_t c_cd_nelmts = 0; H5Z_filter_t c_filter; unsigned int *c_cd_values = NULL; - char * c_name = NULL; + char *c_name = NULL; unsigned i; int ret_value = -1; @@ -1885,7 +1885,7 @@ h5pset_external_c(hid_t_f *prp_id, _fcd name, int_f *namelen, off_t_f *offset, h hid_t c_prp_id; herr_t ret; hsize_t c_bytes; - char * c_name; + char *c_name; size_t c_namelen = (size_t)*namelen; off_t c_offset; c_bytes = (hsize_t)*bytes; @@ -1982,7 +1982,7 @@ h5pget_external_c(hid_t_f *prp_id, int_f *idx, size_t_f *name_size, _fcd name, o unsigned c_idx; herr_t status; size_t c_namelen; - char * c_name = NULL; + char *c_name = NULL; off_t c_offset; hsize_t size; @@ -2859,7 +2859,7 @@ h5pexist_c(hid_t_f *cls, _fcd name, int_f *name_len) { int_f ret_value = -1; hid_t c_class; - char * c_name; + char *c_name; htri_t status; c_name = (char *)HD5f2cstring(name, (size_t)*name_len); @@ -2941,7 +2941,7 @@ h5pget_size_c(hid_t_f *plist, _fcd name, int_f *name_len, size_t_f *size) { int_f ret_value = -1; hid_t c_plist; - char * c_name; + char *c_name; size_t c_size; c_name = (char *)HD5f2cstring(name, (size_t)*name_len); @@ -3537,11 +3537,11 @@ h5pset_fapl_multi_c(hid_t_f *prp_id, int_f *memb_map, hid_t_f *memb_fapl, _fcd m hid_t c_prp_id; H5FD_mem_t c_memb_map[H5FD_MEM_NTYPES]; hid_t c_memb_fapl[H5FD_MEM_NTYPES]; - char * c_memb_name[H5FD_MEM_NTYPES]; + char *c_memb_name[H5FD_MEM_NTYPES]; haddr_t c_memb_addr[H5FD_MEM_NTYPES]; hbool_t relax; herr_t status; - char * tmp, *tmp_p, *tmp_pp; + char *tmp, *tmp_p, *tmp_pp; int i; int c_lenmax; long double tmp_max_addr; @@ -3670,11 +3670,11 @@ h5pget_fapl_multi_c(hid_t_f *prp_id, int_f *memb_map, hid_t_f *memb_fapl, _fcd m hid_t c_prp_id; H5FD_mem_t c_memb_map[H5FD_MEM_NTYPES]; hid_t c_memb_fapl[H5FD_MEM_NTYPES]; - char * c_memb_name[H5FD_MEM_NTYPES]; + char *c_memb_name[H5FD_MEM_NTYPES]; haddr_t c_memb_addr[H5FD_MEM_NTYPES]; hbool_t relax; herr_t status; - char * tmp, *tmp_p; + char *tmp, *tmp_p; int i; size_t c_lenmax; size_t length = 0; @@ -3843,7 +3843,7 @@ h5pget_filter_by_id_c(hid_t_f *prp_id, int_f *filter_id, int_f *flags, size_t_f size_t c_cd_nelmts = (size_t)*cd_nelmts; size_t c_cd_nelmts_in = (size_t)*cd_nelmts; unsigned int *c_cd_values = NULL; - char * c_name = NULL; + char *c_name = NULL; unsigned i; int_f ret_value = -1; @@ -4628,7 +4628,7 @@ int_f h5pget_data_transform_c(hid_t_f *plist_id, _fcd expression, int_f *expression_len, size_t_f *size) /******/ { - char * c_expression = NULL; /* Buffer to hold C string */ + char *c_expression = NULL; /* Buffer to hold C string */ size_t c_expression_len = (size_t)*expression_len + 1; ssize_t ret; int_f ret_value = 0; @@ -5370,7 +5370,7 @@ h5pget_file_image_c(hid_t_f *fapl_id, void **buf_ptr, size_t_f *buf_len_ptr) { int ret_value = -1; size_t c_buf_len_ptr; - void * c_buf_ptr = NULL; + void *c_buf_ptr = NULL; c_buf_len_ptr = (size_t)*buf_len_ptr; diff --git a/fortran/src/H5Rf.c b/fortran/src/H5Rf.c index 88aa158..1814020 100644 --- a/fortran/src/H5Rf.c +++ b/fortran/src/H5Rf.c @@ -48,7 +48,7 @@ int_f h5rcreate_region_c(int_f *ref, hid_t_f *loc_id, _fcd name, int_f *namelen, hid_t_f *space_id) /******/ { - char * c_name = NULL; + char *c_name = NULL; hdset_reg_ref_t ref_c; int_f ret_value = 0; @@ -311,7 +311,7 @@ h5rget_name_ptr_c(hid_t_f *loc_id, int_f *ref_type, void *ref, _fcd name, size_t int_f ret_value = -1; ssize_t c_size; size_t c_bufsize; - char * c_buf = NULL; /* Buffer to hold C string */ + char *c_buf = NULL; /* Buffer to hold C string */ c_bufsize = (size_t)*name_len + 1; /* diff --git a/fortran/src/H5Sf.c b/fortran/src/H5Sf.c index ea42a31..3c6832d 100644 --- a/fortran/src/H5Sf.c +++ b/fortran/src/H5Sf.c @@ -1250,7 +1250,7 @@ h5sselect_elements_c(hid_t_f *space_id, int_f *op, size_t_f *nelements, hsize_t_ int rank; size_t i; int j; - hsize_t * c_coord; + hsize_t *c_coord; size_t c_nelements; c_op = (H5S_seloper_t)*op; diff --git a/fortran/src/H5Tf.c b/fortran/src/H5Tf.c index f3016f1..d9f75d9 100644 --- a/fortran/src/H5Tf.c +++ b/fortran/src/H5Tf.c @@ -1297,7 +1297,7 @@ h5tget_member_name_c(hid_t_f *type_id, int_f *idx, _fcd member_name, int_f *name int ret_value = -1; hid_t c_type_id; unsigned c_index; - char * c_name; + char *c_name; c_type_id = *type_id; c_index = (unsigned)*idx; @@ -1616,7 +1616,7 @@ h5tinsert_c(hid_t_f *type_id, _fcd name, int_f *namelen, size_t_f *offset, hid_t /******/ { int ret_value = -1; - char * c_name; + char *c_name; herr_t error; c_name = (char *)HD5f2cstring(name, (size_t)*namelen); @@ -1774,7 +1774,7 @@ h5tenum_insert_c(hid_t_f *type_id, _fcd name, int_f *namelen, int_f *value) /******/ { int ret_value = -1; - char * c_name; + char *c_name; herr_t error; int_f c_value; @@ -1820,7 +1820,7 @@ h5tenum_nameof_c(hid_t_f *type_id, int_f *value, _fcd name, size_t_f *namelen) { int ret_value = -1; hid_t c_type_id; - char * c_name; + char *c_name; size_t c_namelen; herr_t error; int_f c_value; @@ -1864,7 +1864,7 @@ h5tenum_valueof_c(hid_t_f *type_id, _fcd name, int_f *namelen, int_f *value) /******/ { int ret_value = -1; - char * c_name; + char *c_name; herr_t error; c_name = (char *)HD5f2cstring(name, (size_t)*namelen); if (c_name == NULL) @@ -1943,7 +1943,7 @@ h5tset_tag_c(hid_t_f *type_id, _fcd tag, int_f *namelen) { int ret_value = -1; herr_t status; - char * c_tag; + char *c_tag; c_tag = (char *)HD5f2cstring(tag, (size_t)*namelen); |