class CFPropertyList::Binary

def date_to_binary(val)

Convert date value (apple format) to binary and adds it to the object table

def date_to_binary(val)
  saved_object_count = @written_object_count
  @written_object_count += 1
  val = val.getutc.to_f - CFDate::DATE_DIFF_APPLE_UNIX # CFDate is a real, number of seconds since 01/01/2001 00:00:00 GMT
  bdata = Binary.type_bytes(0b0011, 3)
  @object_table[saved_object_count] = bdata + [val].pack("d").reverse
  return saved_object_count
end