Commit 6fbfac92 by Jason Merrill

expr.c (expand_expr, [...]): Set TREE_USED sooner.

	* expr.c (expand_expr, TARGET_EXPR): Set TREE_USED sooner.

	* c-decl.c (finish_struct): Use simpler method of
	removing elements of a singly-linked list.

From-SVN: r29860
parent 11028a53
Thu Oct 7 17:02:34 1999 Jason Merrill <jason@yorick.cygnus.com>
* expr.c (expand_expr, TARGET_EXPR): Set TREE_USED sooner.
Thu Oct 7 17:01:58 1999 Greg McGary <gkm@gnu.org>
* c-decl.c (finish_struct): Use simpler method of
removing elements of a singly-linked list.
Thu Oct 7 15:23:28 1999 Michael Meissner <meissner@cygnus.com> Thu Oct 7 15:23:28 1999 Michael Meissner <meissner@cygnus.com>
* alpha.md (peephole2's): Comment out peephole2's that generate * alpha.md (peephole2's): Comment out peephole2's that generate
......
...@@ -5526,16 +5526,14 @@ finish_struct (t, fieldlist, attributes) ...@@ -5526,16 +5526,14 @@ finish_struct (t, fieldlist, attributes)
layout_type (t); layout_type (t);
/* Delete all zero-width bit-fields from the front of the fieldlist */ /* Delete all zero-width bit-fields from the fieldlist */
while (fieldlist {
&& DECL_INITIAL (fieldlist)) tree *fieldlistp = &fieldlist;
fieldlist = TREE_CHAIN (fieldlist); while (*fieldlistp && TREE_CODE (*fieldlistp) == FIELD_DECL)
/* Delete all such members from the rest of the fieldlist */ if (DECL_INITIAL (*fieldlistp))
for (x = fieldlist; x;) *fieldlistp = TREE_CHAIN (*fieldlistp);
{ else
if (TREE_CHAIN (x) && DECL_INITIAL (TREE_CHAIN (x))) fieldlistp = &TREE_CHAIN (*fieldlistp);
TREE_CHAIN (x) = TREE_CHAIN (TREE_CHAIN (x));
else x = TREE_CHAIN (x);
} }
/* Now we have the truly final field list. /* Now we have the truly final field list.
......
...@@ -7128,21 +7128,11 @@ expand_expr (exp, target, tmode, modifier) ...@@ -7128,21 +7128,11 @@ expand_expr (exp, target, tmode, modifier)
tree negated = fold (build1 (NEGATE_EXPR, type, tree negated = fold (build1 (NEGATE_EXPR, type,
TREE_OPERAND (exp, 1))); TREE_OPERAND (exp, 1)));
/* Deal with the case where we can't negate the constant
in TYPE. */
if (TREE_UNSIGNED (type) || TREE_OVERFLOW (negated)) if (TREE_UNSIGNED (type) || TREE_OVERFLOW (negated))
{ /* If we can't negate the constant in TYPE, leave it alone and
tree newtype = signed_type (type); expand_binop will negate it for us. We used to try to do it
tree newop0 = convert (newtype, TREE_OPERAND (exp, 0)); here in the signed version of TYPE, but that doesn't work
tree newop1 = convert (newtype, TREE_OPERAND (exp, 1)); on POINTER_TYPEs. */;
tree newneg = fold (build1 (NEGATE_EXPR, newtype, newop1));
if (! TREE_OVERFLOW (newneg))
return expand_expr (convert (type,
build (PLUS_EXPR, newtype,
newop0, newneg)),
target, tmode, ro_modifier);
}
else else
{ {
exp = build (PLUS_EXPR, type, TREE_OPERAND (exp, 0), negated); exp = build (PLUS_EXPR, type, TREE_OPERAND (exp, 0), negated);
...@@ -7845,6 +7835,11 @@ expand_expr (exp, target, tmode, modifier) ...@@ -7845,6 +7835,11 @@ expand_expr (exp, target, tmode, modifier)
if (! ignore) if (! ignore)
target = original_target; target = original_target;
/* Set this here so that if we get a target that refers to a
register variable that's already been used, put_reg_into_stack
knows that it should fix up those uses. */
TREE_USED (slot) = 1;
if (target == 0) if (target == 0)
{ {
if (DECL_RTL (slot) != 0) if (DECL_RTL (slot) != 0)
...@@ -7914,7 +7909,6 @@ expand_expr (exp, target, tmode, modifier) ...@@ -7914,7 +7909,6 @@ expand_expr (exp, target, tmode, modifier)
/* Mark it as expanded. */ /* Mark it as expanded. */
TREE_OPERAND (exp, 1) = NULL_TREE; TREE_OPERAND (exp, 1) = NULL_TREE;
TREE_USED (slot) = 1;
store_expr (exp1, target, 0); store_expr (exp1, target, 0);
expand_decl_cleanup (NULL_TREE, cleanups); expand_decl_cleanup (NULL_TREE, cleanups);
......
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