note description: "Auto-generated Objective-C wrapper class" date: "$Date$" revision: "$Revision$" class NS_DRAGGING_IMAGE_COMPONENT_UTILS inherit NS_OBJECT_UTILS redefine wrapper_objc_class_name, is_subclass_instance end feature -- NSDraggingImageComponent dragging_image_component_with_key_ (a_key: detachable NS_STRING): detachable NS_OBJECT -- Auto generated Objective-C wrapper. local result_pointer: POINTER l_objc_class: OBJC_CLASS a_key__item: POINTER do if attached a_key as a_key_attached then a_key__item := a_key_attached.item end create l_objc_class.make_with_name (get_class_name) check l_objc_class_registered: l_objc_class.registered end result_pointer := objc_dragging_image_component_with_key_ (l_objc_class.item, a_key__item) if result_pointer /= default_pointer then if attached objc_get_eiffel_object (result_pointer) as existing_eiffel_object then check attached {like dragging_image_component_with_key_} existing_eiffel_object as valid_result then Result := valid_result end else check attached {like dragging_image_component_with_key_} new_eiffel_object (result_pointer, True) as valid_result_pointer then Result := valid_result_pointer end end end end feature {NONE} -- NSDraggingImageComponent Externals objc_dragging_image_component_with_key_ (a_class_object: POINTER; a_key: POINTER): POINTER -- Auto generated Objective-C wrapper. external "C inline use " alias "[ return (EIF_POINTER)[(Class)$a_class_object draggingImageComponentWithKey:$a_key]; ]" end feature {NONE} -- Implementation wrapper_objc_class_name: STRING -- The class name used for classes of the generated wrapper classes. do Result := "NSDraggingImageComponent" end is_subclass_instance: BOOLEAN -- do Result := False end end