Remove obsolete comments
This commit is contained in:
@@ -306,14 +306,7 @@ parseUListLineItem = do
|
|||||||
nestedList <- parseListNested <++ return (Unit "")
|
nestedList <- parseListNested <++ return (Unit "")
|
||||||
return $ Line [Line restOfLine, nestedList]
|
return $ Line [Line restOfLine, nestedList]
|
||||||
|
|
||||||
-- restOfLine <- manyTill get (void (char '\n') <++ eof)
|
|
||||||
-- let restOfLineParsed = fst $ leftmostLongestParse parseLine restOfLine
|
|
||||||
-- nestedList <- parseUListNested <++ return (Unit "")
|
|
||||||
-- return $ Line [restOfLineParsed, nestedList]
|
|
||||||
|
|
||||||
-- Parse an unordered list paragraph item.
|
-- Parse an unordered list paragraph item.
|
||||||
-- This is defined as a line item, followed by an empty line, followed by one or more
|
|
||||||
-- lines indented by a space or tab.
|
|
||||||
parseUListParaItem :: ReadP MdToken
|
parseUListParaItem :: ReadP MdToken
|
||||||
parseUListParaItem = do
|
parseUListParaItem = do
|
||||||
firstLine <- parseUListLineItem
|
firstLine <- parseUListLineItem
|
||||||
|
Reference in New Issue
Block a user