From: simonmar <unknown>
Date: Fri, 14 Nov 2003 17:30:54 +0000 (+0000)
Subject: [project @ 2003-11-14 17:30:54 by simonmar]
X-Git-Tag: Approx_11550_changesets_converted~250
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=ae1ec7a889153ca92ab4533bb15c8704fe6b1ef4;p=ghc-hetmet.git

[project @ 2003-11-14 17:30:54 by simonmar]
This file was used once; it isn't now.
---

diff --git a/ghc/compiler/main/Interpreter.hs b/ghc/compiler/main/Interpreter.hs
deleted file mode 100644
index cadec90..0000000
--- a/ghc/compiler/main/Interpreter.hs
+++ /dev/null
@@ -1,52 +0,0 @@
------------------------------------------------------------------------------
--- $Id: Interpreter.hs,v 1.12 2002/09/13 15:02:35 simonpj Exp $
---
--- Interpreter subsystem wrapper
---
--- (c) The University of Glasgow 2000
---
------------------------------------------------------------------------------
-
-module Interpreter (
-#ifdef GHCI
-	module ByteCodeGen,
-	module Linker
-#else
-
-#endif
-  ) where
-
-#ifdef GHCI
-
--- ------------------------------------------------------------
--- YES!  We have an interpreter
--- ------------------------------------------------------------
-
-import ByteCodeGen
-import Linker
-
-#else
-
-import Outputable
-
--- ------------------------------------------------------------
--- NO!  No interpreter; generate stubs for all the bits
--- ------------------------------------------------------------
-
-extendLinkEnv xs = return ()
-
-type ItblEnv = ()
-emptyItblEnv = ()
-
-type HValue          = ()
-data UnlinkedBCO     = UnlinkedBCO
-data UnlinkedBCOExpr = UnlinkedBCOExpr
-
-instance Outputable UnlinkedBCO where
-  ppr x = text "Can't output UnlinkedBCO"
-
-byteCodeGen    = error "byteCodeGen"
-loadObjs       = error "loadObjs"
-resolveObjs    = error "resolveObjs"
-interactiveUI  = error "interactiveUI"
-#endif