2 % (c) The GRASP/AQUA Project, Glasgow University, 1993
4 \section[PreludeErrIO]{Wrapper for errorIO primitive}
6 The boxified version of the @errorIO#@ primitive.
9 module PreludeErrIO where
11 errorIO :: PrimIO () -> a
14 = case (errorIO# io) of
17 bottom = bottom -- Never evaluated