From 69394f403bbb2afd63b8ff50897182049f4cbf82 Mon Sep 17 00:00:00 2001 From: rrt Date: Thu, 28 Jun 2001 15:45:49 +0000 Subject: [PATCH] [project @ 2001-06-28 15:45:49 by rrt] Remove debugging statements^Wexpressions --- ghc/compiler/main/SysTools.lhs | 3 --- 1 file changed, 3 deletions(-) diff --git a/ghc/compiler/main/SysTools.lhs b/ghc/compiler/main/SysTools.lhs index 7e6a0f1..6b88692 100644 --- a/ghc/compiler/main/SysTools.lhs +++ b/ghc/compiler/main/SysTools.lhs @@ -325,9 +325,6 @@ getTopDir :: [String] getTopDir minusbs = do { top_dir <- get_proto - ; print top_dir - ; if "/ghc/compiler" `isSuffixOf` top_dir then print (remove_suffix top_dir) else print "not" - -- Discover whether we're running in a build tree or in an installation, -- by looking for the package configuration file. ; am_installed <- doesFileExist (top_dir `slash` "package.conf") -- 1.7.10.4