note description: "Summary description for {NS_OBJECT_API}." author: "Daniel Furrer" date: "$Date$" revision: "$Revision$" class NS_OBJECT_API feature -- Identifying classes frozen class_ (a_object: POINTER): POINTER external "C inline use " alias "return [(NSObject*)$a_object class];" end feature -- Managing Reference Counts retain_count (a_item_ptr: POINTER): NATURAL_64 require a_item_ptr_not_null: a_item_ptr /= default_pointer external "C inline use " alias "return [(NSObject *) $a_item_ptr retainCount];" end release (a_item_ptr: POINTER) require a_item_ptr_not_null: a_item_ptr /= default_pointer external "C inline use " alias "[(NSObject *) $a_item_ptr release];" end retain (a_item_ptr: POINTER) require a_item_ptr_not_null: a_item_ptr /= default_pointer external "C inline use " alias "[(NSObject *) $a_item_ptr retain];" end end