summaryrefslogtreecommitdiff
path: root/compiler/vectorise
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/vectorise')
-rw-r--r--compiler/vectorise/Vectorise/Type/Classify.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/vectorise/Vectorise/Type/Classify.hs b/compiler/vectorise/Vectorise/Type/Classify.hs
index 55eb459e8e..07d8b1fa34 100644
--- a/compiler/vectorise/Vectorise/Type/Classify.hs
+++ b/compiler/vectorise/Vectorise/Type/Classify.hs
@@ -120,5 +120,5 @@ tyConsOfTypes = unionManyUniqSets . map tyConsOfType
--
tyConsOfType :: Type -> UniqSet TyCon
tyConsOfType ty = filterUniqSet not_tuple_or_unlifted $ Type.tyConsOfType ty
- where not_tuple_or_unlifted tc = not (isUnLiftedTyCon tc || isTupleTyCon tc)
+ where not_tuple_or_unlifted tc = not (isUnliftedTyCon tc || isTupleTyCon tc)