1 % ------------------------------------------------------------------------------
2 % $Id: PrelMain.lhs,v 1.7 2000/06/30 13:39:36 simonmar Exp $
4 % (c) The University of Glasgow, 1994-2000
7 \section[PrelMain]{Module @PrelMain@}
10 module PrelMain( mainIO ) where
13 import {-# SOURCE #-} qualified Main -- for type of "Main.main"
16 import PrelHandle ( topHandler )
21 mainIO :: IO () -- It must be of type (IO t) because that's what
22 -- the RTS expects. GHC doesn't check this, so
23 -- make sure this type signature stays!
24 mainIO = catchException Main.main (topHandler True)