* c-ada-spec.c (dump_ada_template): Skip non-class instances.

From-SVN: r171283

diff --git a/gcc/c-family/ChangeLog b/gcc/c-family/ChangeLog
index 5ac57926a6758e8c7ee0c78e5e660e664fa0cef3..597aeefd38813f24800500460b4a41e30bca4de8 100644 (file)
--- a/gcc/c-family/ChangeLog
+++ b/gcc/c-family/ChangeLog
@@ -1,3 +1,7 @@
+2011-03-22  Eric Botcazou  <ebotcazou@adacore.com>
+
+       * c-ada-spec.c (dump_ada_template): Skip non-class instances.
+
 2011-03-17  Kai Tietz
 
        PR target/12171

diff --git a/gcc/c-family/c-ada-spec.c b/gcc/c-family/c-ada-spec.c
index 335acb0e3256397cf0e9dce18216bc4496ccac89..8b9e93a20974342517a6928f87eceb0c1a35508a 100644 (file)
--- a/gcc/c-family/c-ada-spec.c
+++ b/gcc/c-family/c-ada-spec.c
@@ -1681,8 +1681,8 @@ dump_template_types (pretty_printer *buffer, tree types,
     }
 }
 
-/* Dump in BUFFER the contents of all instantiations associated with a given
-   template T.  CPP_CHECK is used to perform C++ queries on nodes.
+/* Dump in BUFFER the contents of all class instantiations associated with
+   a given template T.  CPP_CHECK is used to perform C++ queries on nodes.
    SPC is the indentation level. */
 
 static int
@@ -1701,7 +1701,7 @@ dump_ada_template (pretty_printer *buffer, tree t,
       if (TREE_VEC_LENGTH (types) == 0)
        break;
 
-      if (!TYPE_METHODS (instance))
+      if (!TYPE_P (instance) || !TYPE_METHODS (instance))
        break;
 
       num_inst++;