From 13942a05ecbb8dd4952fe8b7b8f74488327df5e8 Mon Sep 17 00:00:00 2001
From: rrt <unknown>
Date: Tue, 5 Dec 2000 12:15:19 +0000
Subject: [PATCH] [project @ 2000-12-05 12:15:19 by rrt] Declare no_hs_main

---
 ghc/compiler/main/DriverPipeline.hs |    4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/ghc/compiler/main/DriverPipeline.hs b/ghc/compiler/main/DriverPipeline.hs
index 5d3aeb0..68e1981 100644
--- a/ghc/compiler/main/DriverPipeline.hs
+++ b/ghc/compiler/main/DriverPipeline.hs
@@ -1,5 +1,5 @@
 -----------------------------------------------------------------------------
--- $Id: DriverPipeline.hs,v 1.36 2000/12/04 16:42:14 rrt Exp $
+-- $Id: DriverPipeline.hs,v 1.37 2000/12/05 12:15:19 rrt Exp $
 --
 -- GHC Driver
 --
@@ -653,6 +653,8 @@ run_phase SplitAs basename _suff _input_fn _output_fn
 -----------------------------------------------------------------------------
 -- Linking
 
+GLOBAL_VAR(no_hs_main, False, Bool)
+
 doLink :: [String] -> IO ()
 doLink o_files = do
     ln <- readIORef v_Pgm_l
-- 
1.7.10.4