ghc/lib/std/PrelMain.lhs

   1 %
   2 % (c) The AQUA Project, Glasgow University, 1994-1997
   3 %
   4
   5 \section[PrelMain]{Module @PrelMain@}
   6
   7 \begin{code}
   8 module PrelMain( mainIO ) where
   9
  10 import Prelude
  11 import {-# SOURCE #-} qualified Main    -- for type of "Main.main"
  12
  13 import PrelException
  14 import PrelHandle ( topHandler )
  15
  16 \end{code}
  17
  18 \begin{code}
  19 mainIO :: IO ()         -- It must be of type (IO t) because that's what
  20                         -- the RTS expects.  GHC doesn't check this, so
  21                         -- make sure this type signature stays!
  22 mainIO = catchException Main.main (topHandler True)
  23 \end{code}
  24