From ae1ec7a889153ca92ab4533bb15c8704fe6b1ef4 Mon Sep 17 00:00:00 2001 From: simonmar Date: Fri, 14 Nov 2003 17:30:54 +0000 Subject: [PATCH] [project @ 2003-11-14 17:30:54 by simonmar] This file was used once; it isn't now. --- ghc/compiler/main/Interpreter.hs | 52 -------------------------------------- 1 file changed, 52 deletions(-) delete mode 100644 ghc/compiler/main/Interpreter.hs 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 -- 1.7.10.4