@@ -21,7 +21,7 @@ module Network.Wai.Handler.Warp.Timeout (
21#if MIN_VERSION_base(4,6,0)
21#if MIN_VERSION_base(4,6,0)
22import Control.Concurrent (mkWeakThreadId, ThreadId)
22import Control.Concurrent (mkWeakThreadId, ThreadId)
24−import Control.Concurrent (ThreadId(..))
24+import GHC.Conc (ThreadId(..))
25import GHC.Exts (mkWeak#)
25import GHC.Exts (mkWeak#)
26import GHC.IO (IO (IO))
26import GHC.IO (IO (IO))