use REMOVE-BEFORE in P2P protocol
Only clusters still need to be fixed to close this todo.
This commit is contained in:
parent
1243af4a18
commit
99b7a0cfe9
5 changed files with 72 additions and 47 deletions
|
@ -5,6 +5,7 @@
|
|||
- License: BSD-2-clause
|
||||
-}
|
||||
|
||||
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
|
||||
{-# LANGUAGE CPP #-}
|
||||
|
||||
module Utility.MonotonicClock where
|
||||
|
@ -19,7 +20,7 @@ import Utility.Exception
|
|||
#endif
|
||||
|
||||
newtype MonotonicTimestamp = MonotonicTimestamp Integer
|
||||
deriving (Show, Eq, Ord)
|
||||
deriving (Show, Eq, Ord, Num)
|
||||
|
||||
-- On linux, this uses a clock that advances while the system is suspended,
|
||||
-- except for on very old kernels (eg 2.6.32).
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue