add parser.hs