From: simonmar <unknown>
Date: Wed, 24 May 2000 10:50:37 +0000 (+0000)
Subject: [project @ 2000-05-24 10:50:10 by simonmar]
X-Git-Tag: Approximately_9120_patches~4395
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=bcdc6ed1f0ac463426a09fd96e12520834698742;p=ghc-hetmet.git

[project @ 2000-05-24 10:50:10 by simonmar]
don't use underscores in type variable names
---

diff --git a/ghc/compiler/hsSyn/HsExpr.hi-boot-5 b/ghc/compiler/hsSyn/HsExpr.hi-boot-5
index 03f8d70..bf7cb53 100644
--- a/ghc/compiler/hsSyn/HsExpr.hi-boot-5
+++ b/ghc/compiler/hsSyn/HsExpr.hi-boot-5
@@ -1,4 +1,4 @@
 __interface HsExpr 1 0 where
 __export HsExpr HsExpr pprExpr;
 1 data HsExpr i p ;
-1 pprExpr :: __forall [_i _p] {Outputable.Outputable _i, Outputable.Outputable _p} => HsExpr.HsExpr _i _p -> Outputable.SDoc ;
+1 pprExpr :: __forall [i p] {Outputable.Outputable i, Outputable.Outputable p} => HsExpr.HsExpr i p -> Outputable.SDoc ;
diff --git a/ghc/compiler/hsSyn/HsMatches.hi-boot-5 b/ghc/compiler/hsSyn/HsMatches.hi-boot-5
index 4ef667f..54e15e5 100644
--- a/ghc/compiler/hsSyn/HsMatches.hi-boot-5
+++ b/ghc/compiler/hsSyn/HsMatches.hi-boot-5
@@ -3,5 +3,5 @@ __export HsMatches Match GRHSs pprMatch pprMatches pprGRHSs ;
 1 data Match a b ;
 1 data GRHSs a b ;
 1 pprGRHSs :: __forall [i p] {Outputable.Outputable i, Outputable.Outputable p} => PrelBase.Bool -> HsMatches.GRHSs i p -> Outputable.SDoc ;
-1 pprMatch :: __forall [_i _p] {Outputable.Outputable _i, Outputable.Outputable _p} => (PrelBase.Bool, Outputable.SDoc) -> HsMatches.Match _i _p -> Outputable.SDoc ;
-1 pprMatches :: __forall [_i _p] {Outputable.Outputable _i, Outputable.Outputable _p} => (PrelBase.Bool, Outputable.SDoc) -> [HsMatches.Match _i _p] -> Outputable.SDoc ;
+1 pprMatch :: __forall [i p] {Outputable.Outputable i, Outputable.Outputable p} => (PrelBase.Bool, Outputable.SDoc) -> HsMatches.Match i p -> Outputable.SDoc ;
+1 pprMatches :: __forall [i p] {Outputable.Outputable i, Outputable.Outputable p} => (PrelBase.Bool, Outputable.SDoc) -> [HsMatches.Match i p] -> Outputable.SDoc ;