labsat 0.0.3 → 0.0.4

raw patch · 3 files changed

+5/−5 lines, 3 files

Files

labsat.cabal +1/−1
src/Labsat.hs +1/−1
src/Labsat/Ctx.hs +3/−3

labsat.cabal view

@@ -1,5 +1,5 @@ name:                  labsat-version:               0.0.3+version:               0.0.4 synopsis:              LabSat TCP Interface Wrapper description:           labsat provides a wrapper around the LabSat3 TCP interface homepage:              https://github.com/swift-nav/labsat

src/Labsat.hs view

@@ -88,7 +88,7 @@ command c p = do   delay <- view lsDelay   sendCmd c-  traverse_ threadDelay delay+  traverse_ (threadDelay . (*1000000)) delay   receiveResp $ parseCommandAck c *> p  -- | Send a command and parse for OK and the prompt

src/Labsat/Ctx.hs view

@@ -10,11 +10,11 @@  data LabsatCtx = LabsatCtx   { _lsStatsCtx  :: StatsCtx-  -- ^ Parent context+  -- ^ Parent context.   , _lsAppData   :: AppData-  -- ^ AppData for runGeneralTCPClient+  -- ^ AppData for runGeneralTCPClient.   , _lsDelay     :: Maybe Int-  -- ^ Command delay+  -- ^ Command delay (seconds).   }  $(makeClassyConstraints ''LabsatCtx [''HasStatsCtx])