An unordered list must end in a blank line.

src/MdToHTML.hs

@@ -369,6 +369,7 @@ parseUListItem = parseUListParaItem <++ parseUListLineItem <++ parseUListNested
 parseUnorderedList :: ReadP MdToken
 parseUnorderedList = do
   lineItems <- greedyParse1 parseUListItem
+  void (char '\n') <++ eof -- A list must end in an extra newline or eof
   return $ UnordList lineItems
 
 -- Parse a document, which is multiple paragraphs.