From 099287255140d04e46d3403e3528d7a050dc0121 Mon Sep 17 00:00:00 2001 From: ross Date: Tue, 12 Oct 2004 17:45:44 +0000 Subject: [PATCH] [project @ 2004-10-12 17:45:44 by ross] unused line --- System/Time.hsc | 1 - 1 file changed, 1 deletion(-) diff --git a/System/Time.hsc b/System/Time.hsc index 6b59353..d884e87 100644 --- a/System/Time.hsc +++ b/System/Time.hsc @@ -643,7 +643,6 @@ show2' x where x' = x `rem` 100 show3 x = show (x `quot` 100) ++ show2 (x `rem` 100) - where x' = x `rem` 1000 to12 :: Int -> Int to12 h = let h' = h `mod` 12 in if h' == 0 then 12 else h' -- 1.7.10.4