From: Richard Stallman <rms@gnu.org>
Date: Fri, 6 Aug 1993 01:08:12 +0000 (+0000)
Subject: (decl_attributes): Support attributes `volatile'
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=3550617cd5c53d0a2a7207295df8ae26e20769ad;p=gcc.git

(decl_attributes): Support attributes `volatile'
with alias `noreturn', and `const'.

From-SVN: r5082
---

diff --git a/gcc/c-common.c b/gcc/c-common.c
index fae1e44550b..b5a1cdd27b5 100644
--- a/gcc/c-common.c
+++ b/gcc/c-common.c
@@ -222,6 +222,17 @@ decl_attributes (decl, attributes)
 	/* We can't set DECL_PACKED for a VAR_DECL, because the bit is
 	   used for DECL_REGISTER.  It wouldn't mean anything anyway.  */
       }
+    else if (TREE_VALUE (a) == get_identifier ("noreturn")
+	     || TREE_VALUE (a) == get_identifier ("volatile"))
+      {
+	if (TREE_CODE (decl) == FUNCTION_DECL)
+	  TREE_THIS_VOLATILE (decl) = 1;
+      }
+    else if (TREE_VALUE (a) == get_identifier ("const"))
+      {
+	if (TREE_CODE (decl) == FUNCTION_DECL)
+	  TREE_READONLY (decl) = 1;
+      }
     else if (TREE_VALUE (a) != 0
 	     && TREE_CODE (TREE_VALUE (a)) == TREE_LIST
 	     && TREE_PURPOSE (TREE_VALUE (a)) == get_identifier ("mode"))