@@ -21,7 +21,7 @@ module Network.Wai.Handler.Warp.Timeout (
2121#if MIN_VERSION_base(4,6,0)
2222import Control.Concurrent (mkWeakThreadId, ThreadId)
2323#else
24−import Control.Concurrent (ThreadId(..))
24+import GHC.Conc (ThreadId(..))
2525import GHC.Exts (mkWeak#)
2626import GHC.IO (IO (IO))
2727#endif