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

diff --git a/Data/Data.hs b/Data/Data.hs
index 930fcdd..a30fdfb 100644 (file)
--- 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