diff options
author | law <law@138bc75d-0d04-0410-961f-82ee72b054a4> | 1997-10-26 20:33:27 +0000 |
---|---|---|
committer | law <law@138bc75d-0d04-0410-961f-82ee72b054a4> | 1997-10-26 20:33:27 +0000 |
commit | bc7e8dbedd8ead238bacf9f71939451b6f5a3a1d (patch) | |
tree | 88ec44b5f1866a21232e71ea7a665d891e885af5 /gcc/expr.c | |
parent | 5ad6c07998d833d666dd3499625a887a214b73b6 (diff) | |
download | ppe42-gcc-bc7e8dbedd8ead238bacf9f71939451b6f5a3a1d.tar.gz ppe42-gcc-bc7e8dbedd8ead238bacf9f71939451b6f5a3a1d.zip |
* expr.c (expand_expr, case INDIRECT_REF): Optimize a reference
to an element in a constant string.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@16195 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/expr.c')
-rw-r--r-- | gcc/expr.c | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/gcc/expr.c b/gcc/expr.c index 920ffbc2461..5cd1b435780 100644 --- a/gcc/expr.c +++ b/gcc/expr.c @@ -5406,6 +5406,18 @@ expand_expr (exp, target, tmode, modifier) { tree exp1 = TREE_OPERAND (exp, 0); tree exp2; + tree index; + tree string = string_constant (exp1, &index); + int i; + + if (string + && TREE_CODE (string) == STRING_CST + && TREE_CODE (index) == INTEGER_CST + && !TREE_INT_CST_HIGH (index) + && (i = TREE_INT_CST_LOW (index)) < TREE_STRING_LENGTH (string) + && GET_MODE_CLASS (mode) == MODE_INT + && GET_MODE_SIZE (mode) == 1) + return GEN_INT (TREE_STRING_POINTER (string)[i]); op0 = expand_expr (exp1, NULL_RTX, VOIDmode, EXPAND_SUM); op0 = memory_address (mode, op0); |