diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2020-04-17 16:11:36 +0000 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2020-04-17 16:11:36 +0000 |
| commit | 75093e219f059a57ee4358eb3e787ff87d7fec13 (patch) | |
| tree | 31637284955e4e4f1be3c163db74090bfb0f5c9c | |
| parent | 74af4ca81c37b72429536a3a81fe6b42b6e17a1f (diff) | |
| download | haskell-75093e219f059a57ee4358eb3e787ff87d7fec13.tar.gz | |
Fix warning
| -rw-r--r-- | compiler/GHC/StgToCmm/Closure.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/StgToCmm/Closure.hs b/compiler/GHC/StgToCmm/Closure.hs index 954e6d5490..8ab4fa6b0f 100644 --- a/compiler/GHC/StgToCmm/Closure.hs +++ b/compiler/GHC/StgToCmm/Closure.hs @@ -626,7 +626,7 @@ getCallMethod _ _name _ LFLetNoEscape _n_args _v_args (LneLoc blk_id lne_regs) _self_loop_info = JumpToIt blk_id lne_regs -getCallMethod _ name _ lf_info _ _ _ _ = pprPanic "Unknown call method" (ppr name) +getCallMethod _ name _ _lf_info _ _ _ _ = pprPanic "Unknown call method" (ppr name) ----------------------------------------------------------------------------- -- Data types for closure information |