Skip to content

GitLab

Commit 96364859 authored by simonmar's avatar simonmar
Browse files

[project @ 2005-04-27 09:54:26 by simonmar] 

Fix the volatile regs to the suspendThread call
parent 03d63424
Hide whitespace changes
Inline Side-by-side
ghc/compiler/codeGen/CgForeignCall.hs
View file @ 96364859
...@@ -80,7 +80,7 @@ emitForeignCall results (CCall (CCallSpec target cconv safety)) args live ...@@ -80,7 +80,7 @@ emitForeignCall results (CCall (CCallSpec target cconv safety)) args live
emitSaveThreadState emitSaveThreadState
stmtC (CmmCall (CmmForeignCall suspendThread CCallConv) [(id,NoHint)] stmtC (CmmCall (CmmForeignCall suspendThread CCallConv) [(id,NoHint)]
[ (CmmReg (CmmGlobal BaseReg), PtrHint) ] [ (CmmReg (CmmGlobal BaseReg), PtrHint) ]
Nothing{-save all; ToDo-} (Just vols)
) )
stmtC (the_call vols) stmtC (the_call vols)
stmtC (CmmCall (CmmForeignCall resumeThread CCallConv) [] stmtC (CmmCall (CmmForeignCall resumeThread CCallConv) []
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment