From bcdc6ed1f0ac463426a09fd96e12520834698742 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Wed, 24 May 2000 10:50:37 +0000
Subject: [PATCH] [project @ 2000-05-24 10:50:10 by simonmar] don't use
underscores in type variable names
---
ghc/compiler/hsSyn/HsExpr.hi-boot-5 | 2 +-
ghc/compiler/hsSyn/HsMatches.hi-boot-5 | 4 ++--
2 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/ghc/compiler/hsSyn/HsExpr.hi-boot-5 b/ghc/compiler/hsSyn/HsExpr.hi-boot-5
index 03f8d70c6bc3..bf7cb5341f51 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 4ef667ff2a0c..54e15e5877fe 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 ;
--
GitLab