c-commom.c (c_apply_type_quals_to_decl): REFERENCE_TYPES are always TREE_READONLY.

* c-commom.c (c_apply_type_quals_to_decl): REFERENCE_TYPES are always TREE_READONLY. From-SVN: r33500

c-commom.c (c_apply_type_quals_to_decl): REFERENCE_TYPES are always TREE_READONLY.
* c-commom.c (c_apply_type_quals_to_decl): REFERENCE_TYPES are always TREE_READONLY. From-SVN: r33500
a6496605 · Mark Mitchell · Mark Mitchell · d8b2fb52 · a6496605 · a6496605
Commit a6496605 authored Apr 28, 2000 by Mark Mitchell Committed by Mark Mitchell Apr 28, 2000
Hide whitespace changes
Inline Side-by-side

Showing with 8 additions and 1 deletions

gcc/ChangeLog
+5 -0

gcc/c-common.c
+3 -1

No files found.
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
+2000-04-27  Mark Mitchell  <mark@codesourcery.com>
+
+	* c-commom.c (c_apply_type_quals_to_decl): REFERENCE_TYPES are
+	always TREE_READONLY.
+
 2000-04-27  Ulrich Drepper  <drepper@cygnus.com>

 	* i386.h (FUNCTION_BLOCK_PROFILER_EXIT): Generate mem reference

--- a/gcc/c-common.c
+++ b/gcc/c-common.c
@@ -3217,7 +3217,9 @@ c_apply_type_quals_to_decl (type_quals, decl)
     int type_quals;
     tree decl;
 {
-  if (type_quals & TYPE_QUAL_CONST)
+  if ((type_quals & TYPE_QUAL_CONST)
+      || (TREE_TYPE (decl) 
+	  && TREE_CODE (TREE_TYPE (decl)) == REFERENCE_TYPE))
    TREE_READONLY (decl) = 1;
  if (type_quals & TYPE_QUAL_VOLATILE)
    {