summaryrefslogtreecommitdiff
path: root/compiler/vectorise/Vectorise/Builtins/Base.hs
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/vectorise/Vectorise/Builtins/Base.hs')
-rw-r--r--compiler/vectorise/Vectorise/Builtins/Base.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/vectorise/Vectorise/Builtins/Base.hs b/compiler/vectorise/Vectorise/Builtins/Base.hs
index 8456d340fc..8d02b3e1ff 100644
--- a/compiler/vectorise/Vectorise/Builtins/Base.hs
+++ b/compiler/vectorise/Vectorise/Builtins/Base.hs
@@ -156,7 +156,7 @@ sumTyCon = indexBuiltin "sumTyCon" sumTyCons
prodTyCon :: Int -> Builtins -> TyCon
prodTyCon n _
| n >= 2 && n <= mAX_DPH_PROD
- = tupleTyCon Boxed n
+ = tupleTyCon BoxedTuple n
| otherwise
= pprPanic "prodTyCon" (ppr n)