From 616aab1b9cbf9f98ebad406a4f058359e9c16184 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Wed, 31 Jul 2002 12:17:35 +0000
Subject: [PATCH] [project @ 2002-07-31 12:17:35 by simonmar] Remove unused
 primRepTyCon

---
 ghc/compiler/prelude/TysPrim.lhs |   32 +-------------------------------
 1 file changed, 1 insertion(+), 31 deletions(-)

diff --git a/ghc/compiler/prelude/TysPrim.lhs b/ghc/compiler/prelude/TysPrim.lhs
index df43faf..eab67e1 100644
--- a/ghc/compiler/prelude/TysPrim.lhs
+++ b/ghc/compiler/prelude/TysPrim.lhs
@@ -42,9 +42,7 @@ module TysPrim(
 	word32PrimTyCon,	word32PrimTy,
 
 	int64PrimTyCon,		int64PrimTy,
-	word64PrimTyCon,	word64PrimTy,
-
-	primRepTyCon
+	word64PrimTyCon,	word64PrimTy
   ) where
 
 #include "HsVersions.h"
@@ -371,31 +369,3 @@ to the thread id internally.
 threadIdPrimTy    = mkTyConTy threadIdPrimTyCon
 threadIdPrimTyCon = pcPrimTyCon0 threadIdPrimTyConName ThreadIdRep
 \end{code}
-
-%************************************************************************
-%*									*
-\subsection[TysPrim-PrimRep]{Making types from PrimReps}
-%*									*
-%************************************************************************
-
-Each of the primitive types from this module is equivalent to a
-PrimRep (see PrimRep.lhs).  The following function returns the
-primitive TyCon for a given PrimRep.
-
-\begin{code}
-primRepTyCon CharRep       = charPrimTyCon
-primRepTyCon Int8Rep       = charPrimTyCon
-primRepTyCon IntRep        = intPrimTyCon
-primRepTyCon WordRep       = wordPrimTyCon
-primRepTyCon Int32Rep      = int32PrimTyCon
-primRepTyCon Int64Rep      = int64PrimTyCon
-primRepTyCon Word32Rep     = word32PrimTyCon
-primRepTyCon Word64Rep     = word64PrimTyCon
-primRepTyCon AddrRep       = addrPrimTyCon
-primRepTyCon FloatRep      = floatPrimTyCon
-primRepTyCon DoubleRep     = doublePrimTyCon
-primRepTyCon StablePtrRep  = stablePtrPrimTyCon
-primRepTyCon ForeignObjRep = foreignObjPrimTyCon
-primRepTyCon WeakPtrRep    = weakPrimTyCon
-primRepTyCon other         = pprPanic "primRepTyCon" (ppr other)
-\end{code}
-- 
1.7.10.4