From 730c54a40681776aaaab1b727af42559cf1592fe Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sun, 7 Aug 2016 19:18:52 -0400 Subject: serialization for tunings --- Types/Cost.hs | 3 +++ 1 file changed, 3 insertions(+) (limited to 'Types') diff --git a/Types/Cost.hs b/Types/Cost.hs index c742848..f880bfe 100644 --- a/Types/Cost.hs +++ b/Types/Cost.hs @@ -11,6 +11,9 @@ data Cost op | CombinedCost (Cost op) (Cost op) deriving (Show) +unknownCost :: Cost op +unknownCost = CPUCost (Seconds 0) + newtype Seconds = Seconds Integer deriving (Num) -- cgit v1.2.3