dump_parse_tree.c (show_components): Show ALLOCATABLE.
authorThomas Koenig <tkoenig@gcc.gnu.org>
Wed, 29 Dec 2010 21:33:03 +0000 (21:33 +0000)
committerThomas Koenig <tkoenig@gcc.gnu.org>
Wed, 29 Dec 2010 21:33:03 +0000 (21:33 +0000)
2010-12-29  Thomas Koenig  <tkoenig@gcc.gnu.org>

* dump_parse_tree.c (show_components):  Show
ALLOCATABLE.

From-SVN: r168324

gcc/fortran/ChangeLog
gcc/fortran/dump-parse-tree.c

index 759db8311bdb17046232777772bab30daababd40..e837b065c33df2630d8806a2bb489bf4bd1e5f8b 100644 (file)
@@ -1,3 +1,8 @@
+2010-12-29  Thomas Koenig  <tkoenig@gcc.gnu.org>
+
+       * dump_parse_tree.c (show_components):  Show
+       ALLOCATABLE.
+
 2010-12-29  Janus Weil  <janus@gcc.gnu.org>
 
        PR fortran/46838
index 90edc04dc1eadd7c289ce9dfc4c14697340ae82f..d4b1cb5c522fbf8b0e084a3f37ee512df6685a6c 100644 (file)
@@ -694,6 +694,8 @@ show_components (gfc_symbol *sym)
     {
       fprintf (dumpfile, "(%s ", c->name);
       show_typespec (&c->ts);
+      if (c->attr.allocatable)
+       fputs (" ALLOCATABLE", dumpfile);
       if (c->attr.pointer)
        fputs (" POINTER", dumpfile);
       if (c->attr.proc_pointer)