diff options
| author | Joey Hess <joeyh@joeyh.name> | 2016-09-23 17:42:45 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2016-09-23 17:42:45 -0400 |
| commit | 823ebff934cf2e23afae199c24cc599983209438 (patch) | |
| tree | 7588b3693dcff7f3b773ceb68b01eea989ccf250 /Types | |
| parent | c2aa90a92349be09d88270c3ee6d4b7fddbf4768 (diff) | |
| download | keysafe-823ebff934cf2e23afae199c24cc599983209438.tar.gz | |
Added --chaff-max-delay option for slower chaffing.
This commit was sponsored by Jeff Goeke-Smith on Patreon.
Diffstat (limited to 'Types')
| -rw-r--r-- | Types/Cost.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Types/Cost.hs b/Types/Cost.hs index 08f98eb..521d6c1 100644 --- a/Types/Cost.hs +++ b/Types/Cost.hs @@ -14,7 +14,7 @@ data Cost op deriving (Show, Eq, Ord) newtype Seconds = Seconds Rational - deriving (Num, Fractional, Eq, Ord) + deriving (Num, Fractional, Real, RealFrac, Eq, Ord) instance Show Seconds where show (Seconds n) = show (fromRational n :: Double) ++ "s" |