[compiler] Scrap token-matching boilerplate in Parser.hs