diff options
Diffstat (limited to 'compiler/GHC/Tc/TyCl.hs')
| -rw-r--r-- | compiler/GHC/Tc/TyCl.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/Tc/TyCl.hs b/compiler/GHC/Tc/TyCl.hs index 31da54dca7..ac5e336e65 100644 --- a/compiler/GHC/Tc/TyCl.hs +++ b/compiler/GHC/Tc/TyCl.hs @@ -4669,7 +4669,7 @@ checkValidClass cls -- Test case: rep-poly/RepPolyClassMethod. ; unless constrained_class_methods $ - mapM_ check_constraint (tail (cls_pred:op_theta)) + mapM_ check_constraint op_theta ; check_dm ctxt sel_id cls_pred tau2 dm } |