gnss-converters 0.3.7 → 0.3.8

raw patch · 2 files changed

+16/−11 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• gnss-converters.cabal +1/−1
• src/Data/RTCM3/SBP.hs +15/−10

@@ -1,5 +1,5 @@ name: gnss-converters-version: 0.3.7+version: 0.3.8 cabal-version: >=1.22 build-type: Simple license: BSD3

@@ -14,6 +14,7 @@ module Data.RTCM3.SBP   ( toWn   , mjdEpoch+  , convert   , converter   , newStore   , validateIodcIode@@ -207,17 +208,21 @@  -- | Convert an RTCM message into possibly multiple SBP messages. --+convert :: MonadStore e m => RTCM3Msg -> Conduit i m [SBPMsg]+convert = \case+  (RTCM3Msg1002 m _rtcm3) -> Observations.converter m+  (RTCM3Msg1004 m _rtcm3) -> Observations.converter m+  (RTCM3Msg1010 m _rtcm3) -> Observations.converter m+  (RTCM3Msg1012 m _rtcm3) -> Observations.converter m+  (RTCM3Msg1005 m _rtcm3) -> msg1005Converter m+  (RTCM3Msg1006 m _rtcm3) -> msg1006Converter m+  (RTCM3Msg1019 m _rtcm3) -> msg1019Converter m+  _rtcm3Msg               -> mempty++-- | Convert an RTCM message into possibly multiple SBP messages.+-- converter :: MonadStore e m => Conduit RTCM3Msg m [SBPMsg]-converter =-  awaitForever $ \case-    (RTCM3Msg1002 m _rtcm3) -> Observations.converter m-    (RTCM3Msg1004 m _rtcm3) -> Observations.converter m-    (RTCM3Msg1010 m _rtcm3) -> Observations.converter m-    (RTCM3Msg1012 m _rtcm3) -> Observations.converter m-    (RTCM3Msg1005 m _rtcm3) -> msg1005Converter m-    (RTCM3Msg1006 m _rtcm3) -> msg1006Converter m-    (RTCM3Msg1019 m _rtcm3) -> msg1019Converter m-    _rtcm3Msg -> mempty+converter = awaitForever convert  newStore :: IO Store newStore = do