diff options
| author | pinskia <pinskia@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-11-22 13:50:41 +0000 |
|---|---|---|
| committer | pinskia <pinskia@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-11-22 13:50:41 +0000 |
| commit | 283427371858add907e524c5da99846050f98a2e (patch) | |
| tree | 66dc0351ba4591778f51ef14a1c2154b1df82e5b /gcc/ada/ada-tree.h | |
| parent | 4d068aeb90d92784bf07ac372fca4121176a662c (diff) | |
| download | gcc-283427371858add907e524c5da99846050f98a2e.tar.gz | |
2004-11-22 Andrew Pinski <pinskia@physics.uc.edu>
PR ada/17986
* ada-tree.h (lang_tree_node): Set chain_next to be the chain of the
tree.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@91013 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/ada-tree.h')
| -rw-r--r-- | gcc/ada/ada-tree.h | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/gcc/ada/ada-tree.h b/gcc/ada/ada-tree.h index c087f7851ef..319ec2e4058 100644 --- a/gcc/ada/ada-tree.h +++ b/gcc/ada/ada-tree.h @@ -34,7 +34,11 @@ enum gnat_tree_code { #undef DEFTREECODE /* Ada uses the lang_decl and lang_type fields to hold a tree. */ -union lang_tree_node GTY((desc ("0"))) {union tree_node GTY((tag ("0"))) t; }; +union lang_tree_node GTY((desc ("0"), + chain_next ("(union lang_tree_node *)TREE_CHAIN (&%h.t)"))) +{ + union tree_node GTY((tag ("0"))) t; +}; struct lang_decl GTY(()) {tree t; }; struct lang_type GTY(()) {tree t; }; |