summaryrefslogtreecommitdiff
path: root/libraries/base/System/Timeout.hs
diff options
context:
space:
mode:
Diffstat (limited to 'libraries/base/System/Timeout.hs')
-rw-r--r--libraries/base/System/Timeout.hs4
1 files changed, 3 insertions, 1 deletions
diff --git a/libraries/base/System/Timeout.hs b/libraries/base/System/Timeout.hs
index f3081e7082..3cca893c4d 100644
--- a/libraries/base/System/Timeout.hs
+++ b/libraries/base/System/Timeout.hs
@@ -58,7 +58,9 @@ instance Exception Timeout where
-- is available within @n@ microseconds (@1\/10^6@ seconds). In case a result
-- is available before the timeout expires, @Just a@ is returned. A negative
-- timeout interval means \"wait indefinitely\". When specifying long timeouts,
--- be careful not to exceed @maxBound :: Int@.
+-- be careful not to exceed @maxBound :: Int@, which on 32-bit machines is only
+-- 2147483647 μs, less than 36 minutes.
+-- Consider using @Control.Concurrent.Timeout.timeout@ from @unbounded-delays@ package.
--
-- >>> timeout 1000000 (threadDelay 1000 *> pure "finished on time")
-- Just "finished on time"