mirror of
https://github.com/github/semantic.git
synced 2025-01-03 13:02:37 +03:00
Define a Listable instance for DiffF.
This commit is contained in:
parent
6c744336a8
commit
a4e98d4318
@ -163,3 +163,6 @@ instance Listable1 f => Listable2 (DiffF f) where
|
||||
|
||||
instance (Listable1 f, Listable a) => Listable1 (DiffF f a) where
|
||||
liftTiers = liftTiers2 tiers
|
||||
|
||||
instance (Listable1 f, Listable a, Listable b) => Listable (DiffF f a b) where
|
||||
tiers = tiers1
|
||||
|
Loading…
Reference in New Issue
Block a user