summaryrefslogtreecommitdiffstats
path: root/hl/fortran/src/H5TBfc.c
diff options
context:
space:
mode:
Diffstat (limited to 'hl/fortran/src/H5TBfc.c')
-rw-r--r--hl/fortran/src/H5TBfc.c307
1 files changed, 297 insertions, 10 deletions
diff --git a/hl/fortran/src/H5TBfc.c b/hl/fortran/src/H5TBfc.c
index 99a7800..bf058fd 100644
--- a/hl/fortran/src/H5TBfc.c
+++ b/hl/fortran/src/H5TBfc.c
@@ -37,7 +37,7 @@
*-------------------------------------------------------------------------
*/
int_f
-h5tbmake_table_c(size_t_f *namelen1,
+nh5tbmake_table_c(size_t_f *namelen1,
_fcd name1,
hid_t_f *loc_id,
size_t_f *namelen,
@@ -133,7 +133,7 @@ done:
HDfree(c_field_types);
return ret_value;
-} /* end h5tbmake_table_c() */
+} /* end nh5tbmake_table_c() */
/*-------------------------------------------------------------------------
* Function: h5tbwrite_field_name_c
@@ -151,7 +151,7 @@ done:
*-------------------------------------------------------------------------
*/
int_f
-h5tbwrite_field_name_c(hid_t_f *loc_id,
+nh5tbwrite_field_name_c(hid_t_f *loc_id,
size_t_f *namelen,
_fcd name,
size_t_f *namelen1,
@@ -190,6 +190,65 @@ done:
return ret_value;
}
+int_f
+nh5tbwrite_field_name_int_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)
+{
+ return nh5tbwrite_field_name_c(loc_id, namelen, name, namelen1, field_name,
+ start, nrecords, type_size, buf);
+}
+
+int_f
+nh5tbwrite_field_name_fl_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)
+{
+ return nh5tbwrite_field_name_c(loc_id, namelen, name, namelen1, field_name,
+ start, nrecords, type_size, buf);
+}
+
+int_f
+nh5tbwrite_field_name_dl_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)
+{
+ return nh5tbwrite_field_name_c(loc_id, namelen, name, namelen1, field_name,
+ start, nrecords, type_size, buf);
+}
+
+int_f
+nh5tbwrite_field_name_st_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)
+{
+ return nh5tbwrite_field_name_c(loc_id, namelen, name, namelen1, field_name,
+ start, nrecords, type_size, buf);
+}
/*-------------------------------------------------------------------------
* Function: h5tbread_field_name_c
@@ -207,7 +266,7 @@ done:
*-------------------------------------------------------------------------
*/
int_f
-h5tbread_field_name_c(hid_t_f *loc_id,
+nh5tbread_field_name_c(hid_t_f *loc_id,
size_t_f *namelen,
_fcd name,
size_t_f *namelen1,
@@ -246,6 +305,66 @@ done:
return ret_value;
}
+int_f
+nh5tbread_field_name_int_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)
+{
+ return nh5tbread_field_name_c(loc_id, namelen, name, namelen1, field_name,
+ start, nrecords, type_size, buf);
+}
+
+int_f
+nh5tbread_field_name_fl_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)
+{
+ return nh5tbread_field_name_c(loc_id, namelen, name, namelen1, field_name,
+ start, nrecords, type_size, buf);
+}
+
+int_f
+nh5tbread_field_name_dl_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)
+{
+ return nh5tbread_field_name_c(loc_id, namelen, name, namelen1, field_name,
+ start, nrecords, type_size, buf);
+}
+
+int_f
+nh5tbread_field_name_st_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)
+{
+ return nh5tbread_field_name_c(loc_id, namelen, name, namelen1, field_name,
+ start, nrecords, type_size, buf);
+}
+
/*-------------------------------------------------------------------------
* Function: h5tbwrite_field_index_c
*
@@ -262,7 +381,7 @@ done:
*-------------------------------------------------------------------------
*/
int_f
-h5tbwrite_field_index_c(hid_t_f *loc_id,
+nh5tbwrite_field_index_c(hid_t_f *loc_id,
size_t_f *namelen,
_fcd name,
int_f *field_index,
@@ -297,6 +416,62 @@ done:
return ret_value;
}
+int_f
+nh5tbwrite_field_index_int_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)
+{
+ return nh5tbwrite_field_index_c(loc_id, namelen, name, field_index, start,
+ nrecords, type_size, buf);
+}
+
+int_f
+nh5tbwrite_field_index_fl_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)
+{
+ return nh5tbwrite_field_index_c(loc_id, namelen, name, field_index, start,
+ nrecords, type_size, buf);
+}
+
+int_f
+nh5tbwrite_field_index_dl_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)
+{
+ return nh5tbwrite_field_index_c(loc_id, namelen, name, field_index, start,
+ nrecords, type_size, buf);
+}
+
+int_f
+nh5tbwrite_field_index_st_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)
+{
+ return nh5tbwrite_field_index_c(loc_id, namelen, name, field_index, start,
+ nrecords, type_size, buf);
+}
+
/*-------------------------------------------------------------------------
* Function: h5tbread_field_index_c
*
@@ -313,7 +488,7 @@ done:
*-------------------------------------------------------------------------
*/
int_f
-h5tbread_field_index_c(hid_t_f *loc_id,
+nh5tbread_field_index_c(hid_t_f *loc_id,
size_t_f *namelen,
_fcd name,
int_f *field_index,
@@ -347,6 +522,62 @@ done:
return ret_value;
}
+int_f
+nh5tbread_field_index_int_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)
+{
+ return nh5tbread_field_index_c(loc_id, namelen, name, field_index, start,
+ nrecords, type_size, buf);
+}
+
+int_f
+nh5tbread_field_index_fl_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)
+{
+ return nh5tbread_field_index_c(loc_id, namelen, name, field_index, start,
+ nrecords, type_size, buf);
+}
+
+int_f
+nh5tbread_field_index_dl_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)
+{
+ return nh5tbread_field_index_c(loc_id, namelen, name, field_index, start,
+ nrecords, type_size, buf);
+}
+
+int_f
+nh5tbread_field_index_st_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)
+{
+ return nh5tbread_field_index_c(loc_id, namelen, name, field_index, start,
+ nrecords, type_size, buf);
+}
+
/*-------------------------------------------------------------------------
* Function: h5tbinsert_field_c
*
@@ -363,7 +594,7 @@ done:
*-------------------------------------------------------------------------
*/
int_f
-h5tbinsert_field_c(hid_t_f *loc_id,
+nh5tbinsert_field_c(hid_t_f *loc_id,
size_t_f *namelen,
_fcd name,
size_t_f *namelen1,
@@ -400,6 +631,62 @@ done:
return ret_value;
}
+int_f
+nh5tbinsert_field_int_c(hid_t_f *loc_id,
+ size_t_f *namelen,
+ _fcd name,
+ size_t_f *namelen1,
+ _fcd field_name,
+ hid_t_f *field_type,
+ int_f *position,
+ void *buf)
+{
+ return nh5tbinsert_field_c(loc_id, namelen, name, namelen1, field_name,
+ field_type, position, buf);
+}
+
+int_f
+nh5tbinsert_field_fl_c(hid_t_f *loc_id,
+ size_t_f *namelen,
+ _fcd name,
+ size_t_f *namelen1,
+ _fcd field_name,
+ hid_t_f *field_type,
+ int_f *position,
+ void *buf)
+{
+ return nh5tbinsert_field_c(loc_id, namelen, name, namelen1, field_name,
+ field_type, position, buf);
+}
+
+int_f
+nh5tbinsert_field_dl_c(hid_t_f *loc_id,
+ size_t_f *namelen,
+ _fcd name,
+ size_t_f *namelen1,
+ _fcd field_name,
+ hid_t_f *field_type,
+ int_f *position,
+ void *buf)
+{
+ return nh5tbinsert_field_c(loc_id, namelen, name, namelen1, field_name,
+ field_type, position, buf);
+}
+
+int_f
+nh5tbinsert_field_st_c(hid_t_f *loc_id,
+ size_t_f *namelen,
+ _fcd name,
+ size_t_f *namelen1,
+ _fcd field_name,
+ hid_t_f *field_type,
+ int_f *position,
+ void *buf)
+{
+ return nh5tbinsert_field_c(loc_id, namelen, name, namelen1, field_name,
+ field_type, position, buf);
+}
+
/*-------------------------------------------------------------------------
* Function: h5tbdelete_field_c
*
@@ -416,7 +703,7 @@ done:
*-------------------------------------------------------------------------
*/
int_f
-h5tbdelete_field_c(hid_t_f *loc_id,
+nh5tbdelete_field_c(hid_t_f *loc_id,
size_t_f *namelen,
_fcd name,
size_t_f *namelen1,
@@ -465,7 +752,7 @@ done:
*-------------------------------------------------------------------------
*/
int_f
-h5tbget_table_info_c(hid_t_f *loc_id,
+nh5tbget_table_info_c(hid_t_f *loc_id,
size_t_f *namelen,
_fcd name,
hsize_t_f *nfields,
@@ -515,7 +802,7 @@ done:
*-------------------------------------------------------------------------
*/
int_f
-h5tbget_field_info_c(hid_t_f *loc_id,
+nh5tbget_field_info_c(hid_t_f *loc_id,
size_t_f *namelen,
_fcd name,
hsize_t_f *nfields,