diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 759db8311bd..e837b065c33 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,8 @@ +2010-12-29 Thomas Koenig + + * dump_parse_tree.c (show_components): Show + ALLOCATABLE. + 2010-12-29 Janus Weil PR fortran/46838 diff --git a/gcc/fortran/dump-parse-tree.c b/gcc/fortran/dump-parse-tree.c index 90edc04dc1e..d4b1cb5c522 100644 --- a/gcc/fortran/dump-parse-tree.c +++ b/gcc/fortran/dump-parse-tree.c @@ -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)