Fix comment start state transition
commita34cdf77980ed6d720dbcd283e4328367d337fb1
authorBen Gamari <ben@smart-cactus.org>
dateWed 23 Nov 2016, 11:46 (10 years ago)
parent080f907
Text/HTML/Parser.hs+1
@@ -206,6 +206,7 @@ commentStart :: Parser Token
206206commentStart = do
207207 (char '-' >> commentStartDash)
208208 <|> (char '>' >> return (Comment mempty))
209+ <|> comment mempty
209210
210211-- | /§8.2.4.47/: Comment start dash state
211212commentStartDash :: Parser Token