class CFPropertyList::Binary

def data_to_binary(val)

Convert data value to binary format and add it to the object table

def data_to_binary(val)
  saved_object_count = @written_object_count
  @written_object_count += 1
  bdata = Binary.type_bytes(0b0100, val.bytesize)
  @object_table[saved_object_count] = bdata + val
  return saved_object_count
end