summaryrefslogtreecommitdiffstats
path: root/hl/fortran/src
diff options
context:
space:
mode:
authorAllen Byrne <50328838+byrnHDF@users.noreply.github.com>2022-07-28 15:05:11 (GMT)
committerGitHub <noreply@github.com>2022-07-28 15:05:11 (GMT)
commit762c111350cc31137a80e24126b00d9aacf3b2a9 (patch)
tree8d21ed8a877bc60b9c517b7505ce80e2cf8031a9 /hl/fortran/src
parentc1c4db3c4a0cbef6eceaab2f069e895936fbbe34 (diff)
downloadhdf5-762c111350cc31137a80e24126b00d9aacf3b2a9.zip
hdf5-762c111350cc31137a80e24126b00d9aacf3b2a9.tar.gz
hdf5-762c111350cc31137a80e24126b00d9aacf3b2a9.tar.bz2
clang 13 format #1933 (#1941)
Diffstat (limited to 'hl/fortran/src')
-rw-r--r--hl/fortran/src/H5DSfc.c4
-rw-r--r--hl/fortran/src/H5IMfc.c32
-rw-r--r--hl/fortran/src/H5LTfc.c62
-rw-r--r--hl/fortran/src/H5TBfc.c32
4 files changed, 65 insertions, 65 deletions
diff --git a/hl/fortran/src/H5DSfc.c b/hl/fortran/src/H5DSfc.c
index fa94511..36736aa 100644
--- a/hl/fortran/src/H5DSfc.c
+++ b/hl/fortran/src/H5DSfc.c
@@ -256,7 +256,7 @@ done:
int_f
nh5dsget_label_c(hid_t_f *did, int_f *idx, _fcd label, size_t_f *size)
{
- char * c_label = NULL;
+ char *c_label = NULL;
ssize_t size_c = -1;
int_f ret_value = 0;
@@ -306,7 +306,7 @@ done:
int_f
nh5dsget_scale_name_c(hid_t_f *did, _fcd name, size_t_f *size)
{
- char * c_scale_name = NULL;
+ char *c_scale_name = NULL;
ssize_t size_c = -1;
int_f ret_value = 0;
diff --git a/hl/fortran/src/H5IMfc.c b/hl/fortran/src/H5IMfc.c
index 931fa64..a203fd4 100644
--- a/hl/fortran/src/H5IMfc.c
+++ b/hl/fortran/src/H5IMfc.c
@@ -43,7 +43,7 @@ nh5immake_image_8bit_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, hsize_t_f
int ret_value = -1;
herr_t ret;
hid_t c_loc_id;
- char * c_name = NULL;
+ char *c_name = NULL;
hsize_t w = (hsize_t)*width;
hsize_t h = (hsize_t)*height;
@@ -96,7 +96,7 @@ nh5imread_image_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, int_f *buf)
{
int ret_value = -1;
herr_t ret;
- char * c_name = NULL;
+ char *c_name = NULL;
/*
* convert FORTRAN name to C name
@@ -148,8 +148,8 @@ nh5immake_image_24bit_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, size_t_f
int ret_value = -1;
herr_t ret;
hid_t c_loc_id;
- char * c_name = NULL;
- char * c_il = NULL;
+ char *c_name = NULL;
+ char *c_il = NULL;
hsize_t w = (hsize_t)*width;
hsize_t h = (hsize_t)*height;
@@ -211,12 +211,12 @@ nh5imget_image_info_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, hsize_t_f *
int ret_value = -1;
herr_t ret;
hid_t c_loc_id;
- char * c_name = NULL;
+ char *c_name = NULL;
hsize_t c_width;
hsize_t c_height;
hsize_t c_planes;
hssize_t c_npals;
- char * c_buf = NULL; /* buffer to hold C string */
+ char *c_buf = NULL; /* buffer to hold C string */
/*
* convert FORTRAN name to C name
@@ -285,7 +285,7 @@ int_f
nh5imis_image_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name)
{
hid_t c_loc_id;
- char * c_name = NULL;
+ char *c_name = NULL;
herr_t ret;
/*
@@ -330,7 +330,7 @@ nh5imis_image_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name)
int_f
nh5immake_palette_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, hsize_t_f *dims, void *buf)
{
- char * c_name = NULL;
+ char *c_name = NULL;
hsize_t c_dims[H5S_MAX_RANK];
int i;
int rank = 2;
@@ -383,8 +383,8 @@ nh5imlink_palette_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, size_t_f *ile
int ret_value = -1;
herr_t ret;
hid_t c_loc_id;
- char * c_name = NULL;
- char * c_namepal = NULL;
+ char *c_name = NULL;
+ char *c_namepal = NULL;
/*
* convert FORTRAN name to C name
@@ -443,8 +443,8 @@ nh5imunlink_palette_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, size_t_f *i
int ret_value = -1;
herr_t ret;
hid_t c_loc_id;
- char * c_name = NULL;
- char * c_namepal = NULL;
+ char *c_name = NULL;
+ char *c_namepal = NULL;
/*
* convert FORTRAN name to C name
@@ -503,7 +503,7 @@ nh5imget_npalettes_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, hsize_t_f *n
int ret_value = -1;
herr_t ret;
hid_t c_loc_id;
- char * c_name = NULL;
+ char *c_name = NULL;
hssize_t c_npals;
/*
@@ -559,7 +559,7 @@ nh5imget_palette_info_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, int_f *pa
int ret_value = -1;
herr_t ret;
hid_t c_loc_id;
- char * c_name = NULL;
+ char *c_name = NULL;
hsize_t c_dims[2];
int i;
@@ -618,7 +618,7 @@ nh5imget_palette_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, int_f *pal_num
int ret_value = -1;
herr_t ret;
hid_t c_loc_id;
- char * c_name = NULL;
+ char *c_name = NULL;
/*
* convert FORTRAN name to C name
@@ -669,7 +669,7 @@ int_f
nh5imis_palette_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name)
{
hid_t c_loc_id;
- char * c_name;
+ char *c_name;
herr_t ret;
/*
diff --git a/hl/fortran/src/H5LTfc.c b/hl/fortran/src/H5LTfc.c
index 82686c1..755dbeb 100644
--- a/hl/fortran/src/H5LTfc.c
+++ b/hl/fortran/src/H5LTfc.c
@@ -42,7 +42,7 @@ nh5ltmake_dataset_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, int_f *rank,
{
int ret_value = -1;
herr_t ret;
- char * c_name = NULL;
+ char *c_name = NULL;
hsize_t *c_dims = NULL;
int i;
@@ -360,7 +360,7 @@ nh5ltread_dataset_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, hid_t_f *type
herr_t ret;
hid_t c_loc_id;
hid_t c_type_id;
- char * c_name = NULL;
+ char *c_name = NULL;
/*
* convert FORTRAN name to C name
@@ -666,8 +666,8 @@ nh5ltmake_dataset_string_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, size_t
int ret_value = -1;
herr_t ret;
hid_t c_loc_id;
- char * c_name = NULL;
- char * c_buf = NULL;
+ char *c_name = NULL;
+ char *c_buf = NULL;
/*
* convert FORTRAN name to C name
@@ -726,7 +726,7 @@ nh5ltread_dataset_string_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, char *
int ret_value = -1;
herr_t ret;
hid_t c_loc_id;
- char * c_name = NULL;
+ char *c_name = NULL;
/*
* convert FORTRAN name to C name
@@ -780,8 +780,8 @@ nh5ltset_attribute_int_c(hid_t_f *loc_id, size_t_f *namelen, _fcd dsetname, size
int ret_value = -1;
herr_t ret;
hid_t c_loc_id;
- char * c_name = NULL;
- char * c_attrname = NULL;
+ char *c_name = NULL;
+ char *c_attrname = NULL;
size_t c_size;
/*
@@ -850,8 +850,8 @@ nh5ltset_attribute_float_c(hid_t_f *loc_id, size_t_f *namelen, _fcd dsetname, si
int ret_value = -1;
herr_t ret;
hid_t c_loc_id;
- char * c_name = NULL;
- char * c_attrname = NULL;
+ char *c_name = NULL;
+ char *c_attrname = NULL;
size_t c_size;
/*
@@ -913,8 +913,8 @@ nh5ltset_attribute_double_c(hid_t_f *loc_id, size_t_f *namelen, _fcd dsetname, s
int ret_value = -1;
herr_t ret;
hid_t c_loc_id;
- char * c_name = NULL;
- char * c_attrname = NULL;
+ char *c_name = NULL;
+ char *c_attrname = NULL;
size_t c_size;
/*
@@ -976,9 +976,9 @@ nh5ltset_attribute_string_c(hid_t_f *loc_id, size_t_f *namelen, _fcd dsetname, s
int ret_value = -1;
herr_t ret;
hid_t c_loc_id;
- char * c_name = NULL;
- char * c_attrname = NULL;
- char * c_buf = NULL;
+ char *c_name = NULL;
+ char *c_attrname = NULL;
+ char *c_buf = NULL;
/*
* convert FORTRAN name to C name
@@ -1044,8 +1044,8 @@ nh5ltget_attribute_int_c(hid_t_f *loc_id, size_t_f *namelen, _fcd dsetname, size
int ret_value = -1;
herr_t ret;
hid_t c_loc_id;
- char * c_name = NULL;
- char * c_attrname = NULL;
+ char *c_name = NULL;
+ char *c_attrname = NULL;
/*
* convert FORTRAN name to C name
@@ -1112,8 +1112,8 @@ nh5ltget_attribute_float_c(hid_t_f *loc_id, size_t_f *namelen, _fcd dsetname, si
int ret_value = -1;
herr_t ret;
hid_t c_loc_id;
- char * c_name = NULL;
- char * c_attrname = NULL;
+ char *c_name = NULL;
+ char *c_attrname = NULL;
/*
* convert FORTRAN name to C name
@@ -1173,8 +1173,8 @@ nh5ltget_attribute_double_c(hid_t_f *loc_id, size_t_f *namelen, _fcd dsetname, s
int ret_value = -1;
herr_t ret;
hid_t c_loc_id;
- char * c_name = NULL;
- char * c_attrname = NULL;
+ char *c_name = NULL;
+ char *c_attrname = NULL;
/*
* convert FORTRAN name to C name
@@ -1233,9 +1233,9 @@ nh5ltget_attribute_string_c(hid_t_f *loc_id, size_t_f *namelen, _fcd dsetname, s
{
int ret_value = -1;
herr_t ret;
- char * c_name = NULL;
- char * c_attrname = NULL;
- char * c_buf = NULL;
+ char *c_name = NULL;
+ char *c_attrname = NULL;
+ char *c_buf = NULL;
/*
* Convert FORTRAN name to C name
@@ -1303,7 +1303,7 @@ nh5ltget_dataset_ndims_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, int_f *r
int ret_value = -1;
herr_t ret;
hid_t c_loc_id;
- char * c_name = NULL;
+ char *c_name = NULL;
int c_rank;
/*
@@ -1356,7 +1356,7 @@ int_f
nh5ltfind_dataset_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name)
{
hid_t c_loc_id;
- char * c_name = NULL;
+ char *c_name = NULL;
herr_t ret;
/*
@@ -1405,7 +1405,7 @@ nh5ltget_dataset_info_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, hsize_t_f
int ret_value = -1;
herr_t ret;
hid_t c_loc_id;
- char * c_name = NULL;
+ char *c_name = NULL;
H5T_class_t c_classtype;
size_t c_type_size;
hsize_t c_dims[32];
@@ -1478,8 +1478,8 @@ nh5ltget_attribute_ndims_c(hid_t_f *loc_id, size_t_f *namelen, _fcd dsetname, si
int ret_value = -1;
herr_t ret;
hid_t c_loc_id;
- char * c_name = NULL;
- char * c_attrname = NULL;
+ char *c_name = NULL;
+ char *c_attrname = NULL;
int c_rank;
/*
@@ -1541,8 +1541,8 @@ nh5ltget_attribute_info_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, size_t_
int ret_value = -1;
herr_t ret;
hid_t c_loc_id;
- char * c_name = NULL;
- char * c_attrname = NULL;
+ char *c_name = NULL;
+ char *c_attrname = NULL;
H5T_class_t c_classtype;
size_t c_type_size;
hsize_t c_dims[32];
@@ -1618,7 +1618,7 @@ int_f
nh5ltpath_valid_c(hid_t_f *loc_id, _fcd path, size_t_f *pathlen, int_f *check_object_valid_c)
{
htri_t ret = -1;
- char * c_path = NULL;
+ char *c_path = NULL;
hbool_t check_object_valid;
/*
diff --git a/hl/fortran/src/H5TBfc.c b/hl/fortran/src/H5TBfc.c
index 9fc36ba..c06b2f3 100644
--- a/hl/fortran/src/H5TBfc.c
+++ b/hl/fortran/src/H5TBfc.c
@@ -40,17 +40,17 @@ nh5tbmake_table_c(size_t_f *namelen1, _fcd name1, hid_t_f *loc_id, size_t_f *nam
hid_t_f *field_types, hsize_t_f *chunk_size, int_f *compress,
size_t_f *char_len_field_names, /* field_names lenghts */
size_t_f *max_char_size_field_names, /* char len of fields */
- char * field_names) /* field_names */
+ char *field_names) /* field_names */
{
- char * c_name = NULL;
- char * c_name1 = NULL;
+ char *c_name = NULL;
+ char *c_name1 = NULL;
hsize_t num_elem;
hsize_t i;
hsize_t c_nfields = (hsize_t)*nfields;
size_t *c_field_offset = NULL;
- hid_t * c_field_types = NULL;
- char ** c_field_names = NULL;
- char * tmp = NULL, *tmp_p;
+ hid_t *c_field_types = NULL;
+ char **c_field_names = NULL;
+ char *tmp = NULL, *tmp_p;
int_f ret_value = 0;
num_elem = (hsize_t)*nfields;
@@ -144,8 +144,8 @@ int_f
nh5tbwrite_field_name_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, size_t_f *namelen1, _fcd field_name,
hsize_t_f *start, hsize_t_f *nrecords, size_t_f *type_size, void *buf)
{
- char * c_name = NULL;
- char * c_name1 = NULL;
+ char *c_name = NULL;
+ char *c_name1 = NULL;
size_t c_type_size[1] = {(size_t)*type_size};
int_f ret_value = 0;
@@ -225,8 +225,8 @@ int_f
nh5tbread_field_name_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, size_t_f *namelen1, _fcd field_name,
hsize_t_f *start, hsize_t_f *nrecords, size_t_f *type_size, void *buf)
{
- char * c_name = NULL;
- char * c_name1 = NULL;
+ char *c_name = NULL;
+ char *c_name1 = NULL;
size_t c_type_size[1] = {(size_t)*type_size};
int_f ret_value = 0;
@@ -305,7 +305,7 @@ int_f
nh5tbwrite_field_index_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, int_f *field_index, hsize_t_f *start,
hsize_t_f *nrecords, size_t_f *type_size, void *buf)
{
- char * c_name = NULL;
+ char *c_name = NULL;
size_t c_type_size = *type_size;
int c_field_index = *field_index - 1; /* C zero based index */
int_f ret_value = 0;
@@ -377,7 +377,7 @@ int_f
nh5tbread_field_index_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, int_f *field_index, hsize_t_f *start,
hsize_t_f *nrecords, size_t_f *type_size, void *buf)
{
- char * c_name = NULL;
+ char *c_name = NULL;
size_t c_type_size = *type_size;
int c_field_index = *field_index - 1; /* C zero based index */
int_f ret_value = 0;
@@ -568,7 +568,7 @@ done:
int_f
nh5tbget_table_info_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, hsize_t_f *nfields, hsize_t_f *nrecords)
{
- char * c_name = NULL;
+ char *c_name = NULL;
hsize_t c_nfields;
hsize_t c_nrecords;
int_f ret_value = 0;
@@ -619,14 +619,14 @@ nh5tbget_field_info_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, hsize_t_f *
size_t_f *maxlen_out)
{
- char * c_name = NULL;
+ char *c_name = NULL;
hsize_t num_elem;
hsize_t c_nfields = *nfields;
size_t *c_field_sizes = NULL;
size_t *c_field_offsets = NULL;
size_t c_type_size;
- char ** c_field_names = NULL;
- char * tmp = NULL, *tmp_p;
+ char **c_field_names = NULL;
+ char *tmp = NULL, *tmp_p;
hsize_t i;
int_f ret_value = 0;
size_t c_lenmax;