Fix build with base >= 4.8 && unordered-containers < 0.2.6
commitba6d46f53b98d96825bc57729d98f6abbd17a88f
authorAdam Bergmark <adam@bergmark.nl>
dateWed 23 Mar 2016, 21:50 (11 years ago)
parent16fa373
Data/Aeson/Types/Internal.hs+3
@@ -93,6 +93,9 @@ import Data.Traversable (Traversable(..))
9393#if !MIN_VERSION_unordered_containers(0,2,6)
9494import Data.List (sort)
9595#endif
96+#if MIN_VERSION_base(4,8,0) && !MIN_VERSION_unordered_containers(0,2,6)
97+import Data.Foldable (foldl')
98+#endif
9699
97100-- | Elements of a JSON path used to describe the location of an
98101-- error.