INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES

indexing

title: "Atom associated to a string. ", "WEL: library of reusable components for Eiffel. ", "Based on WEL library for ISE Eiffel, used with permission. "
project: "Windows Eiffel Library"
copyright: "(c) 1986-1997 Interactive Software Engineering Inc. ", "Modifications and extensions: ", "(c) 1997-2001 Object Tools ", "All rights reserved. Duplication and distribution prohibited", "May be used only with Visual Eiffel under terms of user ", "license "
cluster: wel
class WEL_ATOM
inherit

WEL_ANY
end
creation

make
feature {NONE}-- Initialization

make (a_name: STRING)
-- Make an atom named `a_name'.
require
a_name_not_void: a_name /= void
a_name_not_empty: not a_name.is_empty
a_name_not_too_long: a_name.count <= max_name_length
ensure
name_is_equal: exists implies name.is_equal (a_name)
feature -- Access

name: STRING
-- Atom name
require
exists: exists
ensure
result_not_void: Result /= void
result_not_empty: not Result.is_empty

Max_name_length: INTEGER
end -- class WEL_ATOM

INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES