(init_decl_processing): Use 10 as size of ..._array_type_node.

From-SVN: r3345
This commit is contained in:
Richard Stallman 1993-01-26 06:51:31 +00:00
parent 625bbc6074
commit fba9adc6d5
1 changed files with 13 additions and 8 deletions

View File

@ -150,17 +150,17 @@ tree ptr_type_node, const_ptr_type_node;
tree string_type_node, const_string_type_node; tree string_type_node, const_string_type_node;
/* Type `char[256]' or something like it. /* Type `char[SOMENUMBER]'.
Used when an array of char is needed and the size is irrelevant. */ Used when an array of char is needed and the size is irrelevant. */
tree char_array_type_node; tree char_array_type_node;
/* Type `int[256]' or something like it. /* Type `int[SOMENUMBER]' or something like it.
Used when an array of int needed and the size is irrelevant. */ Used when an array of int needed and the size is irrelevant. */
tree int_array_type_node; tree int_array_type_node;
/* Type `wchar_t[256]' or something like it. /* Type `wchar_t[SOMENUMBER]' or something like it.
Used when a wide string literal is created. */ Used when a wide string literal is created. */
tree wchar_array_type_node; tree wchar_array_type_node;
@ -2495,6 +2495,7 @@ init_decl_processing ()
tree void_ftype_any; tree void_ftype_any;
int wchar_type_size; int wchar_type_size;
tree temp; tree temp;
tree array_domain_type;
current_function_decl = NULL; current_function_decl = NULL;
named_labels = NULL; named_labels = NULL;
@ -2655,18 +2656,22 @@ init_decl_processing ()
const_string_type_node const_string_type_node
= build_pointer_type (build_type_variant (char_type_node, 1, 0)); = build_pointer_type (build_type_variant (char_type_node, 1, 0));
/* make a type for arrays of 256 characters. /* Make a type to be the domain of a few array types
256 is picked randomly because we have a type for integers from 0 to 255. whose domains don`t really matter.
10 is small enough that it always fits in size_t. */
array_domain_type = build_index_type (build_int_2 (10, 0));
/* make a type for arrays of characters.
With luck nothing will ever really depend on the length of this With luck nothing will ever really depend on the length of this
array type. */ array type. */
char_array_type_node char_array_type_node
= build_array_type (char_type_node, unsigned_intQI_type_node); = build_array_type (char_type_node, array_domain_type);
/* Likewise for arrays of ints. */ /* Likewise for arrays of ints. */
int_array_type_node int_array_type_node
= build_array_type (integer_type_node, unsigned_intQI_type_node); = build_array_type (integer_type_node, array_domain_type);
/* This is for wide string constants. */ /* This is for wide string constants. */
wchar_array_type_node wchar_array_type_node
= build_array_type (wchar_type_node, unsigned_intQI_type_node); = build_array_type (wchar_type_node, array_domain_type);
default_function_type default_function_type
= build_function_type (integer_type_node, NULL_TREE); = build_function_type (integer_type_node, NULL_TREE);