From: simonmar <unknown>
Date: Tue, 8 May 2001 11:07:30 +0000 (+0000)
Subject: [project @ 2001-05-08 11:07:30 by simonmar]
X-Git-Tag: Approximately_9120_patches~1979
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=c7c6aea809675d01861793b274c13efdbaa0fef9;p=ghc-hetmet.git

[project @ 2001-05-08 11:07:30 by simonmar]
oops, remove debugging output
---

diff --git a/ghc/compiler/main/DriverPipeline.hs b/ghc/compiler/main/DriverPipeline.hs
index c8bd8e6..2668c64 100644
--- a/ghc/compiler/main/DriverPipeline.hs
+++ b/ghc/compiler/main/DriverPipeline.hs
@@ -1,5 +1,5 @@
 -----------------------------------------------------------------------------
--- $Id: DriverPipeline.hs,v 1.66 2001/05/08 10:58:48 simonmar Exp $
+-- $Id: DriverPipeline.hs,v 1.67 2001/05/08 11:07:30 simonmar Exp $
 --
 -- GHC Driver
 --
@@ -261,8 +261,6 @@ genPipeline todo stop_flag persistent_output lang filename
 		 ++ " is incompatible with source file `" ++ filename ++ "'"))
       else do
 
-   print (show pipeline ++ show annotated_pipeline ++ show stop_phase)
-
    return (
      takeWhile (phase_ne stop_phase ) $
      dropWhile (phase_ne start_phase) $