summaryrefslogtreecommitdiff
path: root/testsuite
diff options
context:
space:
mode:
authorSimon Marlow <marlowsd@gmail.com>2012-10-08 10:46:54 +0100
committerSimon Marlow <marlowsd@gmail.com>2012-10-08 10:46:54 +0100
commit5f48b24b303326599147223c64b10b0cfb016a48 (patch)
treeffe98ec06b2f08fa1c3c8ec63f4d8bfe90270a33 /testsuite
parent7c96e85edcd175ec45627cda7c3a540260bad333 (diff)
downloadhaskell-5f48b24b303326599147223c64b10b0cfb016a48.tar.gz
Need to use high-level cmm here (fixes test on x86)
Diffstat (limited to 'testsuite')
-rw-r--r--testsuite/tests/codeGen/should_run/5149_cmm.cmm10
1 files changed, 1 insertions, 9 deletions
diff --git a/testsuite/tests/codeGen/should_run/5149_cmm.cmm b/testsuite/tests/codeGen/should_run/5149_cmm.cmm
index cd748ea8a8..567699c3ee 100644
--- a/testsuite/tests/codeGen/should_run/5149_cmm.cmm
+++ b/testsuite/tests/codeGen/should_run/5149_cmm.cmm
@@ -6,16 +6,8 @@ g5149
}
/* This code is carefully arranged to tickle the bug reported in #5149 */
-f5149
+f5149 (W_ x, W_ y, D_ z)
{
- D_ z;
-
- z = D1;
-
- W_ x,y;
- x = R1;
- y = R2;
-
if (x > y) {
goto a; /* this jump is shortcutted to g5149 */
} else {