diff options
Diffstat (limited to 'libraries/base/Text/ParserCombinators/ReadP.hs')
-rw-r--r-- | libraries/base/Text/ParserCombinators/ReadP.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libraries/base/Text/ParserCombinators/ReadP.hs b/libraries/base/Text/ParserCombinators/ReadP.hs index 7bdb97cebd..6c340e4597 100644 --- a/libraries/base/Text/ParserCombinators/ReadP.hs +++ b/libraries/base/Text/ParserCombinators/ReadP.hs @@ -248,7 +248,7 @@ gather (R m) gath _ Fail = Fail gath l (Look f) = Look (\s -> gath l (f s)) gath l (Result k p) = k (l []) <|> gath l p - gath _ (Final _) = error "do not use readS_to_P in gather!" + gath _ (Final _) = errorWithoutStackTrace "do not use readS_to_P in gather!" -- --------------------------------------------------------------------------- -- Derived operations |