[project @ 2002-10-03 15:19:15 by ross]

[ghc-base.git] / Data / Tuple.hs

diff --git a/Data/Tuple.hs b/Data/Tuple.hs
index 16b23b4..88d2c67 100644 (file)
--- a/Data/Tuple.hs
+++ b/Data/Tuple.hs
@@ -13,7 +13,12 @@
 --
 -----------------------------------------------------------------------------
 
-module Data.Tuple where
+module Data.Tuple (
+         fst           -- :: (a,b) -> a
+       , snd           -- :: (a,b) -> a
+       , curry         -- :: ((a, b) -> c) -> a -> b -> c
+       , uncurry       -- :: (a -> b -> c) -> ((a, b) -> c)
+  ) where
 
 #ifdef __GLASGOW_HASKELL__
 import GHC.Base