diff options
Diffstat (limited to 'compiler/codeGen/StgCmm.hs')
| -rw-r--r-- | compiler/codeGen/StgCmm.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/codeGen/StgCmm.hs b/compiler/codeGen/StgCmm.hs index 60be1ca01b..5b80ba61d9 100644 --- a/compiler/codeGen/StgCmm.hs +++ b/compiler/codeGen/StgCmm.hs @@ -153,9 +153,9 @@ cgTopRhs dflags _rec bndr (StgRhsCon _cc con args) -- con args are always non-void, -- see Note [Post-unarisation invariants] in UnariseStg -cgTopRhs dflags rec bndr (StgRhsClosure cc bi fvs upd_flag args body) +cgTopRhs dflags rec bndr (StgRhsClosure cc fvs upd_flag args body) = ASSERT(null fvs) -- There should be no free variables - cgTopRhsClosure dflags rec bndr cc bi upd_flag args body + cgTopRhsClosure dflags rec bndr cc upd_flag args body --------------------------------------------------------------- |