class CFPropertyList::Binary

def read_binary_unicode_string(fname,fd,length)
  # The problem is: we get the length of the string IN CHARACTERS;
  # since a char in UTF-16 can be 16 or 32 bit long, we don't really know
  # how long the string is in bytes
  buff = fd.read(2*length)
  @unique_table[buff] = true unless @unique_table.has_key?(buff)
  return CFString.new(Binary.charset_convert(buff,"UTF-16BE","UTF-8"))
end