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)
  @object_table[@written_object_count] =
    (Binary.type_bytes(0b0100, val.bytesize) << val)
  @written_object_count += 1
  @written_object_count - 1
end