# File lib/cfpropertylist/rbBinaryCFPropertyList.rb, line 533
    def date_to_binary(val)
      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

      @object_table[@written_object_count] =
        (Binary.type_bytes(0b0011, 3) << [val].pack("E").reverse)

      @written_object_count += 1
      @written_object_count - 1
    end