diff options
| author | Jim Wilson <wilson@gcc.gnu.org> | 1994-02-27 16:51:33 -0800 |
|---|---|---|
| committer | Jim Wilson <wilson@gcc.gnu.org> | 1994-02-27 16:51:33 -0800 |
| commit | 340aa7f68ed9e212bb054a04d02a9177f9b98673 (patch) | |
| tree | b0d57a0a1e9cec5df1087e061b452c5c872883cb /gcc | |
| parent | 6be160ff95b3f8788902daed869e12321c48a9f9 (diff) | |
| download | gcc-340aa7f68ed9e212bb054a04d02a9177f9b98673.zip gcc-340aa7f68ed9e212bb054a04d02a9177f9b98673.tar.gz gcc-340aa7f68ed9e212bb054a04d02a9177f9b98673.tar.bz2 | |
((subreg_realpart_p): New function.
(copy_rtx_and_substitute): Use subreg_realpart_p
instead of subreg_lowpart_p for CONCAT.
From-SVN: r6666
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/integrate.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/integrate.c b/gcc/integrate.c index c6ba0e1..17929ec 100644 --- a/gcc/integrate.c +++ b/gcc/integrate.c @@ -2116,7 +2116,7 @@ copy_rtx_and_substitute (orig, map) return gen_rtx (SUBREG, GET_MODE (orig), SUBREG_REG (copy), SUBREG_WORD (orig) + SUBREG_WORD (copy)); else if (GET_CODE (copy) == CONCAT) - return (subreg_lowpart_p (orig) ? XEXP (copy, 0) : XEXP (copy, 1)); + return (subreg_realpart_p (orig) ? XEXP (copy, 0) : XEXP (copy, 1)); else return gen_rtx (SUBREG, GET_MODE (orig), copy, SUBREG_WORD (orig)); |