projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
A better x86_64 register mapping, with more argument registers.
[ghc-hetmet.git]
/
ghc
/
rts
/
StgCRun.c
diff --git
a/ghc/rts/StgCRun.c
b/ghc/rts/StgCRun.c
index
7597ff2
..
b1e2724
100644
(file)
--- a/
ghc/rts/StgCRun.c
+++ b/
ghc/rts/StgCRun.c
@@
-224,7
+224,7
@@
void StgRunIsImplementedInAssembler(void)
/*
* Set BaseReg
*/
/*
* Set BaseReg
*/
- "movq %%rsi,%%rbx\n\t"
+ "movq %%rsi,%%r13\n\t"
/*
* grab the function argument from the stack, and jump to it.
*/
/*
* grab the function argument from the stack, and jump to it.
*/
@@
-234,7
+234,7
@@
void StgRunIsImplementedInAssembler(void)
".global " STG_RETURN "\n"
STG_RETURN ":\n\t"
".global " STG_RETURN "\n"
STG_RETURN ":\n\t"
- "movq %%r13, %%rax\n\t" /* Return value in R1 */
+ "movq %%rbx, %%rax\n\t" /* Return value in R1 */
/*
* restore callee-saves registers. (Don't stomp on %%rax!)
/*
* restore callee-saves registers. (Don't stomp on %%rax!)