class CFPropertyList::PlainParser

def read_array
  skip_whitespaces
  ary = []
  while not @doc.scan(/\)/)
    val = import_plain
    return nil if not val or not val.value
    skip_whitespaces
    if not @doc.skip(/,\s*/)
      if @doc.scan(/\)/)
        ary << val
        return CFArray.new(ary)
      end
      raise CFFormatError.new("invalid array format")
    end
    ary << val
    raise CFFormatError.new("invalid array format") if @doc.eos?
  end
  CFArray.new(ary)
end