shithub: MicroHs

Info  •  Files  •  Log  •  Branches

Defaulting paranoia.

--- a/lib/Text/ParserCombinators/ReadP.hs

+++ b/lib/Text/ParserCombinators/ReadP.hs

@@ -88,6 +88,8 @@

 import Data.List.NonEmpty

 import Data.Monoid.Internal

+default (Int)

+

 infixr 5 +++, <++

 ------------------------------------------------------------------------

--- a/lib/Text/ParserCombinators/ReadPrec.hs

+++ b/lib/Text/ParserCombinators/ReadPrec.hs

@@ -57,6 +57,8 @@

 import Text.ParserCombinators.ReadP(ReadP, ReadS, readP_to_S, readS_to_P)

 import qualified Text.ParserCombinators.ReadP as ReadP(get, look, (+++), (<++), pfail)

+default (Int)

+

 -- ---------------------------------------------------------------------------

 -- The readPrec type