diff --git a/mono-traversable-instances/ChangeLog.md b/mono-traversable-instances/ChangeLog.md index b8066f30..f8013990 100644 --- a/mono-traversable-instances/ChangeLog.md +++ b/mono-traversable-instances/ChangeLog.md @@ -1,3 +1,9 @@ +# Changelog for mono-traversable-instances + +## 0.1.1.0 + +* Support dlist 1.0 + ## 0.1.0.0 * Initial release diff --git a/mono-traversable-instances/package.yaml b/mono-traversable-instances/package.yaml index 5969e7f4..83df8e8e 100644 --- a/mono-traversable-instances/package.yaml +++ b/mono-traversable-instances/package.yaml @@ -1,5 +1,5 @@ name: mono-traversable-instances -version: 0.1.0.0 +version: 0.1.1.0 synopsis: Extra typeclass instances for mono-traversable description: See docs and README at category: Data @@ -18,7 +18,7 @@ dependencies: - semigroupoids >=3.0 - comonad >=3.0.3 - vector-instances -- dlist >=0.6 && <1.0 +- dlist >=0.6 && <1.1 - dlist-instances ==0.1.* - transformers - semigroups diff --git a/mono-traversable-instances/src/Data/MonoTraversable/Instances.hs b/mono-traversable-instances/src/Data/MonoTraversable/Instances.hs index e9e34d6c..d95b2dbe 100644 --- a/mono-traversable-instances/src/Data/MonoTraversable/Instances.hs +++ b/mono-traversable-instances/src/Data/MonoTraversable/Instances.hs @@ -66,7 +66,11 @@ instance SemiSequence (DList a) where instance IsSequence (DList a) where fromList = DL.fromList replicate = DL.replicate +#if MIN_VERSION_dlist(1,0,0) + tailEx = DL.fromList . DL.tail +#else tailEx = DL.tail +#endif {-# INLINE fromList #-} {-# INLINE replicate #-} {-# INLINE tailEx #-}