https://gcc.gnu.org/g:8410cda2b70228d358313cbacc0fe404c91b3ad2
commit 8410cda2b70228d358313cbacc0fe404c91b3ad2 Author: Mikael Morin <mik...@gcc.gnu.org> Date: Sat Mar 29 11:41:45 2025 +0100 Suppression export gfc_conv_descriptor_span_set Diff: --- gcc/fortran/trans-descriptor.cc | 2 +- gcc/fortran/trans-descriptor.h | 1 - 2 files changed, 1 insertion(+), 2 deletions(-) diff --git a/gcc/fortran/trans-descriptor.cc b/gcc/fortran/trans-descriptor.cc index bc2055bf3b56..7e709609435c 100644 --- a/gcc/fortran/trans-descriptor.cc +++ b/gcc/fortran/trans-descriptor.cc @@ -721,7 +721,7 @@ gfc_conv_descriptor_span_get (tree desc) return gfc_descriptor::conv_span_get (desc); } -void +static void gfc_conv_descriptor_span_set (stmtblock_t *block, tree desc, tree value) { return gfc_descriptor::conv_span_set (block, desc, value); diff --git a/gcc/fortran/trans-descriptor.h b/gcc/fortran/trans-descriptor.h index 5e8af26d1d8e..b991d2a41895 100644 --- a/gcc/fortran/trans-descriptor.h +++ b/gcc/fortran/trans-descriptor.h @@ -64,7 +64,6 @@ void gfc_conv_descriptor_dtype_set (stmtblock_t *, tree, tree); void gfc_conv_descriptor_version_set (stmtblock_t *, tree, tree); void gfc_conv_descriptor_rank_set (stmtblock_t *, tree, tree); void gfc_conv_descriptor_rank_set (stmtblock_t *, tree, int); -void gfc_conv_descriptor_span_set (stmtblock_t *, tree, tree); void gfc_conv_descriptor_ubound_set (stmtblock_t *, tree, tree, tree); /* CFI descriptor. */