From b9c5b75ea0af09a84800f8a93a80fdf7c53adf4f Mon Sep 17 00:00:00 2001 From: steven Date: Fri, 29 Jul 2005 00:02:38 +0000 Subject: [PATCH] * trans-types.h (gfc_array_range_type): Add missing GTY decl for this. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102529 138bc75d-0d04-0410-961f-82ee72b054a4 --- gcc/fortran/ChangeLog | 4 ++++ gcc/fortran/trans-types.c | 3 ++- gcc/fortran/trans-types.h | 2 ++ 3 files changed, 8 insertions(+), 1 deletion(-) diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index a1f8e48dae0..9147a22cf47 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,7 @@ +2005-07-29 Steven Bosscher + + * trans-types.h (gfc_array_range_type): Add missing GTY decl for this. + 2005-07-28 Andrew Pinski * fortran/f95-lang.c (language_function): Remove diff --git a/gcc/fortran/trans-types.c b/gcc/fortran/trans-types.c index 0c0634b5ef0..e89e63eff9b 100644 --- a/gcc/fortran/trans-types.c +++ b/gcc/fortran/trans-types.c @@ -51,10 +51,11 @@ static tree gfc_get_derived_type (gfc_symbol * derived); tree gfc_array_index_type; tree gfc_array_range_type; +tree gfc_character1_type_node; tree pvoid_type_node; tree ppvoid_type_node; tree pchar_type_node; -tree gfc_character1_type_node; + tree gfc_charlen_type_node; static GTY(()) tree gfc_desc_dim_type; diff --git a/gcc/fortran/trans-types.h b/gcc/fortran/trans-types.h index e6c4506f180..af77c1de788 100644 --- a/gcc/fortran/trans-types.h +++ b/gcc/fortran/trans-types.h @@ -41,10 +41,12 @@ enum }; extern GTY(()) tree gfc_array_index_type; +extern GTY(()) tree gfc_array_range_type; extern GTY(()) tree gfc_character1_type_node; extern GTY(()) tree ppvoid_type_node; extern GTY(()) tree pvoid_type_node; extern GTY(()) tree pchar_type_node; + /* This is the type used to hold the lengths of character variables. It must be the same as the corresponding definition in gfortran.h. */ /* TODO: This is still hardcoded as kind=4 in some bits of the compiler -- 2.11.0