From d12097c7a12e867c1483b304f185b7cd1246a061 Mon Sep 17 00:00:00 2001 From: Henning Guenther Date: Tue, 24 Feb 2009 20:02:33 -0800 Subject: [PATCH] Removed useless comment darcs-hash:20090225040233-a4fee-16dcf1f9cbc42c7e379f8ba83cb5f16ff1832d2c --- Data/Encoding/ByteSource.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Data/Encoding/ByteSource.hs b/Data/Encoding/ByteSource.hs index ac97b11..2b1bdb5 100644 --- a/Data/Encoding/ByteSource.hs +++ b/Data/Encoding/ByteSource.hs @@ -131,7 +131,7 @@ instance ByteSource (StateT [Char] (Either DecodingException)) where fetchWord8 = do chs <- get case chs of - [] -> throwException UnexpectedEnd --handleDecodingError UnexpectedEnd + [] -> throwException UnexpectedEnd c:cs -> do put cs return (fromIntegral $ ord c)