From b2c6dceb87bac7d7f80bd75dca43ccaa5c9369ad Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Wed, 11 Jul 2001 14:51:49 +0000
Subject: [PATCH] [project @ 2001-07-11 14:51:49 by sof] runSomething: don't
 export it

---
 ghc/compiler/main/SysTools.lhs |    5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/ghc/compiler/main/SysTools.lhs b/ghc/compiler/main/SysTools.lhs
index 47ad974..71e0e8e 100644
--- a/ghc/compiler/main/SysTools.lhs
+++ b/ghc/compiler/main/SysTools.lhs
@@ -37,9 +37,8 @@ module SysTools (
 
 	-- Misc
 	showGhcUsage,		-- IO ()	Shows usage message and exits
-	getSysMan,		-- IO String	Parallel system only
+	getSysMan		-- IO String	Parallel system only
 
-	runSomething	-- ToDo: make private
  ) where
 
 import DriverUtil
@@ -69,8 +68,6 @@ import List		( isSuffixOf )
 
 #include "HsVersions.h"
 
-{-# DEPRECATED runSomething "runSomething should be private to SysTools" #-}
-
 \end{code}
 
 
-- 
1.7.10.4