From 697073d938614f9285bf9e9ffc5c53d657d9677e Mon Sep 17 00:00:00 2001 From: Jason Merrill Date: Fri, 22 May 1998 20:58:14 +0000 Subject: [PATCH] fold-const.c (ssize_binop): New fn. * fold-const.c (ssize_binop): New fn. * tree.h: Declare it. From-SVN: r19963 --- gcc/ChangeLog | 5 +++++ gcc/fold-const.c | 34 ++++++++++++++++++++++++++++++++++ gcc/tree.h | 1 + 3 files changed, 40 insertions(+) diff --git a/gcc/ChangeLog b/gcc/ChangeLog index 1566492fac4..4b21e905eb5 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,8 @@ +1998-05-22 Jason Merrill + + * fold-const.c (ssize_binop): New fn. + * tree.h: Declare it. + Fri May 22 03:42:05 1998 Richard Earnshaw (rearnsha@arm.com) * genextract.c (print_path): Handle zero-length path as a special diff --git a/gcc/fold-const.c b/gcc/fold-const.c index c47f80a7b68..9d1cb36458d 100644 --- a/gcc/fold-const.c +++ b/gcc/fold-const.c @@ -1489,6 +1489,40 @@ size_binop (code, arg0, arg1) return fold (build (code, sizetype, arg0, arg1)); } + +/* Combine operands OP1 and OP2 with arithmetic operation CODE. + CODE is a tree code. Data type is taken from `ssizetype', + If the operands are constant, so is the result. */ + +tree +ssize_binop (code, arg0, arg1) + enum tree_code code; + tree arg0, arg1; +{ + /* Handle the special case of two integer constants faster. */ + if (TREE_CODE (arg0) == INTEGER_CST && TREE_CODE (arg1) == INTEGER_CST) + { + /* And some specific cases even faster than that. */ + if (code == PLUS_EXPR && integer_zerop (arg0)) + return arg1; + else if ((code == MINUS_EXPR || code == PLUS_EXPR) + && integer_zerop (arg1)) + return arg0; + else if (code == MULT_EXPR && integer_onep (arg0)) + return arg1; + + /* Handle general case of two integer constants. We convert + arg0 to ssizetype because int_const_binop uses its type for the + return value. */ + arg0 = convert (ssizetype, arg0); + return int_const_binop (code, arg0, arg1, 0, 0); + } + + if (arg0 == error_mark_node || arg1 == error_mark_node) + return error_mark_node; + + return fold (build (code, ssizetype, arg0, arg1)); +} /* Given T, a tree representing type conversion of ARG1, a constant, return a constant tree representing the result of conversion. */ diff --git a/gcc/tree.h b/gcc/tree.h index 440c6645f48..6320077f23b 100644 --- a/gcc/tree.h +++ b/gcc/tree.h @@ -1484,6 +1484,7 @@ extern tree convert PROTO((tree, tree)); extern tree size_in_bytes PROTO((tree)); extern HOST_WIDE_INT int_size_in_bytes PROTO((tree)); extern tree size_binop PROTO((enum tree_code, tree, tree)); +extern tree ssize_binop PROTO((enum tree_code, tree, tree)); extern tree size_int_wide PROTO((unsigned HOST_WIDE_INT, unsigned HOST_WIDE_INT, int)); #define size_int(L) size_int_2 ((L), 0, 0) -- 2.30.2