From df080b3028f59e42050d8e4cdb60ffd8419ca064 Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Sun, 18 May 1997 04:49:53 +0000
Subject: [PATCH] [project @ 1997-05-18 04:49:53 by sof] Changes for new PP

---
 ghc/compiler/utils/Ubiq.lhi |    8 +++-----
 1 file changed, 3 insertions(+), 5 deletions(-)

diff --git a/ghc/compiler/utils/Ubiq.lhi b/ghc/compiler/utils/Ubiq.lhi
index bb06487..bdff763 100644
--- a/ghc/compiler/utils/Ubiq.lhi
+++ b/ghc/compiler/utils/Ubiq.lhi
@@ -9,7 +9,6 @@ import FastString(FastString)
 import Bag		( Bag )
 import BinderInfo	( BinderInfo )
 import CgBindery	( CgIdInfo )
-import CharSeq		( CSeq )
 import CLabel		( CLabel )
 import Class		( GenClass, GenClassOp, Class(..), ClassOp )
 import ClosureInfo	( ClosureInfo, LambdaFormInfo )
@@ -36,7 +35,7 @@ import Name		( Module(..), OccName, Name, ExportFlag, NamedThing(..) )
 import Outputable	( Outputable(..) )
 import PprStyle		( PprStyle )
 import PragmaInfo	( PragmaInfo )
-import Pretty		( PrettyRep )
+import Pretty		( Doc )
 import PrimOp		( PrimOp )
 import PrimRep		( PrimRep )
 import SMRep		( SMRep )
@@ -61,7 +60,7 @@ class NamedThing a where
 class Ord3 a where
 	cmp :: a -> a -> Int#
 class Outputable a where
-	ppr :: PprStyle -> a -> Int -> Bool -> PrettyRep
+	ppr :: PprStyle -> a -> Doc
 class Uniquable a where
 	uniqueOf :: a -> Unique
 
@@ -79,7 +78,6 @@ data ClassPragmas a
 data ClosureInfo
 data Coercion
 data CostCentre
-data CSeq
 data DataPragmas a
 data DeforestInfo
 data Demand
@@ -113,7 +111,7 @@ data Reg
 data OutPat a b c
 data PprStyle
 data PragmaInfo
-data PrettyRep
+data Doc
 data PrimOp
 data PrimRep	-- NB: an enumeration
 data SimplifierSwitch
-- 
1.7.10.4