diff options
author | Andrew Macleod <amacleod@redhat.com> | 2016-02-05 19:09:10 +0000 |
---|---|---|
committer | Andrew Macleod <amacleod@redhat.com> | 2016-02-05 19:09:10 +0000 |
commit | 2025fa416120172cfde678d7d98ac34b603c5b78 (patch) | |
tree | 9de8790296ac5f73bab0a918644309557729e147 | |
parent | 50308fb54b0c60f0df8bfbfe45a1ca92fde280e0 (diff) |
missed ada typesttype-7
git-svn-id: https://gcc.gnu.org/svn/gcc/branches/ttype-7@233184 138bc75d-0d04-0410-961f-82ee72b054a4
-rw-r--r-- | gcc/ada/gcc-interface/utils.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/gcc/ada/gcc-interface/utils.c b/gcc/ada/gcc-interface/utils.c index 77d26d93d90..d42f8d8b38c 100644 --- a/gcc/ada/gcc-interface/utils.c +++ b/gcc/ada/gcc-interface/utils.c @@ -5413,7 +5413,7 @@ builtin_decl_for (tree name) /* Standard data types to be used in builtin argument declarations. */ -enum c_tree_index +enum c_type_index { CTI_SIGNED_SIZE_TYPE, /* For format checking only. */ CTI_STRING_TYPE, @@ -5422,11 +5422,11 @@ enum c_tree_index CTI_MAX }; -static tree c_global_trees[CTI_MAX]; +static ttype *c_global_types[CTI_MAX]; -#define signed_size_type_node c_global_trees[CTI_SIGNED_SIZE_TYPE] -#define string_type_node c_global_trees[CTI_STRING_TYPE] -#define const_string_type_node c_global_trees[CTI_CONST_STRING_TYPE] +#define signed_size_type_node c_global_types[CTI_SIGNED_SIZE_TYPE] +#define string_type_node c_global_types[CTI_STRING_TYPE] +#define const_string_type_node c_global_types[CTI_CONST_STRING_TYPE] /* ??? In addition some attribute handlers, we currently don't support a (small) number of builtin-types, which in turns inhibits support for a @@ -5462,7 +5462,7 @@ builtin_type_for_size (int size, bool unsignedp) static void install_builtin_elementary_types (void) { - signed_size_type_node = gnat_signed_type_for (size_type_node); + signed_size_type_node = TTYPE (gnat_signed_type_for (size_type_node)); pid_type_node = integer_type_node; void_list_node = build_void_list_node (); |