* expr.c (readonly_fields_p): Ignore everything except FIELD_DECLs.

From-SVN: r30306

* expr.c (readonly_fields_p): Ignore everything except FIELD_DECLs.
From-SVN: r30306
77fd6d10 · Mark Mitchell · Mark Mitchell · e26ef527 · 77fd6d10 · 77fd6d10
Commit 77fd6d10 authored Nov 01, 1999 by Mark Mitchell Committed by Mark Mitchell Nov 01, 1999
Hide whitespace changes
Inline Side-by-side

Showing with 8 additions and 3 deletions

gcc/ChangeLog
+4 -0

gcc/expr.c
+4 -3

No files found.
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
+Sun Oct 31 20:25:42 1999  Mark P. Mitchell  <mark@codesourcery.com>
+
+	* expr.c (readonly_fields_p): Ignore everything except FIELD_DECLs.
+
 Sun Oct 31 20:42:17 1999  Kaveh R. Ghazi  <ghazi@caip.rutgers.edu>

 	* hard-reg-set.h (reg_names): Constify a char*.

--- a/gcc/expr.c
+++ b/gcc/expr.c
@@ -5573,9 +5573,10 @@ readonly_fields_p (type)
  tree field;

  for (field = TYPE_FIELDS (type); field != 0; field = TREE_CHAIN (field))
-    if (TREE_READONLY (field)
-	|| (TREE_CODE (TREE_TYPE (field)) == RECORD_TYPE
-	    && readonly_fields_p (TREE_TYPE (field))))
+    if (TREE_CODE (field) == FIELD_DECL 
+	&& (TREE_READONLY (field)
+	    || (TREE_CODE (TREE_TYPE (field)) == RECORD_TYPE
+		&& readonly_fields_p (TREE_TYPE (field)))))
      return 1;

  return 0;