    deferred class
    	EV_MENU_BAR_I

    General
    	cluster: implementation_mswin
    	description: "Eiffel Vision menu bar. Implementation interface."

    Ancestors
    	EV_MENU_ITEM_LIST_I*

    Action sequences
    	item_select_actions: EV_MENU_ITEM_SELECT_ACTION_SEQUENCE

    Queries
    	count: INTEGER_32
    	cursor: EV_DYNAMIC_LIST_CURSOR [EV_MENU_ITEM]
    	has (v: [like item] EV_MENU_ITEM): BOOLEAN
    	i_th (i: INTEGER_32): EV_MENU_ITEM
    	index: INTEGER_32
    	index_of (v: [like item] EV_MENU_ITEM; i: INTEGER_32): INTEGER_32
    	item: EV_MENU_ITEM
    	item_by_data (data: ANY): [like item] EV_MENU_ITEM
    	off: BOOLEAN
    	parent: EV_WINDOW
    	retrieve_item_by_data (data: ANY; should_compare_objects: BOOLEAN): EV_MENU_ITEM
    	retrieve_items_by_data (data: ANY; should_compare_objects: BOOLEAN): ARRAYED_LIST [EV_MENU_ITEM]
    	valid_cursor (p: CURSOR): BOOLEAN

    Commands
    	append (s: SEQUENCE [EV_MENU_ITEM])
    	back
    	extend (v: [like item] EV_MENU_ITEM)
    	forth
    	go_i_th (i: INTEGER_32)
    	go_to (p: CURSOR)
    	merge_left (other: [like interface] EV_MENU_BAR)
    	merge_right (other: [like interface] EV_MENU_BAR)
    	move (i: INTEGER_32)
    	prune (v: [like item] EV_MENU_ITEM)
    	put_front (v: [like item] EV_MENU_ITEM)
    	put_i_th (v: [like item] EV_MENU_ITEM; i: INTEGER_32)
    	put_left (v: [like item] EV_MENU_ITEM)
    	put_right (v: [like item] EV_MENU_ITEM)
    	remove
    	remove_left
    	remove_right
    	replace (v: [like item] EV_MENU_ITEM)
    	start
    	wipe_out