* c-ada-spec.c (dump_generic_ada_node): Avoid dereferencing null type.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@169278 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/c-family/ChangeLog b/gcc/c-family/ChangeLog
index 9f88e97..ebcb5c2 100644 (file)
--- a/gcc/c-family/ChangeLog
+++ b/gcc/c-family/ChangeLog
@@ -1,3 +1,7 @@
+2011-01-26  Arnaud Charlet  <charlet@adacore.com>
+
+       * c-ada-spec.c (dump_generic_ada_node): Avoid dereferencing null type.
+
 2011-01-26  Jakub Jelinek  <jakub@redhat.com>
 
        PR pch/47430

diff --git a/gcc/c-family/c-ada-spec.c b/gcc/c-family/c-ada-spec.c
index 455151a..335acb0 100644 (file)
--- a/gcc/c-family/c-ada-spec.c
+++ b/gcc/c-family/c-ada-spec.c
@@ -2035,6 +2035,7 @@ dump_generic_ada_node (pretty_printer *buffer, tree node, tree type,
                              || !TYPE_FIELDS (TREE_TYPE (underlying_type))))
                      /* Pointer to opaque structure.  */
 
+                     || underlying_type == NULL_TREE
                      || (!typ2
                          && !TREE_VISITED (underlying_type)
                          && !TREE_VISITED (type_name)