[project @ 2002-04-24 11:17:53 by simonpj]

"\Oxxx" and "\Xyyy" are not octal or hexadecimal escapes in Haskell 98,
and should not be lexed as such.

diff --git a/Text/Read/Lex.lhs b/Text/Read/Lex.lhs
index e09f75b..6ad7ce0 100644 (file)
--- a/Text/Read/Lex.lhs
+++ b/Text/Read/Lex.lhs
@@ -176,9 +176,7 @@ lexChar =
       do s <- look
          case s of
            'o':_ -> do get; return 8
-           'O':_ -> do get; return 8
            'x':_ -> do get; return 16
-           'X':_ -> do get; return 16
            _     -> do return 10
   
   lexCntrlChar =