diff options
| -rw-r--r-- | compiler/cmm/CmmLayoutStack.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/compiler/cmm/CmmLayoutStack.hs b/compiler/cmm/CmmLayoutStack.hs index 5c4045778a..de9f35a798 100644 --- a/compiler/cmm/CmmLayoutStack.hs +++ b/compiler/cmm/CmmLayoutStack.hs @@ -258,6 +258,7 @@ collectContInfo blocks where (mb_argss, ret_offs) = mapAndUnzip get_cont blocks + get_cont :: Block CmmNode x C -> (Maybe (Label, ByteOff), ByteOff) get_cont b = case lastNode b of CmmCall { cml_cont = Just l, .. } |