aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/Data/Array/Mixed.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Data/Array/Mixed.hs b/src/Data/Array/Mixed.hs
index bc392ad..3efa6a3 100644
--- a/src/Data/Array/Mixed.hs
+++ b/src/Data/Array/Mixed.hs
@@ -696,6 +696,8 @@ data HList f list where
HNil :: HList f '[]
HCons :: f a -> HList f l -> HList f (a : l)
infixr 5 `HCons`
+deriving instance (forall a. Show (f a)) => Show (HList f list)
+deriving instance (forall a. Eq (f a)) => Eq (HList f list)
foldHList :: Monoid m => (forall a. f a -> m) -> HList f list -> m
foldHList _ HNil = mempty