deferred class
	EV_TREE_NODE_CONTAINER

General
	obsolete: "This is no longer applicable. Use EV_TREE_ITEM_LIST instead."
	cluster: interface
	description: "Abstract class for container that hold tree nodes"
	keywords: "container"

Ancestors
	EV_ANY*
	LINEAR* [G]

Queries
	after: BOOLEAN
	changeable_comparison_criterion: BOOLEAN
	data: ANY
	exhausted: BOOLEAN
	for_all (test: FUNCTION [ANY, TUPLE [EV_TREE_NODE], BOOLEAN]): BOOLEAN
	has (v: [like item] EV_TREE_NODE): BOOLEAN
	index: INTEGER_32
	index_of (v: [like item] EV_TREE_NODE; i: INTEGER_32): INTEGER_32
	is_destroyed: BOOLEAN
	is_empty: BOOLEAN
	item: EV_TREE_NODE
	linear_representation: LINEAR [EV_TREE_NODE]
	object_comparison: BOOLEAN
	occurrences (v: [like item] EV_TREE_NODE): INTEGER_32
	off: BOOLEAN
	there_exists (test: FUNCTION [ANY, TUPLE [EV_TREE_NODE], BOOLEAN]): BOOLEAN

Commands
	compare_objects
	compare_references
	copy (other: [like Current] EV_TREE_NODE_CONTAINER)
	destroy
	do_all (action: PROCEDURE [ANY, TUPLE [EV_TREE_NODE]])
	do_if (action: PROCEDURE [ANY, TUPLE [EV_TREE_NODE]]; test: FUNCTION [ANY, TUPLE [EV_TREE_NODE], BOOLEAN])
	finish
	forth
	search (v: [like item] EV_TREE_NODE)
	set_data (some_data: [like data] ANY)
	start