From 521e7cf0a33af1da3f6d012fce89c3ea3cb00583 Mon Sep 17 00:00:00 2001 From: simonpj Date: Tue, 8 Apr 2003 16:14:29 +0000 Subject: [PATCH] [project @ 2003-04-08 16:14:29 by simonpj] add fixity for +++, <++ --- Text/ParserCombinators/ReadP.hs | 2 ++ 1 file changed, 2 insertions(+) diff --git a/Text/ParserCombinators/ReadP.hs b/Text/ParserCombinators/ReadP.hs index 145dfe2..7b64185 100644 --- a/Text/ParserCombinators/ReadP.hs +++ b/Text/ParserCombinators/ReadP.hs @@ -49,6 +49,8 @@ import Control.Monad( MonadPlus(..) ) import GHC.Show( isSpace ) import GHC.Base +infixr 5 +++, <++ + -- We define a local version of ReadS here, -- because its "real" definition site is in GHC.Read type ReadS a = String -> [(a,String)] -- 1.7.10.4