class EL_UNIQUE_ARRAYED_LIST
Client examples: BASE_AUTOTEST_APP
List of unique hashable items
note
description: "List of unique hashable items"
author: "Finnian Reilly"
copyright: "Copyright (c) 2001-2022 Finnian Reilly"
contact: "finnian at eiffel hyphen loop dot com"
license: "MIT license (See: en.wikipedia.org/wiki/MIT_License)"
date: "2022-11-15 19:56:04 GMT (Tuesday 15th November 2022)"
revision: "6"
class
EL_UNIQUE_ARRAYED_LIST [G -> HASHABLE]
inherit
EL_ARRAYED_LIST [G]
export
{NONE} all
{ANY} count, Extendible
redefine
make, extend
end
create
make
feature {NONE} -- Initialization
make (n: INTEGER)
--
do
Precursor (n)
create table.make (n)
end
feature -- Status query
inserted: BOOLEAN
do
Result := table.inserted
end
feature -- Element change
extend (v: like item)
--
do
table.put (count + 1, v)
if table.inserted then
Precursor (v)
end
end
feature {NONE} -- Implementation
table: EL_CODE_TABLE [G]
end