crdt 6.0 → 6.1
raw patch · 2 files changed
+4/−5 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- crdt.cabal +2/−2
- lib/CRDT/LamportClock.hs +2/−3
crdt.cabal view
@@ -2,10 +2,10 @@ -- -- see: https://github.com/sol/hpack ----- hash: 301e6350a3e473eacf8f9bbfbebaea6cb6c981e059849c0e4c7d68afd35cfe40+-- hash: 23bb86a0781bcb24463115698ce7fa54478558dc1e341c509ce2db3b2f5a71d7 name: crdt-version: 6.0+version: 6.1 synopsis: Conflict-free replicated data types description: Definitions of CmRDT and CvRDT. Implementations for some classic CRDTs. category: Distributed Systems
lib/CRDT/LamportClock.hs view
@@ -30,8 +30,7 @@ import Data.Map.Strict (Map) import qualified Data.Map.Strict as Map import Data.Maybe (fromMaybe)-import Data.Time (getCurrentTime)-import Data.Time.Clock.POSIX (utcTimeToPOSIXSeconds)+import Data.Time.Clock.POSIX (getPOSIXTime) import Data.Word (Word64) import Network.Info (MAC (MAC), getNetworkInterfaces, mac) import Numeric (showHex)@@ -76,7 +75,7 @@ in (lt', Map.insert pid lt' m) getRealLocalTime :: IO LocalTime-getRealLocalTime = round . (* 10 ^ 7) . utcTimeToPOSIXSeconds <$> getCurrentTime+getRealLocalTime = round . (* 10000000) <$> getPOSIXTime getPidByMac :: IO Pid getPidByMac = Pid . decodeMac <$> getMac