diff options
author | Dana Robinson <43805+derobins@users.noreply.github.com> | 2023-10-20 04:19:52 (GMT) |
---|---|---|
committer | GitHub <noreply@github.com> | 2023-10-20 04:19:52 (GMT) |
commit | b916ce2419da45f7a51503e3bf2774e71f7db815 (patch) | |
tree | 585ec11fd009f0c42a58e88e65cb0c9a64655f9c /hl/fortran | |
parent | 97a6efbf8a648840c2acce4a7ad3e09bac47ecd0 (diff) | |
download | hdf5-b916ce2419da45f7a51503e3bf2774e71f7db815.zip hdf5-b916ce2419da45f7a51503e3bf2774e71f7db815.tar.gz hdf5-b916ce2419da45f7a51503e3bf2774e71f7db815.tar.bz2 |
Suppress cast-qual warning in H5TB Fortran wrapper (#3728)
This interface is fundamentally broken, const-wise.
Diffstat (limited to 'hl/fortran')
-rw-r--r-- | hl/fortran/src/H5TBfc.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/hl/fortran/src/H5TBfc.c b/hl/fortran/src/H5TBfc.c index 9c25777..d339def 100644 --- a/hl/fortran/src/H5TBfc.c +++ b/hl/fortran/src/H5TBfc.c @@ -92,10 +92,12 @@ h5tbmake_table_c(size_t_f *namelen1, _fcd name1, hid_t_f *loc_id, size_t_f *name /* * call H5TBmake_table function. */ + H5_GCC_CLANG_DIAG_OFF("cast-qual") if (H5TBmake_table(c_name1, (hid_t)*loc_id, c_name, c_nfields, (hsize_t)*nrecords, (size_t)*type_size, (const char **)c_field_names, c_field_offset, c_field_types, (hsize_t)*chunk_size, NULL, *compress, NULL) < 0) HGOTO_DONE(FAIL); + H5_GCC_CLANG_DIAG_ON("cast-qual") done: if (c_name) @@ -193,10 +195,12 @@ h5tbmake_table_ptr_c(size_t_f *namelen1, _fcd name1, hid_t_f *loc_id, size_t_f * /* * call H5TBmake_table function. */ + H5_GCC_CLANG_DIAG_OFF("cast-qual") if (H5TBmake_table(c_name1, (hid_t)*loc_id, c_name, c_nfields, (hsize_t)*nrecords, (size_t)*type_size, (const char **)c_field_names, c_field_offset, c_field_types, (hsize_t)*chunk_size, fill_data, *compress, data) < 0) HGOTO_DONE(FAIL); + H5_GCC_CLANG_DIAG_ON("cast-qual") done: if (c_name) |