* struc-symbol.h: Add new "sy_used" field to the symbol structure.

* expr.c (operand): Set sy_used for any symbol used as an operand.
	(expr): Likewise for any symbol used in an expression.
	* config/tc-hppa.h (tc_frob_symbol): Define.  Punt imported
	symbols which are never used and absolute symbols which local scope.
This commit is contained in:
Jeff Law 1993-11-02 06:10:52 +00:00
parent d136b7637d
commit 009dc5e1e5
2 changed files with 14 additions and 0 deletions

View File

@ -1,5 +1,11 @@
Mon Nov 1 21:37:04 1993 Jeffrey A. Law (law@snake.cs.utah.edu) Mon Nov 1 21:37:04 1993 Jeffrey A. Law (law@snake.cs.utah.edu)
* struc-symbol.h: Add new "sy_used" field to the symbol structure.
* expr.c (operand): Set sy_used for any symbol used as an operand.
(expr): Likewise for any symbol used in an expression.
* config/tc-hppa.h (tc_frob_symbol): Define. Punt imported
symbols which are never used and absolute symbols which local scope.
* config/obj-som.h (obj_frob_file): Define. * config/obj-som.h (obj_frob_file): Define.
* config/obj-som.c (obj_som_init_stab_section): Set alignment * config/obj-som.c (obj_som_init_stab_section): Set alignment
of stab sections. Make space for the special stab entry. of stab sections. Make space for the special stab entry.

View File

@ -671,6 +671,10 @@ operand (expressionP)
SKIP_WHITESPACE (); /*->1st char after operand. */ SKIP_WHITESPACE (); /*->1st char after operand. */
know (*input_line_pointer != ' '); know (*input_line_pointer != ' ');
/* The PA port needs this information. */
if (expressionP->X_add_symbol)
expressionP->X_add_symbol->sy_used = 1;
switch (expressionP->X_op) switch (expressionP->X_op)
{ {
default: default:
@ -980,6 +984,10 @@ expr (rank, resultP)
op_left = op_right; op_left = op_right;
} /* While next operator is >= this rank. */ } /* While next operator is >= this rank. */
/* The PA port needs this information. */
if (resultP->X_add_symbol)
resultP->X_add_symbol->sy_used = 1;
return resultP->X_op == O_constant ? absolute_section : retval; return resultP->X_op == O_constant ? absolute_section : retval;
} }