vectoriser: follow changes in mkClass

[ghc-hetmet.git] / compiler / vectorise / Vectorise / Type / PADict.hs

diff --git a/compiler/vectorise/Vectorise/Type/PADict.hs b/compiler/vectorise/Vectorise/Type/PADict.hs
index 6b67f66..8b6ad92 100644 (file)
--- a/compiler/vectorise/Vectorise/Type/PADict.hs
+++ b/compiler/vectorise/Vectorise/Type/PADict.hs
@@ -60,6 +60,7 @@ buildPADict vect_tc prepr_tc arr_tc repr
                        tvs             -- tyvars of class
                        []              -- fundeps
                        []              -- superclass predicates
+                       0               -- number of equalities
                        []              -- superclass dict selectors
                        []              -- associated type families
                        pa_opitems      -- class op items