From b89ea7a599124f7d38500939eaf0f76874000657 Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Sun, 19 Oct 1997 21:38:07 +0000
Subject: [PATCH] [project @ 1997-10-19 21:38:07 by sof] Drop use of
 opt_CompilingGhcInternals

---
 ghc/compiler/specialise/Specialise.lhs |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/ghc/compiler/specialise/Specialise.lhs b/ghc/compiler/specialise/Specialise.lhs
index 803e4a4..504ea36 100644
--- a/ghc/compiler/specialise/Specialise.lhs
+++ b/ghc/compiler/specialise/Specialise.lhs
@@ -21,7 +21,7 @@ import Bag		( emptyBag, unitBag, isEmptyBag, unionBags,
 			)
 import Class		( GenClass{-instance Eq-}, SYN_IE(Class) )
 import CmdLineOpts	( opt_SpecialiseImports, opt_D_simplifier_stats,
-			  opt_CompilingGhcInternals, opt_SpecialiseTrace
+			  opt_SpecialiseTrace
 			)
 import CoreLift		( mkLiftedId, liftExpr, bindUnlift, applyBindUnlifts )
 import CoreSyn
@@ -1230,7 +1230,7 @@ specTyConsAndScope scopeM
   = scopeM			`thenSM` \ (binds, scope_uds) ->
     let
        (tycons_cis, gotci_scope_uds)
-	 = getLocalSpecTyConIs opt_CompilingGhcInternals scope_uds
+	 = getLocalSpecTyConIs False{-OLD:opt_CompilingGhcInternals-} scope_uds
 
        tycon_specs_list = collectTyConSpecs tycons_cis
     in
-- 
1.7.10.4