Added a Token parser similar (a copy) os Text.Parsec.Token