sbp 2.2.10 → 2.2.11

raw patch · 3 files changed

+12/−12 lines, 3 files

Files

• README.md +1/−1
• sbp.cabal +1/−1
• src/SwiftNav/SBP/TH.hs +10/−10

@@ -17,7 +17,7 @@  or -    $ stack install --resolver lts-8.22 sbp # (LTS-8)+    $ stack install --resolver lts-8.23 sbp # (LTS-8)  Note that we explicitly specify the resolvers to use, as installing `libsbp` may fail to build with more recent resolvers.

@@ -1,5 +1,5 @@ name: sbp-version: 2.2.10+version: 2.2.11 cabal-version: >=1.22 build-type: Simple license: LGPL-3

@@ -16,14 +16,14 @@   , makeJSON   ) where -import BasicPrelude         hiding (length)-import Control.Lens-import Data.Aeson.TH-import Data.Binary-import Data.ByteString-import Data.ByteString.Lazy hiding (length)-import Language.Haskell.TH-import SwiftNav.SBP.Types+import           BasicPrelude+import           Control.Lens+import           Data.Aeson.TH+import           Data.Binary+import qualified Data.ByteString      as BS+import qualified Data.ByteString.Lazy as LBS+import           Language.Haskell.TH+import           SwiftNav.SBP.Types  -- | Derive ToSBP typeclass, given an SBP message type name and the -- name of the implemented type.@@ -32,8 +32,8 @@   [d|instance ToSBP $(conT name) where        toSBP m senderID = encoded & msgSBPCrc .~ checkCrc encoded          where-           payload = toStrict $ encode m-           len     = fromIntegral $ length payload+           payload = LBS.toStrict $ encode m+           len     = fromIntegral $ BS.length payload            encoded = Msg $(varE msgType) senderID len (Bytes payload) 0     |]