projects
/
ghc-hetmet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(from parent 1:
f13f904
)
[project @ 2005-05-05 11:33:10 by simonmar]
author
simonmar
<unknown>
Thu, 5 May 2005 11:33:10 +0000
(11:33 +0000)
committer
simonmar
<unknown>
Thu, 5 May 2005 11:33:10 +0000
(11:33 +0000)
AP_STACK fix for SMP
ghc/rts/Apply.cmm
patch
|
blob
|
history
diff --git
a/ghc/rts/Apply.cmm
b/ghc/rts/Apply.cmm
index
e4197ec
..
c627995
100644
(file)
--- a/
ghc/rts/Apply.cmm
+++ b/
ghc/rts/Apply.cmm
@@
-264,7
+264,7
@@
INFO_TABLE(stg_AP_STACK,/*special layout*/0,0,AP_STACK,"AP_STACK","AP_STACK")
// Reload the stack
W_ i;
W_ p;
- p = ap + SIZEOF_StgHeader + OFFSET_StgAP_STACK_payload;
+ p = ap + SIZEOF_StgThunkHeader + OFFSET_StgAP_STACK_payload;
i = 0;
for:
if (i < Words) {