From 35cc02b5c80ac6738c1a3362a822e3d7e4d0c587 Mon Sep 17 00:00:00 2001 From: aldyh Date: Tue, 5 Dec 2006 17:26:05 +0000 Subject: Merge gimple-tuples-branch into mainline. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@119546 138bc75d-0d04-0410-961f-82ee72b054a4 --- gcc/ada/ada-tree.h | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'gcc/ada/ada-tree.h') diff --git a/gcc/ada/ada-tree.h b/gcc/ada/ada-tree.h index 0bc81e4d718..608f75e9df2 100644 --- a/gcc/ada/ada-tree.h +++ b/gcc/ada/ada-tree.h @@ -36,7 +36,8 @@ 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 *)TREE_CHAIN (&%h.t)"))) + chain_next ("(GIMPLE_STMT_P (&%h.t) ? (union lang_tree_node *) 0 : (union lang_tree_node *)TREE_CHAIN (&%h.t))"))) + { union tree_node GTY((tag ("0"))) t; }; -- cgit v1.2.1