module Main where
import MdToHTML
main :: IO ()
main = do
let res = leftmostLongestParse parseLine "## Hello ___world___"
putStrLn (show res)