Rewrote parser functions in lifted State [Token] monad (with ExceptT)