diff options
author | Ben Gamari <bgamari.foss@gmail.com> | 2018-05-30 20:39:12 -0400 |
---|---|---|
committer | Ben Gamari <ben@smart-cactus.org> | 2018-05-30 22:05:37 -0400 |
commit | 21a9fb5ff3714addf28dbe270af5d10640d89ad9 (patch) | |
tree | 72197284de8cfb0b130899628be3a899e3b9f481 /compiler/main/SysTools.hs | |
parent | d1beebb881722109d6935941e541eb175a9d6c62 (diff) | |
download | haskell-21a9fb5ff3714addf28dbe270af5d10640d89ad9.tar.gz |
base/TimerManager: Clamp timer expiration time to maxBound
Previously we would allow the expiration time to overflow, which in
practice meant that `threadDelay maxBound` we return far earlier than
circa 2500 CE. For now we fix this by simply clamping to maxBound.
Fixes #15158.
Test Plan: Validate, run T8089
Reviewers: simonmar, hvr
Reviewed By: simonmar
Subscribers: rwbarton, thomie, carter
GHC Trac Issues: #15158
Differential Revision: https://phabricator.haskell.org/D4719
Diffstat (limited to 'compiler/main/SysTools.hs')
0 files changed, 0 insertions, 0 deletions