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.  */

Reply via email to