Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : master
http://hackage.haskell.org/trac/ghc/changeset/4ff3a642fbb61cf329d468993e9f732940f9f680 >--------------------------------------------------------------- commit 4ff3a642fbb61cf329d468993e9f732940f9f680 Author: Ben Gamari <bgamari.f...@gmail.com> Date: Sat Jan 28 16:55:04 2012 -0500 Fix register clobber list in StgRun for ARM The ARM implementation of StgRun does not claim that it clobbers r7-r12. As a result, the compiler will sometimes put the returned RegTable in one of these registers, resulting in an invalid RegTable to be returned. Hilarity ensues. Signed-off-by: Ben Gamari <bgamari.f...@gmail.com> >--------------------------------------------------------------- rts/StgCRun.c | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/rts/StgCRun.c b/rts/StgCRun.c index c302efb..8fcb550 100644 --- a/rts/StgCRun.c +++ b/rts/StgCRun.c @@ -672,7 +672,7 @@ StgRun(StgFunPtr f, StgRegTable *basereg) { "ldmfd sp!, {r4-r10, fp, ip, lr}\n\t" : "=r" (r) : "r" (f), "r" (basereg), "i" (RESERVED_C_STACK_BYTES) - : + : "%r4", "%r5", "%r6", "%r8", "%r9", "%r10", "%fp", "%ip", "%lr" ); return r; } _______________________________________________ Cvs-ghc mailing list Cvs-ghc@haskell.org http://www.haskell.org/mailman/listinfo/cvs-ghc
