vectoriser: adapt to new superclass story part I (dictionary construction)

[ghc-hetmet.git] / compiler / vectorise / Vectorise / Builtins / Base.hs

diff --git a/compiler/vectorise/Vectorise/Builtins/Base.hs b/compiler/vectorise/Vectorise/Builtins/Base.hs
index 8e22070..5e4d47d 100644 (file)
--- a/compiler/vectorise/Vectorise/Builtins/Base.hs
+++ b/compiler/vectorise/Vectorise/Builtins/Base.hs
@@ -63,6 +63,7 @@ data Builtins
         , pdataTyCon       :: TyCon                    -- ^ PData
         , paTyCon          :: TyCon                    -- ^ PA
         , paDataCon        :: DataCon                  -- ^ PA
+        , paPRSel          :: Var                       -- ^ PA
         , preprTyCon       :: TyCon                    -- ^ PRepr
         , prTyCon          :: TyCon                    -- ^ PR
         , prDataCon        :: DataCon                  -- ^ PR