# File rparsec/parser.rb, line 394
  def infixr(op)
    Parsers.sequence(self, _infix_rest(op, self).many) do |v, rests|
      if rests.empty?
        v
      else
        f, seed = *rests.last
        for i in (0...rests.length-1)
          cur = rests.length-2-i
          f1, v1 = *rests[cur]
          seed = f.call(v1, seed)
          f = f1
        end
        f.call(v, seed)
      end
    end
  end