From: Richard Stallman <rms@gnu.org>
Date: Mon, 20 Jul 1992 01:53:57 +0000 (+0000)
Subject: (gen_type): For array type, state the size.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=7e53036d32da0c9669e2465aefa842bf772bc477;p=gcc.git

(gen_type): For array type, state the size.

From-SVN: r1634
---

diff --git a/gcc/c-aux-info.c b/gcc/c-aux-info.c
index 27dad2aba84..2e1506447e3 100644
--- a/gcc/c-aux-info.c
+++ b/gcc/c-aux-info.c
@@ -384,7 +384,18 @@ gen_type (ret_val, t, style)
           return ret_val;
 
         case ARRAY_TYPE:
-          ret_val = gen_type (concat (ret_val, "[]"), TREE_TYPE (t), style);
+	  if (TYPE_SIZE (t) == 0 || TREE_CODE (TYPE_SIZE (t)) != INTEGER_CST)
+	    ret_val = gen_type (concat (ret_val, "[]"), TREE_TYPE (t), style);
+	  else if (int_size_in_bytes (t) == 0)
+	    ret_val = gen_type (concat (ret_val, "[0]"), TREE_TYPE (t), style);
+	  else
+	    {
+	      int size = (int_size_in_bytes (t) / int_size_in_bytes (TREE_TYPE (t)));
+	      char buff[10];
+	      sprintf (buff, "[%d]", size);
+	      ret_val = gen_type (concat (ret_val, buff),
+				  TREE_TYPE (t), style);
+	    }
           break;
 
         case FUNCTION_TYPE: