Repository : ssh://darcs.haskell.org//srv/darcs/testsuite On branch : master
http://hackage.haskell.org/trac/ghc/changeset/de2c3fe9d43fee26e7f0c3c910c219ce1af30662 >--------------------------------------------------------------- commit de2c3fe9d43fee26e7f0c3c910c219ce1af30662 Author: Simon Marlow <marlo...@gmail.com> Date: Fri Oct 5 11:07:43 2012 +0100 Update to new Cmm syntax >--------------------------------------------------------------- tests/rts/T5423_cmm.cmm | 19 +++++++++++++++---- 1 files changed, 15 insertions(+), 4 deletions(-) diff --git a/tests/rts/T5423_cmm.cmm b/tests/rts/T5423_cmm.cmm index e994478..9be0e15 100644 --- a/tests/rts/T5423_cmm.cmm +++ b/tests/rts/T5423_cmm.cmm @@ -1,5 +1,16 @@ -test { +#include "Cmm.h" +test (W_ r1, + W_ r2, + W_ r3, + W_ r4, + W_ r5, + W_ r6, + W_ r7, + W_ r8, + W_ r9, + W_ r10) + { foreign "C" printf("%d %d %d %d %d %d %d %d %d %d\n", - R1, R2, R3, R4, R5, R6, R7, R8, R9, R10); - RET_N(R10); -} + r1, r2, r3, r4, r5, r6, r7, r8, r9, r10); + return (r10); + } _______________________________________________ Cvs-ghc mailing list Cvs-ghc@haskell.org http://www.haskell.org/mailman/listinfo/cvs-ghc
