Commit 926ce8bd by Kazu Hirata Committed by Kazu Hirata

cvt.c: Remove uses of "register" specifier in declarations of arguments and local...

	* cvt.c: Remove uses of "register" specifier in
	declarations of arguments and local variables.
	* decl.c: Likewise.
	* decl2.c: Likewise.
	* expr.c: Likewise.
	* friend.c: Likewise.
	* lex.c: Likewise.
	* name-lookup.c: Likewise.
	* repo.c: Likewise.
	* search.c: Likewise.
	* tree.c: Likewise.
	* typeck.c: Likewise.
	* typeck2.c: Likewise.

From-SVN: r74855
parent 49a27995
2003-12-19 Kazu Hirata <kazu@cs.umass.edu>
* cvt.c: Remove uses of "register" specifier in
declarations of arguments and local variables.
* decl.c: Likewise.
* decl2.c: Likewise.
* expr.c: Likewise.
* friend.c: Likewise.
* lex.c: Likewise.
* name-lookup.c: Likewise.
* repo.c: Likewise.
* search.c: Likewise.
* tree.c: Likewise.
* typeck.c: Likewise.
* typeck2.c: Likewise.
2003-12-19 Mark Mitchell <mark@codesourcery.com> 2003-12-19 Mark Mitchell <mark@codesourcery.com>
PR c++/12795 PR c++/12795
......
...@@ -76,8 +76,8 @@ static void warn_ref_binding (tree, tree, tree); ...@@ -76,8 +76,8 @@ static void warn_ref_binding (tree, tree, tree);
static tree static tree
cp_convert_to_pointer (tree type, tree expr, bool force) cp_convert_to_pointer (tree type, tree expr, bool force)
{ {
register tree intype = TREE_TYPE (expr); tree intype = TREE_TYPE (expr);
register enum tree_code form; enum tree_code form;
tree rval; tree rval;
if (IS_AGGR_TYPE (intype)) if (IS_AGGR_TYPE (intype))
...@@ -306,8 +306,8 @@ cp_convert_to_pointer (tree type, tree expr, bool force) ...@@ -306,8 +306,8 @@ cp_convert_to_pointer (tree type, tree expr, bool force)
static tree static tree
convert_to_pointer_force (tree type, tree expr) convert_to_pointer_force (tree type, tree expr)
{ {
register tree intype = TREE_TYPE (expr); tree intype = TREE_TYPE (expr);
register enum tree_code form = TREE_CODE (intype); enum tree_code form = TREE_CODE (intype);
if (form == POINTER_TYPE) if (form == POINTER_TYPE)
{ {
...@@ -449,8 +449,8 @@ tree ...@@ -449,8 +449,8 @@ tree
convert_to_reference (tree reftype, tree expr, int convtype, convert_to_reference (tree reftype, tree expr, int convtype,
int flags, tree decl) int flags, tree decl)
{ {
register tree type = TYPE_MAIN_VARIANT (TREE_TYPE (reftype)); tree type = TYPE_MAIN_VARIANT (TREE_TYPE (reftype));
register tree intype; tree intype;
tree rval = NULL_TREE; tree rval = NULL_TREE;
tree rval_as_conversion = NULL_TREE; tree rval_as_conversion = NULL_TREE;
bool can_convert_intype_to_type; bool can_convert_intype_to_type;
...@@ -612,8 +612,8 @@ cp_convert (tree type, tree expr) ...@@ -612,8 +612,8 @@ cp_convert (tree type, tree expr)
tree tree
ocp_convert (tree type, tree expr, int convtype, int flags) ocp_convert (tree type, tree expr, int convtype, int flags)
{ {
register tree e = expr; tree e = expr;
register enum tree_code code = TREE_CODE (type); enum tree_code code = TREE_CODE (type);
if (error_operand_p (e) || type == error_mark_node) if (error_operand_p (e) || type == error_mark_node)
return error_mark_node; return error_mark_node;
...@@ -944,8 +944,8 @@ convert (tree type, tree expr) ...@@ -944,8 +944,8 @@ convert (tree type, tree expr)
tree tree
convert_force (tree type, tree expr, int convtype) convert_force (tree type, tree expr, int convtype)
{ {
register tree e = expr; tree e = expr;
register enum tree_code code = TREE_CODE (type); enum tree_code code = TREE_CODE (type);
if (code == REFERENCE_TYPE) if (code == REFERENCE_TYPE)
return fold (convert_to_reference (type, e, CONV_C_CAST, LOOKUP_COMPLAIN, return fold (convert_to_reference (type, e, CONV_C_CAST, LOOKUP_COMPLAIN,
......
...@@ -425,7 +425,7 @@ pop_labels (tree block) ...@@ -425,7 +425,7 @@ pop_labels (tree block)
tree tree
poplevel (int keep, int reverse, int functionbody) poplevel (int keep, int reverse, int functionbody)
{ {
register tree link; tree link;
/* The chain of decls was accumulated in reverse order. /* The chain of decls was accumulated in reverse order.
Put it into forward order, just for cleanliness. */ Put it into forward order, just for cleanliness. */
tree decls; tree decls;
...@@ -1556,8 +1556,8 @@ duplicate_decls (tree newdecl, tree olddecl) ...@@ -1556,8 +1556,8 @@ duplicate_decls (tree newdecl, tree olddecl)
/* Deal with C++: must preserve virtual function table size. */ /* Deal with C++: must preserve virtual function table size. */
if (TREE_CODE (olddecl) == TYPE_DECL) if (TREE_CODE (olddecl) == TYPE_DECL)
{ {
register tree newtype = TREE_TYPE (newdecl); tree newtype = TREE_TYPE (newdecl);
register tree oldtype = TREE_TYPE (olddecl); tree oldtype = TREE_TYPE (olddecl);
if (newtype != error_mark_node && oldtype != error_mark_node if (newtype != error_mark_node && oldtype != error_mark_node
&& TYPE_LANG_SPECIFIC (newtype) && TYPE_LANG_SPECIFIC (oldtype)) && TYPE_LANG_SPECIFIC (newtype) && TYPE_LANG_SPECIFIC (oldtype))
...@@ -1939,7 +1939,7 @@ duplicate_decls (tree newdecl, tree olddecl) ...@@ -1939,7 +1939,7 @@ duplicate_decls (tree newdecl, tree olddecl)
tree tree
implicitly_declare (tree functionid) implicitly_declare (tree functionid)
{ {
register tree decl; tree decl;
/* We used to reuse an old implicit decl here, /* We used to reuse an old implicit decl here,
but this loses with inline functions because it can clobber but this loses with inline functions because it can clobber
...@@ -2348,7 +2348,7 @@ define_label (location_t location, tree name) ...@@ -2348,7 +2348,7 @@ define_label (location_t location, tree name)
{ {
tree decl = lookup_label (name); tree decl = lookup_label (name);
struct named_label_list *ent; struct named_label_list *ent;
register struct cp_binding_level *p; struct cp_binding_level *p;
timevar_push (TV_NAME_LOOKUP); timevar_push (TV_NAME_LOOKUP);
for (ent = named_labels; ent; ent = ent->next) for (ent = named_labels; ent; ent = ent->next)
...@@ -2439,7 +2439,7 @@ tree ...@@ -2439,7 +2439,7 @@ tree
finish_case_label (tree low_value, tree high_value) finish_case_label (tree low_value, tree high_value)
{ {
tree cond, r; tree cond, r;
register struct cp_binding_level *p; struct cp_binding_level *p;
if (processing_template_decl) if (processing_template_decl)
{ {
...@@ -3441,7 +3441,7 @@ check_tag_decl (tree declspecs) ...@@ -3441,7 +3441,7 @@ check_tag_decl (tree declspecs)
int saw_friend = 0; int saw_friend = 0;
int saw_typedef = 0; int saw_typedef = 0;
tree ob_modifier = NULL_TREE; tree ob_modifier = NULL_TREE;
register tree link; tree link;
/* If a class, struct, or enum type is declared by the DECLSPECS /* If a class, struct, or enum type is declared by the DECLSPECS
(i.e, if a class-specifier, enum-specifier, or non-typename (i.e, if a class-specifier, enum-specifier, or non-typename
elaborated-type-specifier appears in the DECLSPECS), elaborated-type-specifier appears in the DECLSPECS),
...@@ -3638,7 +3638,7 @@ start_decl (tree declarator, ...@@ -3638,7 +3638,7 @@ start_decl (tree declarator,
tree prefix_attributes) tree prefix_attributes)
{ {
tree decl; tree decl;
register tree type, tem; tree type, tem;
tree context; tree context;
/* This should only be done once on the top most decl. */ /* This should only be done once on the top most decl. */
...@@ -5286,7 +5286,7 @@ start_handler_parms (tree declspecs, tree declarator) ...@@ -5286,7 +5286,7 @@ start_handler_parms (tree declspecs, tree declarator)
int int
complete_array_type (tree type, tree initial_value, int do_default) complete_array_type (tree type, tree initial_value, int do_default)
{ {
register tree maxindex = NULL_TREE; tree maxindex = NULL_TREE;
int value = 0; int value = 0;
if (initial_value) if (initial_value)
...@@ -6350,7 +6350,7 @@ grokdeclarator (tree declarator, ...@@ -6350,7 +6350,7 @@ grokdeclarator (tree declarator,
and get it as a string, for an error message. */ and get it as a string, for an error message. */
{ {
tree *next = &declarator; tree *next = &declarator;
register tree decl; tree decl;
name = NULL; name = NULL;
while (next && *next) while (next && *next)
...@@ -6674,8 +6674,8 @@ grokdeclarator (tree declarator, ...@@ -6674,8 +6674,8 @@ grokdeclarator (tree declarator,
for (spec = declspecs; spec; spec = TREE_CHAIN (spec)) for (spec = declspecs; spec; spec = TREE_CHAIN (spec))
{ {
register int i; int i;
register tree id; tree id;
/* Certain parse errors slip through. For example, /* Certain parse errors slip through. For example,
`int class;' is not caught by the parser. Try `int class;' is not caught by the parser. Try
...@@ -6779,7 +6779,7 @@ grokdeclarator (tree declarator, ...@@ -6779,7 +6779,7 @@ grokdeclarator (tree declarator,
error ("two or more data types in declaration of `%s'", name); error ("two or more data types in declaration of `%s'", name);
else if (TREE_CODE (id) == IDENTIFIER_NODE) else if (TREE_CODE (id) == IDENTIFIER_NODE)
{ {
register tree t = lookup_name (id, 1); tree t = lookup_name (id, 1);
if (!t || TREE_CODE (t) != TYPE_DECL) if (!t || TREE_CODE (t) != TYPE_DECL)
error ("`%s' fails to be a typedef or built in type", error ("`%s' fails to be a typedef or built in type",
IDENTIFIER_POINTER (id)); IDENTIFIER_POINTER (id));
...@@ -7098,7 +7098,7 @@ grokdeclarator (tree declarator, ...@@ -7098,7 +7098,7 @@ grokdeclarator (tree declarator,
if (decl_context == FIELD) if (decl_context == FIELD)
{ {
tree tmp = NULL_TREE; tree tmp = NULL_TREE;
register int op = 0; int op = 0;
if (declarator) if (declarator)
{ {
...@@ -7474,7 +7474,7 @@ grokdeclarator (tree declarator, ...@@ -7474,7 +7474,7 @@ grokdeclarator (tree declarator,
if (TREE_TYPE (declarator)) if (TREE_TYPE (declarator))
{ {
register tree typemodlist; tree typemodlist;
int erred = 0; int erred = 0;
int constp = 0; int constp = 0;
int volatilep = 0; int volatilep = 0;
...@@ -7993,7 +7993,7 @@ grokdeclarator (tree declarator, ...@@ -7993,7 +7993,7 @@ grokdeclarator (tree declarator,
} }
{ {
register tree decl; tree decl;
if (decl_context == PARM) if (decl_context == PARM)
{ {
...@@ -9285,7 +9285,7 @@ xref_tag (enum tag_types tag_code, tree name, tree attributes, ...@@ -9285,7 +9285,7 @@ xref_tag (enum tag_types tag_code, tree name, tree attributes,
bool globalize, bool template_header_p) bool globalize, bool template_header_p)
{ {
enum tree_code code; enum tree_code code;
register tree t; tree t;
struct cp_binding_level *b = current_binding_level; struct cp_binding_level *b = current_binding_level;
tree context = NULL_TREE; tree context = NULL_TREE;
...@@ -9651,7 +9651,7 @@ xref_basetypes (tree ref, tree base_list) ...@@ -9651,7 +9651,7 @@ xref_basetypes (tree ref, tree base_list)
tree tree
start_enum (tree name) start_enum (tree name)
{ {
register tree enumtype = NULL_TREE; tree enumtype = NULL_TREE;
struct cp_binding_level *b = current_binding_level; struct cp_binding_level *b = current_binding_level;
/* If this is the real definition for a previous forward reference, /* If this is the real definition for a previous forward reference,
...@@ -10387,8 +10387,8 @@ start_function (tree declspecs, tree declarator, tree attrs, int flags) ...@@ -10387,8 +10387,8 @@ start_function (tree declspecs, tree declarator, tree attrs, int flags)
static void static void
store_parm_decls (tree current_function_parms) store_parm_decls (tree current_function_parms)
{ {
register tree fndecl = current_function_decl; tree fndecl = current_function_decl;
register tree parm; tree parm;
/* This is a chain of any other decls that came in among the parm /* This is a chain of any other decls that came in among the parm
declarations. If a parm is declared with enum {foo, bar} x; declarations. If a parm is declared with enum {foo, bar} x;
...@@ -10664,7 +10664,7 @@ finish_function_body (tree compstmt) ...@@ -10664,7 +10664,7 @@ finish_function_body (tree compstmt)
tree tree
finish_function (int flags) finish_function (int flags)
{ {
register tree fndecl = current_function_decl; tree fndecl = current_function_decl;
tree fntype, ctype = NULL_TREE; tree fntype, ctype = NULL_TREE;
int inclass_inline = (flags & 2) != 0; int inclass_inline = (flags & 2) != 0;
int nested; int nested;
...@@ -10960,10 +10960,10 @@ start_method (tree declspecs, tree declarator, tree attrlist) ...@@ -10960,10 +10960,10 @@ start_method (tree declspecs, tree declarator, tree attrlist)
tree tree
finish_method (tree decl) finish_method (tree decl)
{ {
register tree fndecl = decl; tree fndecl = decl;
tree old_initial; tree old_initial;
register tree link; tree link;
if (decl == void_type_node) if (decl == void_type_node)
return decl; return decl;
......
...@@ -1037,8 +1037,7 @@ grokfield (tree declarator, tree declspecs, tree init, tree asmspec_tree, ...@@ -1037,8 +1037,7 @@ grokfield (tree declarator, tree declspecs, tree init, tree asmspec_tree,
tree tree
grokbitfield (tree declarator, tree declspecs, tree width) grokbitfield (tree declarator, tree declspecs, tree width)
{ {
register tree value = grokdeclarator (declarator, declspecs, BITFIELD, tree value = grokdeclarator (declarator, declspecs, BITFIELD, 0, NULL);
0, NULL);
if (! value) return NULL_TREE; /* friends went bad. */ if (! value) return NULL_TREE; /* friends went bad. */
......
...@@ -78,8 +78,8 @@ rtx ...@@ -78,8 +78,8 @@ rtx
cxx_expand_expr (tree exp, rtx target, enum machine_mode tmode, int modifier) cxx_expand_expr (tree exp, rtx target, enum machine_mode tmode, int modifier)
{ {
tree type = TREE_TYPE (exp); tree type = TREE_TYPE (exp);
register enum machine_mode mode = TYPE_MODE (type); enum machine_mode mode = TYPE_MODE (type);
register enum tree_code code = TREE_CODE (exp); enum tree_code code = TREE_CODE (exp);
rtx ret; rtx ret;
/* No sense saving up arithmetic to be done /* No sense saving up arithmetic to be done
......
...@@ -39,7 +39,7 @@ int ...@@ -39,7 +39,7 @@ int
is_friend (tree type, tree supplicant) is_friend (tree type, tree supplicant)
{ {
int declp; int declp;
register tree list; tree list;
tree context; tree context;
if (supplicant == NULL_TREE || type == NULL_TREE) if (supplicant == NULL_TREE || type == NULL_TREE)
......
...@@ -838,7 +838,7 @@ copy_type (tree type) ...@@ -838,7 +838,7 @@ copy_type (tree type)
tree tree
cxx_make_type (enum tree_code code) cxx_make_type (enum tree_code code)
{ {
register tree t = make_node (code); tree t = make_node (code);
/* Create lang_type structure. */ /* Create lang_type structure. */
if (IS_AGGR_TYPE_CODE (code) if (IS_AGGR_TYPE_CODE (code)
......
...@@ -545,8 +545,8 @@ add_decl_to_level (tree decl, cxx_scope *b) ...@@ -545,8 +545,8 @@ add_decl_to_level (tree decl, cxx_scope *b)
tree tree
pushdecl (tree x) pushdecl (tree x)
{ {
register tree t; tree t;
register tree name; tree name;
int need_new_binding; int need_new_binding;
timevar_push (TV_NAME_LOOKUP); timevar_push (TV_NAME_LOOKUP);
...@@ -1811,7 +1811,7 @@ make_anon_name (void) ...@@ -1811,7 +1811,7 @@ make_anon_name (void)
void void
clear_anon_tags (void) clear_anon_tags (void)
{ {
register struct cp_binding_level *b; struct cp_binding_level *b;
static int last_cnt = 0; static int last_cnt = 0;
/* Fast out if no new anon names were declared. */ /* Fast out if no new anon names were declared. */
...@@ -1909,7 +1909,7 @@ push_using_decl (tree scope, tree name) ...@@ -1909,7 +1909,7 @@ push_using_decl (tree scope, tree name)
tree tree
pushdecl_with_scope (tree x, cxx_scope *level) pushdecl_with_scope (tree x, cxx_scope *level)
{ {
register struct cp_binding_level *b; struct cp_binding_level *b;
tree function_decl = current_function_decl; tree function_decl = current_function_decl;
timevar_push (TV_NAME_LOOKUP); timevar_push (TV_NAME_LOOKUP);
...@@ -2335,7 +2335,7 @@ tree ...@@ -2335,7 +2335,7 @@ tree
lookup_tag (enum tree_code form, tree name, lookup_tag (enum tree_code form, tree name,
cxx_scope *binding_level, int thislevel_only) cxx_scope *binding_level, int thislevel_only)
{ {
register struct cp_binding_level *level; struct cp_binding_level *level;
/* Nonzero if, we should look past a template parameter level, even /* Nonzero if, we should look past a template parameter level, even
if THISLEVEL_ONLY. */ if THISLEVEL_ONLY. */
int allow_template_parms_p = 1; int allow_template_parms_p = 1;
...@@ -2344,7 +2344,7 @@ lookup_tag (enum tree_code form, tree name, ...@@ -2344,7 +2344,7 @@ lookup_tag (enum tree_code form, tree name,
timevar_push (TV_NAME_LOOKUP); timevar_push (TV_NAME_LOOKUP);
for (level = binding_level; level; level = level->level_chain) for (level = binding_level; level; level = level->level_chain)
{ {
register tree tail; tree tail;
if (type_is_anonymous && level->type_decls != NULL) if (type_is_anonymous && level->type_decls != NULL)
{ {
tree type = binding_table_find_anon_type (level->type_decls, name); tree type = binding_table_find_anon_type (level->type_decls, name);
...@@ -2447,7 +2447,7 @@ lookup_tag (enum tree_code form, tree name, ...@@ -2447,7 +2447,7 @@ lookup_tag (enum tree_code form, tree name,
tree tree
lookup_tag_reverse (tree type, tree name) lookup_tag_reverse (tree type, tree name)
{ {
register struct cp_binding_level *level; struct cp_binding_level *level;
timevar_push (TV_NAME_LOOKUP); timevar_push (TV_NAME_LOOKUP);
for (level = current_binding_level; level; level = level->level_chain) for (level = current_binding_level; level; level = level->level_chain)
...@@ -2531,7 +2531,7 @@ pushlevel_class (void) ...@@ -2531,7 +2531,7 @@ pushlevel_class (void)
void void
poplevel_class (void) poplevel_class (void)
{ {
register struct cp_binding_level *level = class_binding_level; struct cp_binding_level *level = class_binding_level;
tree shadowed; tree shadowed;
timevar_push (TV_NAME_LOOKUP); timevar_push (TV_NAME_LOOKUP);
...@@ -3157,8 +3157,8 @@ do_namespace_alias (tree alias, tree namespace) ...@@ -3157,8 +3157,8 @@ do_namespace_alias (tree alias, tree namespace)
tree tree
pushdecl_namespace_level (tree x) pushdecl_namespace_level (tree x)
{ {
register struct cp_binding_level *b = current_binding_level; struct cp_binding_level *b = current_binding_level;
register tree t; tree t;
timevar_push (TV_NAME_LOOKUP); timevar_push (TV_NAME_LOOKUP);
t = pushdecl_with_scope (x, NAMESPACE_LEVEL (current_namespace)); t = pushdecl_with_scope (x, NAMESPACE_LEVEL (current_namespace));
...@@ -3977,7 +3977,7 @@ lookup_name_current_level (tree name) ...@@ -3977,7 +3977,7 @@ lookup_name_current_level (tree name)
static tree static tree
lookup_type_current_level (tree name) lookup_type_current_level (tree name)
{ {
register tree t = NULL_TREE; tree t = NULL_TREE;
timevar_push (TV_NAME_LOOKUP); timevar_push (TV_NAME_LOOKUP);
my_friendly_assert (current_binding_level->kind != sk_namespace, my_friendly_assert (current_binding_level->kind != sk_namespace,
...@@ -4491,7 +4491,7 @@ maybe_process_template_type_declaration (tree type, int globalize, ...@@ -4491,7 +4491,7 @@ maybe_process_template_type_declaration (tree type, int globalize,
void void
pushtag (tree name, tree type, int globalize) pushtag (tree name, tree type, int globalize)
{ {
register struct cp_binding_level *b; struct cp_binding_level *b;
timevar_push (TV_NAME_LOOKUP); timevar_push (TV_NAME_LOOKUP);
b = current_binding_level; b = current_binding_level;
...@@ -4514,7 +4514,7 @@ pushtag (tree name, tree type, int globalize) ...@@ -4514,7 +4514,7 @@ pushtag (tree name, tree type, int globalize)
/* Do C++ gratuitous typedefing. */ /* Do C++ gratuitous typedefing. */
if (IDENTIFIER_TYPE_VALUE (name) != type) if (IDENTIFIER_TYPE_VALUE (name) != type)
{ {
register tree d = NULL_TREE; tree d = NULL_TREE;
int in_class = 0; int in_class = 0;
tree context = TYPE_CONTEXT (type); tree context = TYPE_CONTEXT (type);
......
...@@ -267,7 +267,7 @@ get_base_filename (const char *filename) ...@@ -267,7 +267,7 @@ get_base_filename (const char *filename)
static void static void
open_repo_file (const char *filename) open_repo_file (const char *filename)
{ {
register const char *p; const char *p;
const char *s = get_base_filename (filename); const char *s = get_base_filename (filename);
if (s == NULL) if (s == NULL)
......
...@@ -125,7 +125,7 @@ push_search_level (struct stack_level *stack, struct obstack *obstack) ...@@ -125,7 +125,7 @@ push_search_level (struct stack_level *stack, struct obstack *obstack)
static struct search_level * static struct search_level *
pop_search_level (struct stack_level *obstack) pop_search_level (struct stack_level *obstack)
{ {
register struct search_level *stack = pop_stack_level (obstack); struct search_level *stack = pop_stack_level (obstack);
return stack; return stack;
} }
...@@ -422,7 +422,7 @@ get_dynamic_cast_base_type (tree subtype, tree target) ...@@ -422,7 +422,7 @@ get_dynamic_cast_base_type (tree subtype, tree target)
tree tree
lookup_field_1 (tree type, tree name, bool want_type) lookup_field_1 (tree type, tree name, bool want_type)
{ {
register tree field; tree field;
if (TREE_CODE (type) == TEMPLATE_TYPE_PARM if (TREE_CODE (type) == TEMPLATE_TYPE_PARM
|| TREE_CODE (type) == BOUND_TEMPLATE_TEMPLATE_PARM || TREE_CODE (type) == BOUND_TEMPLATE_TEMPLATE_PARM
......
...@@ -1295,9 +1295,9 @@ break_out_target_exprs (tree t) ...@@ -1295,9 +1295,9 @@ break_out_target_exprs (tree t)
tree tree
build_min_nt (enum tree_code code, ...) build_min_nt (enum tree_code code, ...)
{ {
register tree t; tree t;
register int length; int length;
register int i; int i;
va_list p; va_list p;
va_start (p, code); va_start (p, code);
...@@ -1321,9 +1321,9 @@ build_min_nt (enum tree_code code, ...) ...@@ -1321,9 +1321,9 @@ build_min_nt (enum tree_code code, ...)
tree tree
build_min (enum tree_code code, tree tt, ...) build_min (enum tree_code code, tree tt, ...)
{ {
register tree t; tree t;
register int length; int length;
register int i; int i;
va_list p; va_list p;
va_start (p, tt); va_start (p, tt);
...@@ -1352,9 +1352,9 @@ build_min (enum tree_code code, tree tt, ...) ...@@ -1352,9 +1352,9 @@ build_min (enum tree_code code, tree tt, ...)
tree tree
build_min_non_dep (enum tree_code code, tree non_dep, ...) build_min_non_dep (enum tree_code code, tree non_dep, ...)
{ {
register tree t; tree t;
register int length; int length;
register int i; int i;
va_list p; va_list p;
va_start (p, non_dep); va_start (p, non_dep);
...@@ -1454,7 +1454,7 @@ decl_namespace_context (tree decl) ...@@ -1454,7 +1454,7 @@ decl_namespace_context (tree decl)
bool bool
cp_tree_equal (tree t1, tree t2) cp_tree_equal (tree t1, tree t2)
{ {
register enum tree_code code1, code2; enum tree_code code1, code2;
if (t1 == t2) if (t1 == t2)
return true; return true;
......
...@@ -579,8 +579,8 @@ composite_pointer_type (tree t1, tree t2, tree arg1, tree arg2, ...@@ -579,8 +579,8 @@ composite_pointer_type (tree t1, tree t2, tree arg1, tree arg2,
tree tree
merge_types (tree t1, tree t2) merge_types (tree t1, tree t2)
{ {
register enum tree_code code1; enum tree_code code1;
register enum tree_code code2; enum tree_code code2;
tree attributes; tree attributes;
/* Save time if the two types are the same. */ /* Save time if the two types are the same. */
...@@ -1265,8 +1265,8 @@ cxx_sizeof_or_alignof_expr (tree e, enum tree_code op) ...@@ -1265,8 +1265,8 @@ cxx_sizeof_or_alignof_expr (tree e, enum tree_code op)
tree tree
decay_conversion (tree exp) decay_conversion (tree exp)
{ {
register tree type; tree type;
register enum tree_code code; enum tree_code code;
type = TREE_TYPE (exp); type = TREE_TYPE (exp);
code = TREE_CODE (type); code = TREE_CODE (type);
...@@ -1317,7 +1317,7 @@ decay_conversion (tree exp) ...@@ -1317,7 +1317,7 @@ decay_conversion (tree exp)
return build_unary_op (ADDR_EXPR, exp, 0); return build_unary_op (ADDR_EXPR, exp, 0);
if (code == ARRAY_TYPE) if (code == ARRAY_TYPE)
{ {
register tree adr; tree adr;
tree ptrtype; tree ptrtype;
if (TREE_CODE (exp) == INDIRECT_REF) if (TREE_CODE (exp) == INDIRECT_REF)
...@@ -2010,7 +2010,7 @@ build_x_indirect_ref (tree expr, const char *errorstring) ...@@ -2010,7 +2010,7 @@ build_x_indirect_ref (tree expr, const char *errorstring)
tree tree
build_indirect_ref (tree ptr, const char *errorstring) build_indirect_ref (tree ptr, const char *errorstring)
{ {
register tree pointer, type; tree pointer, type;
if (ptr == error_mark_node) if (ptr == error_mark_node)
return error_mark_node; return error_mark_node;
...@@ -2348,8 +2348,8 @@ get_member_function_from_ptrfunc (tree *instance_ptrptr, tree function) ...@@ -2348,8 +2348,8 @@ get_member_function_from_ptrfunc (tree *instance_ptrptr, tree function)
tree tree
build_function_call (tree function, tree params) build_function_call (tree function, tree params)
{ {
register tree fntype, fndecl; tree fntype, fndecl;
register tree coerced_params; tree coerced_params;
tree result; tree result;
tree name = NULL_TREE, assembler_name = NULL_TREE; tree name = NULL_TREE, assembler_name = NULL_TREE;
int is_method; int is_method;
...@@ -2466,8 +2466,8 @@ build_function_call (tree function, tree params) ...@@ -2466,8 +2466,8 @@ build_function_call (tree function, tree params)
tree tree
convert_arguments (tree typelist, tree values, tree fndecl, int flags) convert_arguments (tree typelist, tree values, tree fndecl, int flags)
{ {
register tree typetail, valtail; tree typetail, valtail;
register tree result = NULL_TREE; tree result = NULL_TREE;
const char *called_thing = 0; const char *called_thing = 0;
int i = 0; int i = 0;
...@@ -2492,8 +2492,8 @@ convert_arguments (tree typelist, tree values, tree fndecl, int flags) ...@@ -2492,8 +2492,8 @@ convert_arguments (tree typelist, tree values, tree fndecl, int flags)
valtail; valtail;
valtail = TREE_CHAIN (valtail), i++) valtail = TREE_CHAIN (valtail), i++)
{ {
register tree type = typetail ? TREE_VALUE (typetail) : 0; tree type = typetail ? TREE_VALUE (typetail) : 0;
register tree val = TREE_VALUE (valtail); tree val = TREE_VALUE (valtail);
if (val == error_mark_node) if (val == error_mark_node)
return error_mark_node; return error_mark_node;
...@@ -2677,17 +2677,17 @@ build_binary_op (enum tree_code code, tree orig_op0, tree orig_op1, ...@@ -2677,17 +2677,17 @@ build_binary_op (enum tree_code code, tree orig_op0, tree orig_op1,
int convert_p ATTRIBUTE_UNUSED) int convert_p ATTRIBUTE_UNUSED)
{ {
tree op0, op1; tree op0, op1;
register enum tree_code code0, code1; enum tree_code code0, code1;
tree type0, type1; tree type0, type1;
/* Expression code to give to the expression when it is built. /* Expression code to give to the expression when it is built.
Normally this is CODE, which is what the caller asked for, Normally this is CODE, which is what the caller asked for,
but in some special cases we change it. */ but in some special cases we change it. */
register enum tree_code resultcode = code; enum tree_code resultcode = code;
/* Data type in which the computation is to be performed. /* Data type in which the computation is to be performed.
In the simplest cases this is the common type of the arguments. */ In the simplest cases this is the common type of the arguments. */
register tree result_type = NULL; tree result_type = NULL;
/* Nonzero means operands have already been type-converted /* Nonzero means operands have already been type-converted
in whatever way is necessary. in whatever way is necessary.
...@@ -3396,8 +3396,8 @@ build_binary_op (enum tree_code code, tree orig_op0, tree orig_op1, ...@@ -3396,8 +3396,8 @@ build_binary_op (enum tree_code code, tree orig_op0, tree orig_op1,
build_type = result_type; build_type = result_type;
{ {
register tree result = build (resultcode, build_type, op0, op1); tree result = build (resultcode, build_type, op0, op1);
register tree folded; tree folded;
folded = fold (result); folded = fold (result);
if (folded == result) if (folded == result)
...@@ -3412,8 +3412,7 @@ build_binary_op (enum tree_code code, tree orig_op0, tree orig_op1, ...@@ -3412,8 +3412,7 @@ build_binary_op (enum tree_code code, tree orig_op0, tree orig_op1,
of pointer PTROP and integer INTOP. */ of pointer PTROP and integer INTOP. */
static tree static tree
cp_pointer_int_sum (enum tree_code resultcode, register tree ptrop, cp_pointer_int_sum (enum tree_code resultcode, tree ptrop, tree intop)
register tree intop)
{ {
tree res_type = TREE_TYPE (ptrop); tree res_type = TREE_TYPE (ptrop);
...@@ -3431,9 +3430,9 @@ cp_pointer_int_sum (enum tree_code resultcode, register tree ptrop, ...@@ -3431,9 +3430,9 @@ cp_pointer_int_sum (enum tree_code resultcode, register tree ptrop,
The resulting tree has type int. */ The resulting tree has type int. */
static tree static tree
pointer_diff (register tree op0, register tree op1, register tree ptrtype) pointer_diff (tree op0, tree op1, tree ptrtype)
{ {
register tree result, folded; tree result, folded;
tree restype = ptrdiff_type_node; tree restype = ptrdiff_type_node;
tree target_type = TREE_TYPE (ptrtype); tree target_type = TREE_TYPE (ptrtype);
...@@ -3630,8 +3629,8 @@ tree ...@@ -3630,8 +3629,8 @@ tree
build_unary_op (enum tree_code code, tree xarg, int noconvert) build_unary_op (enum tree_code code, tree xarg, int noconvert)
{ {
/* No default_conversion here. It causes trouble for ADDR_EXPR. */ /* No default_conversion here. It causes trouble for ADDR_EXPR. */
register tree arg = xarg; tree arg = xarg;
register tree argtype = 0; tree argtype = 0;
const char *errstring = NULL; const char *errstring = NULL;
tree val; tree val;
...@@ -3769,7 +3768,7 @@ build_unary_op (enum tree_code code, tree xarg, int noconvert) ...@@ -3769,7 +3768,7 @@ build_unary_op (enum tree_code code, tree xarg, int noconvert)
0); 0);
{ {
register tree inc; tree inc;
tree result_type = TREE_TYPE (arg); tree result_type = TREE_TYPE (arg);
arg = get_unwidened (arg, 0); arg = get_unwidened (arg, 0);
...@@ -4214,7 +4213,7 @@ unary_complex_lvalue (enum tree_code code, tree arg) ...@@ -4214,7 +4213,7 @@ unary_complex_lvalue (enum tree_code code, tree arg)
bool bool
cxx_mark_addressable (tree exp) cxx_mark_addressable (tree exp)
{ {
register tree x = exp; tree x = exp;
while (1) while (1)
switch (TREE_CODE (x)) switch (TREE_CODE (x))
...@@ -4750,7 +4749,7 @@ build_const_cast (tree type, tree expr) ...@@ -4750,7 +4749,7 @@ build_const_cast (tree type, tree expr)
tree tree
build_c_cast (tree type, tree expr) build_c_cast (tree type, tree expr)
{ {
register tree value = expr; tree value = expr;
tree otype; tree otype;
if (type == error_mark_node || expr == error_mark_node) if (type == error_mark_node || expr == error_mark_node)
...@@ -4915,7 +4914,7 @@ build_c_cast (tree type, tree expr) ...@@ -4915,7 +4914,7 @@ build_c_cast (tree type, tree expr)
tree tree
build_modify_expr (tree lhs, enum tree_code modifycode, tree rhs) build_modify_expr (tree lhs, enum tree_code modifycode, tree rhs)
{ {
register tree result; tree result;
tree newrhs = rhs; tree newrhs = rhs;
tree lhstype = TREE_TYPE (lhs); tree lhstype = TREE_TYPE (lhs);
tree olhstype = lhstype; tree olhstype = lhstype;
...@@ -5589,8 +5588,8 @@ static tree ...@@ -5589,8 +5588,8 @@ static tree
convert_for_assignment (tree type, tree rhs, convert_for_assignment (tree type, tree rhs,
const char *errtype, tree fndecl, int parmnum) const char *errtype, tree fndecl, int parmnum)
{ {
register tree rhstype; tree rhstype;
register enum tree_code coder; enum tree_code coder;
/* Strip NON_LVALUE_EXPRs since we aren't using as an lvalue. */ /* Strip NON_LVALUE_EXPRs since we aren't using as an lvalue. */
if (TREE_CODE (rhs) == NON_LVALUE_EXPR) if (TREE_CODE (rhs) == NON_LVALUE_EXPR)
...@@ -5688,9 +5687,9 @@ tree ...@@ -5688,9 +5687,9 @@ tree
convert_for_initialization (tree exp, tree type, tree rhs, int flags, convert_for_initialization (tree exp, tree type, tree rhs, int flags,
const char *errtype, tree fndecl, int parmnum) const char *errtype, tree fndecl, int parmnum)
{ {
register enum tree_code codel = TREE_CODE (type); enum tree_code codel = TREE_CODE (type);
register tree rhstype; tree rhstype;
register enum tree_code coder; enum tree_code coder;
/* build_c_cast puts on a NOP_EXPR to make the result not an lvalue. /* build_c_cast puts on a NOP_EXPR to make the result not an lvalue.
Strip such NOP_EXPRs, since RHS is used in non-lvalue context. */ Strip such NOP_EXPRs, since RHS is used in non-lvalue context. */
...@@ -5773,10 +5772,10 @@ c_expand_asm_operands (tree string, tree outputs, tree inputs, tree clobbers, ...@@ -5773,10 +5772,10 @@ c_expand_asm_operands (tree string, tree outputs, tree inputs, tree clobbers,
int vol, location_t locus) int vol, location_t locus)
{ {
int noutputs = list_length (outputs); int noutputs = list_length (outputs);
register int i; int i;
/* o[I] is the place that output number I should be written. */ /* o[I] is the place that output number I should be written. */
register tree *o = alloca (noutputs * sizeof (tree)); tree *o = alloca (noutputs * sizeof (tree));
register tree tail; tree tail;
/* Record the contents of OUTPUTS before it is modified. */ /* Record the contents of OUTPUTS before it is modified. */
for (i = 0, tail = outputs; tail; tail = TREE_CHAIN (tail), i++) for (i = 0, tail = outputs; tail; tail = TREE_CHAIN (tail), i++)
......
...@@ -306,7 +306,7 @@ cxx_incomplete_type_error (tree value, tree type) ...@@ -306,7 +306,7 @@ cxx_incomplete_type_error (tree value, tree type)
tree tree
store_init_value (tree decl, tree init) store_init_value (tree decl, tree init)
{ {
register tree value, type; tree value, type;
/* If variable's type was invalidly declared, just ignore it. */ /* If variable's type was invalidly declared, just ignore it. */
...@@ -470,8 +470,7 @@ digest_init (tree type, tree init, tree* tail) ...@@ -470,8 +470,7 @@ digest_init (tree type, tree init, tree* tail)
if (TYPE_DOMAIN (type) != 0 if (TYPE_DOMAIN (type) != 0
&& TREE_CONSTANT (TYPE_SIZE (type))) && TREE_CONSTANT (TYPE_SIZE (type)))
{ {
register int size int size = TREE_INT_CST_LOW (TYPE_SIZE (type));
= TREE_INT_CST_LOW (TYPE_SIZE (type));
size = (size + BITS_PER_UNIT - 1) / BITS_PER_UNIT; size = (size + BITS_PER_UNIT - 1) / BITS_PER_UNIT;
/* In C it is ok to subtract 1 from the length of the string /* In C it is ok to subtract 1 from the length of the string
because it's ok to ignore the terminating null char that is because it's ok to ignore the terminating null char that is
...@@ -577,11 +576,11 @@ digest_init (tree type, tree init, tree* tail) ...@@ -577,11 +576,11 @@ digest_init (tree type, tree init, tree* tail)
static tree static tree
process_init_constructor (tree type, tree init, tree* elts) process_init_constructor (tree type, tree init, tree* elts)
{ {
register tree tail; tree tail;
/* List of the elements of the result constructor, /* List of the elements of the result constructor,
in reverse order. */ in reverse order. */
register tree members = NULL; tree members = NULL;
register tree next1; tree next1;
tree result; tree result;
int allconstant = 1; int allconstant = 1;
int allsimple = 1; int allsimple = 1;
...@@ -605,8 +604,8 @@ process_init_constructor (tree type, tree init, tree* elts) ...@@ -605,8 +604,8 @@ process_init_constructor (tree type, tree init, tree* elts)
if (TREE_CODE (type) == ARRAY_TYPE || TREE_CODE (type) == VECTOR_TYPE) if (TREE_CODE (type) == ARRAY_TYPE || TREE_CODE (type) == VECTOR_TYPE)
{ {
register long len; long len;
register int i; int i;
if (TREE_CODE (type) == ARRAY_TYPE) if (TREE_CODE (type) == ARRAY_TYPE)
{ {
...@@ -696,7 +695,7 @@ process_init_constructor (tree type, tree init, tree* elts) ...@@ -696,7 +695,7 @@ process_init_constructor (tree type, tree init, tree* elts)
} }
else if (TREE_CODE (type) == RECORD_TYPE) else if (TREE_CODE (type) == RECORD_TYPE)
{ {
register tree field; tree field;
if (tail) if (tail)
{ {
...@@ -817,7 +816,7 @@ process_init_constructor (tree type, tree init, tree* elts) ...@@ -817,7 +816,7 @@ process_init_constructor (tree type, tree init, tree* elts)
/* If the initializer was empty, use default zero initialization. */ /* If the initializer was empty, use default zero initialization. */
&& tail) && tail)
{ {
register tree field = TYPE_FIELDS (type); tree field = TYPE_FIELDS (type);
/* Find the first named field. ANSI decided in September 1990 /* Find the first named field. ANSI decided in September 1990
that only named fields count here. */ that only named fields count here. */
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment