module Text.Read.Internal where import Prelude() import Data.Char_Type lex :: String -> [(String, String)]