From cab860c6737736d5f5a47d43be170f43813558cc Mon Sep 17 00:00:00 2001 From: Jose Pedro Magalhaes Date: Mon, 1 Dec 2008 11:34:11 +0000 Subject: [PATCH] Fix #2750: change Prelude.(,) to Prelude.(,,) --- Data/Data.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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 -- 1.7.10.4