hWaitForInput with timeout causes program to abort

This program,

import System.IO
import System.Timeout

main = hWaitForInput stdin (5 * 1000)

causes the program to abort (tested on Linux),

$ ghc hi.hs
[1 of 1] Compiling Main             ( hi.hs, hi.o )
Linking hi ...
$ ./hi
fdReady: msecs != 0, this shouldn't happenAborted

Trac metadata

Trac field	Value
Version	8.0.2
Type	Bug
TypeOfFailure	OtherFailure
Priority	high
Resolution	Unresolved
Component	Compiler
Test case
Differential revisions
BlockedBy
Related
Blocking
CC
Operating system
Architecture