diff options
Diffstat (limited to 'compiler/codeGen/StgCmmHeap.hs')
| -rw-r--r-- | compiler/codeGen/StgCmmHeap.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/codeGen/StgCmmHeap.hs b/compiler/codeGen/StgCmmHeap.hs index ec0dd05a8e..407a99e571 100644 --- a/compiler/codeGen/StgCmmHeap.hs +++ b/compiler/codeGen/StgCmmHeap.hs @@ -345,7 +345,7 @@ entryHeapCheck cl_info offset nodeSet arity args code setN = case nodeSet of Just n -> mkAssign nodeReg (CmmReg $ CmmLocal n) Nothing -> mkAssign nodeReg $ - CmmLit (CmmLabel $ closureLabelFromCI cl_info) + CmmLit (CmmLabel $ staticClosureLabel cl_info) {- Thunks: Set R1 = node, jump GCEnter1 Function (fast): Set R1 = node, jump GCFun |