X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=Text%2FRead.hs;h=c2fc39b6d25888d01340e291bf4044082c060b2e;hb=ef25b008ed80be2b432abb792eafa373e3973bbc;hp=cc028b721a14dc7fa2c87b8bdeb1aa12f976b092;hpb=746ef6a7fd71bb1e9ebe3cd107c5f9f79f3b7a68;p=haskell-directory.git

diff --git a/Text/Read.hs b/Text/Read.hs
index cc028b7..c2fc39b 100644
--- a/Text/Read.hs
+++ b/Text/Read.hs
@@ -3,28 +3,44 @@
 -- |
 -- Module      :  Text.Read
 -- Copyright   :  (c) The University of Glasgow 2001
--- License     :  BSD-style (see the file libraries/core/LICENSE)
+-- License     :  BSD-style (see the file libraries/base/LICENSE)
 -- 
 -- Maintainer  :  libraries@haskell.org
 -- Stability   :  provisional
 -- Portability :  portable
 --
--- Exiting the program.
+-- The "Text.Read" library is the canonical library to import for
+-- 'Read'-class facilities.  It offers an extended and much improved
+-- 'Read' class, which constitutes a proposed alternative to the 
+-- Haskell98 'Read'.  In particular, writing parsers is easier, and
+-- the parsers are much more efficient.
 --
 -----------------------------------------------------------------------------
 
 module Text.Read (
+   -- * The 'Read' class
+   Read(..),		-- The Read class
    ReadS, 		-- String -> Maybe (a,String)
-   Read(
-      readsPrec,	-- :: Int -> ReadS a
-      readList		-- :: ReadS [a]
-    ),
+
+   -- * Haskell 98 functions
    reads,		-- :: (Read a) => ReadS a
    read,		-- :: (Read a) => String -> a
    readParen, 		-- :: Bool -> ReadS a -> ReadS a
    lex,			-- :: ReadS String
+
+#ifdef __GLASGOW_HASKELL__
+   -- * New parsing functions
+   module Text.ParserCombinators.ReadPrec,
+   L.Lexeme(..),	
+   lexP,		-- :: ReadPrec Lexeme
+   readListDefault,	-- :: Read a => ReadS [a]
+   readListPrecDefault,	-- :: Read a => ReadPrec [a]
+#endif
+
  ) where
 
 #ifdef __GLASGOW_HASKELL__
 import GHC.Read
+import Text.ParserCombinators.ReadPrec
+import qualified Text.Read.Lex as L
 #endif