class BinData::Array

def read_until_condition(io)
  loop do
    element = append_new_element
    element.do_read(io)
    variables = { :index => self.length - 1, :element => self.last,
                  :array => self }
    break if eval_parameter(:read_until, variables)
  end
end