* config/alpha/alpha.c (decl_has_samegp): True for !TREE_PUBLIC.

From-SVN: r61176

* config/alpha/alpha.c (decl_has_samegp): True for !TREE_PUBLIC.
From-SVN: r61176
7f24e7c5 · Richard Henderson · Richard Henderson · 99152b95 · 7f24e7c5 · 7f24e7c5
Commit 7f24e7c5 authored Jan 10, 2003 by Richard Henderson Committed by Richard Henderson Jan 10, 2003
Show whitespace changes
Inline Side-by-side

Showing with 7 additions and 1 deletions

gcc/ChangeLog
+4 -0

gcc/config/alpha/alpha.c
+3 -1

No files found.
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
+2003-01-10  Richard Henderson  <rth@redhat.com>
+
+	* config/alpha/alpha.c (decl_has_samegp): True for !TREE_PUBLIC.
+
 2003-01-10  Geoffrey Keating  <geoffk@apple.com>

 	* ggc-page.c (ggc_collect): Avoid overflow computing

--- a/gcc/config/alpha/alpha.c
+++ b/gcc/config/alpha/alpha.c
@@ -1842,7 +1842,9 @@ decl_has_samegp (decl)
    return true;

  /* Functions that are not external are defined in this UoT.  */
-  return !DECL_EXTERNAL (decl);
+  /* ??? Irritatingly, static functions not yet emitted are still
+     marked "external".  Apply this to non-static functions only.  */
+  return !TREE_PUBLIC (decl) || !DECL_EXTERNAL (decl);
 }

 /* Return true if EXP should be placed in the small data section.  */