class CFPropertyList::Binary

def read_binary_string(fname,fd,length)
  buff = ""
  buff = fd.read(length) if length > 0
  @unique_table[buff] = true unless @unique_table.has_key?(buff)
  return CFString.new(buff)
end