diff options
Diffstat (limited to 'compiler/GHC/Tc/Deriv/Utils.hs')
| -rw-r--r-- | compiler/GHC/Tc/Deriv/Utils.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/GHC/Tc/Deriv/Utils.hs b/compiler/GHC/Tc/Deriv/Utils.hs index aa89f94c4b..f28ad0e8f4 100644 --- a/compiler/GHC/Tc/Deriv/Utils.hs +++ b/compiler/GHC/Tc/Deriv/Utils.hs @@ -989,8 +989,8 @@ cond_stdOK deriv_ctxt permissive dflags InferContext wildcard | null data_cons -- 1. , not permissive - -> checkFlag LangExt.EmptyDataDeriving dflags dit `orValid` - NotValid (no_cons_why rep_tc) + , not (xopt LangExt.EmptyDataDeriving dflags) + -> NotValid (no_cons_why rep_tc) | not (null con_whys) -> NotValid $ DerivErrBadConstructor (Just $ has_wildcard wildcard) con_whys | otherwise |