X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=System%2FTimeout.hs;h=431f709a259273857669de2704c40f6384c78ab5;hb=1fc945f3ff888665d92152963dba851726c6d529;hp=f27a936ed29edb9a984c7088bd40c8ccde5c3a3b;hpb=af97ffa5afc916cbe7fde22de3e2738458d85629;p=ghc-base.git diff --git a/System/Timeout.hs b/System/Timeout.hs index f27a936..431f709 100644 --- a/System/Timeout.hs +++ b/System/Timeout.hs @@ -27,7 +27,6 @@ import Control.Concurrent (forkIO, threadDelay, myThreadId, killThread) import Control.Exception (Exception, handleJust, throwTo, bracket) import Data.Typeable import Data.Unique (Unique, newUnique) -import GHC.Num -- An internal type that is thrown as a dynamic exception to -- interrupt the running IO computation when the timeout has