(current_block): Decl deleted.

(set_block):  Declared.

From-SVN: r2017
This commit is contained in:
Richard Stallman 1992-09-01 20:32:43 +00:00
parent c4d990db04
commit 69b78d8d12

View File

@ -573,7 +573,6 @@ struct tree_type
#else #else
enum machine_mode mode : 8; enum machine_mode mode : 8;
#endif #endif
unsigned char align;
unsigned char precision; unsigned char precision;
unsigned no_force_blk_flag : 1; unsigned no_force_blk_flag : 1;
@ -585,6 +584,7 @@ struct tree_type
unsigned lang_flag_5 : 1; unsigned lang_flag_5 : 1;
unsigned lang_flag_6 : 1; unsigned lang_flag_6 : 1;
unsigned int align;
union tree_node *pointer_to; union tree_node *pointer_to;
union tree_node *reference_to; union tree_node *reference_to;
int parse_info; int parse_info;
@ -1408,8 +1408,8 @@ extern void pushlevel PROTO((int));
REVERSE -- reverse the order of decls before returning them. REVERSE -- reverse the order of decls before returning them.
FUNCTIONBODY -- nonzero if this level is the body of a function. */ FUNCTIONBODY -- nonzero if this level is the body of a function. */
extern tree poplevel PROTO((int, int, int)); extern tree poplevel PROTO((int, int, int));
/* Return the BLOCK node for the current scope level. */ /* Set the BLOCK node for the current scope level. */
extern tree current_block PROTO((void)); extern void set_block PROTO((tree));
/* Function to add a decl to the current scope level. /* Function to add a decl to the current scope level.
Takes one argument, a decl to add. Takes one argument, a decl to add.
Returns that decl, or, if the same symbol is already declared, may Returns that decl, or, if the same symbol is already declared, may