diff options
| author | John David Anglin <dave.anglin@nrc-cnrc.gc.ca> | 2007-09-28 00:54:29 +0000 |
|---|---|---|
| committer | John David Anglin <dave.anglin@nrc-cnrc.gc.ca> | 2007-09-28 00:54:29 +0000 |
| commit | ee84e211439b3dbbd4c358f1de992eeb82795c65 (patch) | |
| tree | 0eefe5eeb98aeb981e791a8a1b3ea83fc7bec38d /gcc | |
| parent | b40fa4127985d97fc2c14d713f4d09ddd5ab856b (diff) | |
PR middle-end/33436
* expr.c (emit_group_load_1): Split constant double when destination
length is half source length.
git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@128855 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ChangeLog | 6 | ||||
| -rw-r--r-- | gcc/expr.c | 21 |
2 files changed, 25 insertions, 2 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog index bdb9d2237cd..42ace4ab0df 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,9 @@ +2007-09-27 John David Anglin <dave.anglin@nrc-cnrc.gc.ca> + + PR middle-end/33436 + * expr.c (emit_group_load_1): Split constant double when destination + length is half source length. + 2007-09-27 Richard Sandiford <rsandifo@nildram.co.uk> * config/mips/mips.h (PTF_AVOID_BRANCHLIKELY): New macro. diff --git a/gcc/expr.c b/gcc/expr.c index ff3258d746e..9d2a61ad782 100644 --- a/gcc/expr.c +++ b/gcc/expr.c @@ -1776,8 +1776,25 @@ emit_group_load_1 (rtx *tmps, rtx dst, rtx orig_src, tree type, int ssize) else if (CONSTANT_P (src) && GET_MODE (dst) != BLKmode && XVECLEN (dst, 0) > 1) tmps[i] = simplify_gen_subreg (mode, src, GET_MODE(dst), bytepos); - else if (CONSTANT_P (src) - || (REG_P (src) && GET_MODE (src) == mode)) + else if (CONSTANT_P (src)) + { + HOST_WIDE_INT len = (HOST_WIDE_INT) bytelen; + + if (len == ssize) + tmps[i] = src; + else + { + rtx first, second; + + gcc_assert (2 * len == ssize); + split_double (src, &first, &second); + if (i) + tmps[i] = second; + else + tmps[i] = first; + } + } + else if (REG_P (src) && GET_MODE (src) == mode) tmps[i] = src; else tmps[i] = extract_bit_field (src, bytelen * BITS_PER_UNIT, |