mments :: Parser ()
comments = string "#"
           *> manyTill anyChar newline
           *> return ()


comments :: Parser ()
comments = string "#"
           *> manyTill anyChar newline
           *> return ()
comments = string "#"
           *> manyTill anyChar newline
           *> return ()