summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorjakub <jakub@138bc75d-0d04-0410-961f-82ee72b054a4>2007-08-15 12:11:38 +0000
committerjakub <jakub@138bc75d-0d04-0410-961f-82ee72b054a4>2007-08-15 12:11:38 +0000
commit65addc84eaba8fae3218b8745fe60f594e6ddb79 (patch)
tree0a07bf11feda750d266bbefa06abea34c6d07348
parent5b339181bd79211632e0da0c37f37c8ade7906a8 (diff)
downloadppe42-gcc-65addc84eaba8fae3218b8745fe60f594e6ddb79.tar.gz
ppe42-gcc-65addc84eaba8fae3218b8745fe60f594e6ddb79.zip
PR middle-end/33074
* emit-rtl.c (try_split): Use INSN_LIST instead of EXPR_LIST for REG_LIBCALL note. * gfortran.dg/pr33074.f90: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@127511 138bc75d-0d04-0410-961f-82ee72b054a4
-rw-r--r--gcc/ChangeLog6
-rw-r--r--gcc/emit-rtl.c2
-rw-r--r--gcc/testsuite/ChangeLog3
-rw-r--r--gcc/testsuite/gfortran.dg/pr33074.f908
4 files changed, 18 insertions, 1 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 246cd5cbe1e..dd6567a15ea 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,9 @@
+2007-08-15 Jakub Jelinek <jakub@redhat.com>
+
+ PR middle-end/33074
+ * emit-rtl.c (try_split): Use INSN_LIST instead of EXPR_LIST for
+ REG_LIBCALL note.
+
2007-08-14 Daniel Berlin <dberlin@dberlin.org>
* tree-pass.h (PROP_pta): Removed.
diff --git a/gcc/emit-rtl.c b/gcc/emit-rtl.c
index 745a10a851b..6e7230db98c 100644
--- a/gcc/emit-rtl.c
+++ b/gcc/emit-rtl.c
@@ -3274,7 +3274,7 @@ try_split (rtx pat, rtx trial, int last)
/* Relink the insns with REG_LIBCALL note and with REG_RETVAL note
after split. */
REG_NOTES (insn_last)
- = gen_rtx_EXPR_LIST (REG_LIBCALL,
+ = gen_rtx_INSN_LIST (REG_LIBCALL,
XEXP (note, 0),
REG_NOTES (insn_last));
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 45fc15cd363..86abaddf632 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,5 +1,8 @@
2007-08-15 Jakub Jelinek <jakub@redhat.com>
+ PR middle-end/33074
+ * gfortran.dg/pr33074.f90: New test.
+
PR c++/32992
* g++.dg/opt/nrv14.C: New test.
diff --git a/gcc/testsuite/gfortran.dg/pr33074.f90 b/gcc/testsuite/gfortran.dg/pr33074.f90
new file mode 100644
index 00000000000..3538d6588c4
--- /dev/null
+++ b/gcc/testsuite/gfortran.dg/pr33074.f90
@@ -0,0 +1,8 @@
+! PR middle-end/33074
+! { dg-do compile }
+! { dg-options "-O" }
+
+subroutine pr33074(a, w)
+ real a(1), w(1)
+ a(1) = 2.0**int(w(1))
+end
OpenPOWER on IntegriCloud