diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2022-01-27 13:15:49 -0500 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2022-02-04 16:14:47 -0500 |
| commit | 58d7faacafc975d522cbc9f56a7db1e46b37d4a1 (patch) | |
| tree | 2ed5935efe8bc01decb21b848447cdcfb13652a9 /compiler/GHC/Cmm/LayoutStack.hs | |
| parent | b79206f1add1c9e9a88f1cc9e2d2c47be9bfea3e (diff) | |
| download | haskell-58d7faacafc975d522cbc9f56a7db1e46b37d4a1.tar.gz | |
cmm: Introduce cmmLoadBWord and cmmLoadGCWord
Diffstat (limited to 'compiler/GHC/Cmm/LayoutStack.hs')
| -rw-r--r-- | compiler/GHC/Cmm/LayoutStack.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/Cmm/LayoutStack.hs b/compiler/GHC/Cmm/LayoutStack.hs index 1bd00ed65a..f23af80d7e 100644 --- a/compiler/GHC/Cmm/LayoutStack.hs +++ b/compiler/GHC/Cmm/LayoutStack.hs @@ -1164,7 +1164,7 @@ lowerSafeForeignCall profile block -- different. Hence we continue by jumping to the top stack frame, -- not by jumping to succ. jump = CmmCall { cml_target = entryCode platform $ - CmmLoad spExpr (bWord platform) + cmmLoadBWord platform spExpr , cml_cont = Just succ , cml_args_regs = regs , cml_args = widthInBytes (wordWidth platform) |