From: Jose Pedro Magalhaes <jpm@cs.uu.nl>
Date: Mon, 1 Dec 2008 11:34:11 +0000 (+0000)
Subject: Fix #2750: change Prelude.(,) to Prelude.(,,)
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=cab860c6737736d5f5a47d43be170f43813558cc;p=ghc-base.git

Fix #2750: change Prelude.(,) to Prelude.(,,)
---

diff --git a/Data/Data.hs b/Data/Data.hs
index 930fcdd..a30fdfb 100644
--- a/Data/Data.hs
+++ b/Data/Data.hs
@@ -1172,7 +1172,7 @@ tuple3Constr :: Constr
 tuple3Constr = mkConstr tuple3DataType "(,,)" [] Infix
 
 tuple3DataType :: DataType
-tuple3DataType = mkDataType "Prelude.(,)" [tuple3Constr]
+tuple3DataType = mkDataType "Prelude.(,,)" [tuple3Constr]
 
 instance (Data a, Data b, Data c) => Data (a,b,c) where
   gfoldl f z (a,b,c) = z (,,) `f` a `f` b `f` c