Repository : ssh://darcs.haskell.org//srv/darcs/testsuite On branch : master
http://hackage.haskell.org/trac/ghc/changeset/0883e9bf80a62bf2379114cfa3f4060aef86622e >--------------------------------------------------------------- commit 0883e9bf80a62bf2379114cfa3f4060aef86622e Author: Ian Lynagh <[email protected]> Date: Thu Aug 4 14:20:37 2011 +0100 Fix test 5149 on an unreg compiler We were getting: /tmp/ghc12457_0/ghc12457_0.hc: In function âf5149â: /tmp/ghc12457_0/ghc12457_0.hc:20:0: error: âg5149â undeclared (first use in this function) >--------------------------------------------------------------- tests/codeGen/should_run/5149_cmm.cmm | 9 +++++---- 1 files changed, 5 insertions(+), 4 deletions(-) diff --git a/tests/codeGen/should_run/5149_cmm.cmm b/tests/codeGen/should_run/5149_cmm.cmm index b1e3dd6..eebf964 100644 --- a/tests/codeGen/should_run/5149_cmm.cmm +++ b/tests/codeGen/should_run/5149_cmm.cmm @@ -1,5 +1,10 @@ #include "Cmm.h" +g5149 +{ + jump %ENTRY_CODE(Sp(0)); +} + /* This code is carefully arranged to tickle the bug reported in #5149 */ f5149 { @@ -23,7 +28,3 @@ f5149 RET_N(TO_W_(%f2i32(z))); } -g5149 -{ - jump %ENTRY_CODE(Sp(0)); -}
_______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
