Commit a9eda064 authored by Michael D. Adams's avatar Michael D. Adams
Browse files

Fixed CPS to account for info tables not being next to code

parent 0c1341d3
......@@ -17,6 +17,7 @@ import CmmCallConv
import CgProf (curCCS, curCCSAddr)
import CgUtils (cmmOffsetW)
import CgInfoTbls (entryCode)
import SMRep
import ForeignCall
......@@ -178,7 +179,7 @@ continuationToProc (max_stack, update_frame_size, formats) stack_use uniques
FinalSwitch expr targets -> [CmmSwitch expr targets]
FinalReturn arguments ->
tail_call curr_stack
(CmmLoad (CmmReg spReg) wordRep)
(entryCode (CmmLoad (CmmReg spReg) wordRep))
arguments
FinalJump target arguments ->
tail_call curr_stack target arguments
......
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