packages feed

geojson 3.0.2 → 3.0.3

raw patch · 2 files changed

+7/−2 lines, 2 filesPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

+ Data.SeqHelper: unique :: Eq a => Seq a -> Seq a
- Data.Geospatial: bbox :: forall a_aJFF. Lens' (GeoFeature a_aJFF) (Maybe BoundingBoxWithoutCRS)
+ Data.Geospatial: bbox :: forall a_aJKa. Lens' (GeoFeature a_aJKa) (Maybe BoundingBoxWithoutCRS)
- Data.Geospatial: boundingbox :: forall a_aLfm. Lens' (GeoFeatureCollection a_aLfm) (Maybe BoundingBoxWithoutCRS)
+ Data.Geospatial: boundingbox :: forall a_aLjR. Lens' (GeoFeatureCollection a_aLjR) (Maybe BoundingBoxWithoutCRS)
- Data.Geospatial: featureId :: forall a_aJFF. Lens' (GeoFeature a_aJFF) (Maybe FeatureID)
+ Data.Geospatial: featureId :: forall a_aJKa. Lens' (GeoFeature a_aJKa) (Maybe FeatureID)
- Data.Geospatial: geofeatures :: forall a_aLfm a_aLhV. Lens (GeoFeatureCollection a_aLfm) (GeoFeatureCollection a_aLhV) (Seq (GeoFeature a_aLfm)) (Seq (GeoFeature a_aLhV))
+ Data.Geospatial: geofeatures :: forall a_aLjR a_aLmq. Lens (GeoFeatureCollection a_aLjR) (GeoFeatureCollection a_aLmq) (Seq (GeoFeature a_aLjR)) (Seq (GeoFeature a_aLmq))
- Data.Geospatial: geometry :: forall a_aJFF. Lens' (GeoFeature a_aJFF) GeospatialGeometry
+ Data.Geospatial: geometry :: forall a_aJKa. Lens' (GeoFeature a_aJKa) GeospatialGeometry
- Data.Geospatial: properties :: forall a_aJFF a_aJN8. Lens (GeoFeature a_aJFF) (GeoFeature a_aJN8) a_aJFF a_aJN8
+ Data.Geospatial: properties :: forall a_aJKa a_aJRD. Lens (GeoFeature a_aJKa) (GeoFeature a_aJRD) a_aJKa a_aJRD
- Data.Geospatial.Internal.GeoFeature: bbox :: forall a_aJFF. Lens' (GeoFeature a_aJFF) (Maybe BoundingBoxWithoutCRS)
+ Data.Geospatial.Internal.GeoFeature: bbox :: forall a_aJKa. Lens' (GeoFeature a_aJKa) (Maybe BoundingBoxWithoutCRS)
- Data.Geospatial.Internal.GeoFeature: featureId :: forall a_aJFF. Lens' (GeoFeature a_aJFF) (Maybe FeatureID)
+ Data.Geospatial.Internal.GeoFeature: featureId :: forall a_aJKa. Lens' (GeoFeature a_aJKa) (Maybe FeatureID)
- Data.Geospatial.Internal.GeoFeature: geometry :: forall a_aJFF. Lens' (GeoFeature a_aJFF) GeospatialGeometry
+ Data.Geospatial.Internal.GeoFeature: geometry :: forall a_aJKa. Lens' (GeoFeature a_aJKa) GeospatialGeometry
- Data.Geospatial.Internal.GeoFeature: properties :: forall a_aJFF a_aJN8. Lens (GeoFeature a_aJFF) (GeoFeature a_aJN8) a_aJFF a_aJN8
+ Data.Geospatial.Internal.GeoFeature: properties :: forall a_aJKa a_aJRD. Lens (GeoFeature a_aJKa) (GeoFeature a_aJRD) a_aJKa a_aJRD
- Data.Geospatial.Internal.GeoFeatureCollection: boundingbox :: forall a_aLfm. Lens' (GeoFeatureCollection a_aLfm) (Maybe BoundingBoxWithoutCRS)
+ Data.Geospatial.Internal.GeoFeatureCollection: boundingbox :: forall a_aLjR. Lens' (GeoFeatureCollection a_aLjR) (Maybe BoundingBoxWithoutCRS)
- Data.Geospatial.Internal.GeoFeatureCollection: geofeatures :: forall a_aLfm a_aLhV. Lens (GeoFeatureCollection a_aLfm) (GeoFeatureCollection a_aLhV) (Seq (GeoFeature a_aLfm)) (Seq (GeoFeature a_aLhV))
+ Data.Geospatial.Internal.GeoFeatureCollection: geofeatures :: forall a_aLjR a_aLmq. Lens (GeoFeatureCollection a_aLjR) (GeoFeatureCollection a_aLmq) (Seq (GeoFeature a_aLjR)) (Seq (GeoFeature a_aLmq))

Files

geojson.cabal view
@@ -1,5 +1,5 @@ name:                   geojson-version:                3.0.2+version:                3.0.3 license:                BSD3 license-file:           LICENCE author:                 Dom De Re@@ -27,7 +27,7 @@ source-repository       this     type:               git     location:           https://github.com/indicatrix/hs-geojson.git-    tag:                3.0.2+    tag:                3.0.3  library     hs-source-dirs:     src
src/Data/SeqHelper.hs view
@@ -8,6 +8,7 @@ module Data.SeqHelper (   sequenceHead   , sequenceTail+  , unique   ) where  import qualified Data.Sequence as Sequence@@ -23,3 +24,7 @@ sequenceTail (_ Sequence.:<| tailS) = tailS sequenceTail _                      = Sequence.empty {-# INLINE sequenceTail #-}++unique :: Eq a => Sequence.Seq a -> Sequence.Seq a+unique Sequence.Empty      = Sequence.empty+unique (x Sequence.:<| xs) = (Sequence.<|) x (unique (Sequence.filter (x /=) xs))