git.iko.soy/typeable/html-parse
on master help sign in
Use normal takeWhile

It should now be inlined since attoparsec #119.

commit64d0d1a9f46a3ba8845fd2cd3bd8504fa849a77c authorBen Gamari <ben@smart-cactus.org> dateSun 10 Apr 2016, 13:16 (11 years ago) parentdd116a6
1 file changed+1−3
compare with master
unifiedsplit
Text/HTML/Parser.hs+1−3
Text/HTML/Parser.hs+1−3
@@ -17,7 +17,7 @@ import Data.Monoid
1717import Control.Monad (guard)
1818import Control.DeepSeq
1919
20−import Data.Attoparsec.Text hiding (takeWhile)
20+import Data.Attoparsec.Text
2121import qualified Data.Attoparsec.Text as A
2222import Data.Text (Text)
2323import qualified Data.Text as T
@@ -43,8 +43,6 @@ data Token
4343 | Doctype !Text
4444 deriving (Show, Ord, Eq, Generic)
4545
46−takeWhile = A.takeWhile'
47−
4846data Attr = Attr !AttrName !AttrValue
4947 deriving (Show, Eq, Ord)
5048