From 708533dec3189bb624c8467627055a78de07e52b Mon Sep 17 00:00:00 2001 From: "simonpj@microsoft.com" Date: Mon, 10 Aug 2009 16:43:20 +0000 Subject: [PATCH] Fix Trac #3421: a typo in TysPrim This is just a blatant typo, where Any1 :: *->* was getting mixed up with Any :: *. --- compiler/prelude/TysPrim.lhs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/compiler/prelude/TysPrim.lhs b/compiler/prelude/TysPrim.lhs index af535d3..c69bea1 100644 --- a/compiler/prelude/TysPrim.lhs +++ b/compiler/prelude/TysPrim.lhs @@ -130,7 +130,7 @@ bcoPrimTyConName = mkPrimTc (fsLit "BCO#") bcoPrimTyConKey bcoPrimTyCon weakPrimTyConName = mkPrimTc (fsLit "Weak#") weakPrimTyConKey weakPrimTyCon threadIdPrimTyConName = mkPrimTc (fsLit "ThreadId#") threadIdPrimTyConKey threadIdPrimTyCon anyPrimTyConName = mkPrimTc (fsLit "Any") anyPrimTyConKey anyPrimTyCon -anyPrimTyCon1Name = mkPrimTc (fsLit "Any1") anyPrimTyCon1Key anyPrimTyCon +anyPrimTyCon1Name = mkPrimTc (fsLit "Any1") anyPrimTyCon1Key anyPrimTyCon1 \end{code} %************************************************************************ -- 1.7.10.4