From: Richard Henderson <rth@redhat.com>
Date: Fri, 21 Sep 2001 20:42:14 +0000 (-0700)
Subject: optabs.c (init_one_libfunc): Gen a FUNCTION_DECL for use by ENCODE_SECTION_INFO...
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=ee1315aa922e5c7baef0b2d288be0ead90f547e7;p=gcc.git

optabs.c (init_one_libfunc): Gen a FUNCTION_DECL for use by ENCODE_SECTION_INFO...

        * optabs.c (init_one_libfunc): Gen a FUNCTION_DECL for use by
        ENCODE_SECTION_INFO; get SYMBOL_REF from make_decl_rtl.

From-SVN: r45737
---

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 414effb1ef6..69bc75f007f 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2001-09-21  Richard Henderson  <rth@redhat.com>
+
+	* optabs.c (init_one_libfunc): Gen a FUNCTION_DECL for use by
+	ENCODE_SECTION_INFO; get SYMBOL_REF from make_decl_rtl.
+
 2001-09-21  Richard Henderson  <rth@redhat.com>
 
 	* rtl.h (LCT_RETURNS_TWICE): New.
diff --git a/gcc/optabs.c b/gcc/optabs.c
index 7957719b4f9..6421adf6ef3 100644
--- a/gcc/optabs.c
+++ b/gcc/optabs.c
@@ -4687,9 +4687,17 @@ rtx
 init_one_libfunc (name)
      register const char *name;
 {
-  name = ggc_strdup (name);
-
-  return gen_rtx_SYMBOL_REF (Pmode, name);
+  /* Create a FUNCTION_DECL that can be passed to ENCODE_SECTION_INFO.  */
+  /* ??? We don't have any type information except for this is
+     a function.  See if error_mark_node is good enough.  */
+  tree decl = build_decl (FUNCTION_DECL, get_identifier (name),
+			  error_mark_node);
+  DECL_ARTIFICIAL (decl) = 1;
+  DECL_EXTERNAL (decl) = 1;
+  TREE_PUBLIC (decl) = 1;
+
+  /* Return the symbol_ref from the mem rtx.  */
+  return XEXP (DECL_RTL (decl), 0);
 }
 
 /* Mark ARG (which is really an OPTAB *) for GC.  */