re PR ada/31660 ('union lang_tree_node' has no member named 'generic')

2007-04-22  Andrew Pinski  <andrew_pinski@playstation.sony.com>

        PR ada/31660
        * ada-tree.h (lang_tree_node): Fix typo in chain_next.

From-SVN: r124052

gcc/ada/ChangeLog

+2007-04-22  Andrew Pinski  <andrew_pinski@playstation.sony.com>
+
+	PR ada/31660
+	* ada-tree.h (lang_tree_node): Fix typo in chain_next.
+
 2007-04-21  Jan Hubicka  <jh@suse.cz>
 
 	* misc.c (gnat_expand_body): Don't call target for destructors,

gcc/ada/ada-tree.h

@@ -36,7 +36,7 @@ enum gnat_tree_code {
 /* Ada uses the lang_decl and lang_type fields to hold a tree.  */
 union lang_tree_node
   GTY((desc ("0"),
-       chain_next ("(union lang_tree_node *)GENERIC_NEXT (&%h.generic)")))
+       chain_next ("(union lang_tree_node *)GENERIC_NEXT (&%h.t)")))
 
 {
   union tree_node GTY((tag ("0"))) t;