From 823ebff934cf2e23afae199c24cc599983209438 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Fri, 23 Sep 2016 17:42:45 -0400 Subject: Added --chaff-max-delay option for slower chaffing. This commit was sponsored by Jeff Goeke-Smith on Patreon. --- Types/Cost.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Types') 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" -- cgit v1.2.3