aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran/f95-lang.c
diff options
context:
space:
mode:
authorAndrew Pinski <pinskia@physics.uc.edu>2004-10-30 14:53:12 +0000
committerAndrew Pinski <pinskia@gcc.gnu.org>2004-10-30 07:53:12 -0700
commitf88cf205f50b9fcd5f41a6abeb24a7ec2991c207 (patch)
treecdd7bcc293e2dd6382323c551f6cc78818878ba7 /gcc/fortran/f95-lang.c
parentb7398e72283f52174a54dcc7e988b48f8131a9d2 (diff)
downloadgcc-f88cf205f50b9fcd5f41a6abeb24a7ec2991c207.zip
gcc-f88cf205f50b9fcd5f41a6abeb24a7ec2991c207.tar.gz
gcc-f88cf205f50b9fcd5f41a6abeb24a7ec2991c207.tar.bz2
f95-lang.c (lang_tree_node): Add chain_next to be the TREE_CHAIN.
2004-10-30 Andrew Pinski <pinskia@physics.uc.edu> * f95-lang.c (lang_tree_node): Add chain_next to be the TREE_CHAIN. From-SVN: r89889
Diffstat (limited to 'gcc/fortran/f95-lang.c')
-rw-r--r--gcc/fortran/f95-lang.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/fortran/f95-lang.c b/gcc/fortran/f95-lang.c
index dec03e8..5c556de 100644
--- a/gcc/fortran/f95-lang.c
+++ b/gcc/fortran/f95-lang.c
@@ -62,7 +62,8 @@ GTY(())
/* The resulting tree type. */
union lang_tree_node
-GTY((desc ("TREE_CODE (&%h.generic) == IDENTIFIER_NODE")))
+GTY((desc ("TREE_CODE (&%h.generic) == IDENTIFIER_NODE"),
+ chain_next ("(union lang_tree_node *)TREE_CHAIN (&%h.generic)")))
{
union tree_node GTY((tag ("0"),
desc ("tree_node_structure (&%h)"))) generic;