From b2a2120b0659ca564c52644f42e37d17eb74dc61 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Mon, 11 Feb 2002 12:27:34 +0000
Subject: [PATCH] [project @ 2002-02-11 12:27:34 by simonmar] These files
 aren't necessary any more.

---
 GHC/Main.lhs |   24 ------------------------
 Main.hi-boot |   13 -------------
 2 files changed, 37 deletions(-)
 delete mode 100644 GHC/Main.lhs
 delete mode 100644 Main.hi-boot

diff --git a/GHC/Main.lhs b/GHC/Main.lhs
deleted file mode 100644
index 6f05dae..0000000
--- a/GHC/Main.lhs
+++ /dev/null
@@ -1,24 +0,0 @@
-% ------------------------------------------------------------------------------
-% $Id: Main.lhs,v 1.1 2001/06/28 14:15:03 simonmar Exp $
-%
-% (c) The University of Glasgow, 1994-2000
-%
-
-\section[GHC.Main]{Module @GHC.Main@}
-
-\begin{code}
-module GHC.Main( mainIO ) where
-
-import {-# SOURCE #-} qualified Main	-- for type of "Main.main"
-
-import Prelude
-
-import System.IO
-import GHC.Exception
-import GHC.TopHandler
-
-mainIO :: IO ()		-- It must be of type (IO t) because that's what
-			-- the RTS expects.  GHC doesn't check this, so
-			-- make sure this type signature stays!
-mainIO = catchException Main.main topHandler
-\end{code}
diff --git a/Main.hi-boot b/Main.hi-boot
deleted file mode 100644
index 95942f1..0000000
--- a/Main.hi-boot
+++ /dev/null
@@ -1,13 +0,0 @@
----------------------------------------------------------------------------
---                              Main.hi
--- 
---      This hand-written interface file fakes a "Main" module
---      It is used *solely* so that GHCmain generates the right kind of
---      external reference to Main.main
----------------------------------------------------------------------------
- 
-__interface Main 1 where
-__export Main main ;
-1 main :: __forall a => GHCziIOBase.IO a;  -- wish this could be __o. KSW 1999-04.
-
-
-- 
1.7.10.4