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 59ceba8706..acd2aee5f4 100644 --- a/compiler/codeGen/StgCmm.hs +++ b/compiler/codeGen/StgCmm.hs @@ -45,7 +45,7 @@ import Module import Outputable import Stream import BasicTypes -import VarSet ( isEmptyVarSet ) +import VarSet ( isEmptyDVarSet ) import OrdList import MkGraph @@ -156,7 +156,7 @@ cgTopRhs dflags _rec bndr (StgRhsCon _cc con args) -- see Note [Post-unarisation invariants] in UnariseStg cgTopRhs dflags rec bndr (StgRhsClosure fvs cc upd_flag args body) - = ASSERT(isEmptyVarSet fvs) -- There should be no free variables + = ASSERT(isEmptyDVarSet fvs) -- There should be no free variables cgTopRhsClosure dflags rec bndr cc upd_flag args body |