[project @ 2001-02-06 11:42:30 by simonmar]
authorsimonmar <unknown>
Tue, 6 Feb 2001 11:42:30 +0000 (11:42 +0000)
committersimonmar <unknown>
Tue, 6 Feb 2001 11:42:30 +0000 (11:42 +0000)
commitd1430fb505037999e8961fbd7e922d0e82eca0f1
treec7f62b46656dde35151ca479354af73a8f4e4765
parent839930a03a9237d3a8c78745c6167f666fedada9
[project @ 2001-02-06 11:42:30 by simonmar]
urk! when showing a handle, we don't replace the MVar.  For example,
the following test causes a deadlock:

main = do
  getContents
  catch getChar (\e -> print e >> return 'x')
  catch getChar (\e -> print e >> return 'x')

To be merged into 4.08.
ghc/lib/std/PrelIOBase.lhs