INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES

indexing

description: "Dispensers: containers for which clients have no say ", "as to what item they can access at a given time. ", "Examples include stacks and queues. "
title: "EiffelBase: library of reusable components for Eiffel. ", "Based on EiffelBase library for ISE Eiffel, ", "used with permission. "
project: "EiffelBase Library"
copyright: "(c) 1986-1997 Interactive Software Engineering Inc. ", "Modifications and extensions: ", "(c) 1997 Object Tools ", "All rights reserved. Duplication and distribution prohibited", "May be used only with Visual Eiffel under terms of user ", "license "
key: dispenser, active
cluster: eiffelbase
deferred class DISPENSER [G]
inherit

ACTIVE [G]
redefine
extend,
put
end

FINITE [G]
end
feature -- Status report

readable: BOOLEAN
-- Is there a current item that may be read?

writable: BOOLEAN
-- Is there a current item that may be modified?
feature -- Element change

append (s: SEQUENCE [G])
-- Append a copy of `s'.
-- (Synonym for `fill')

extend, force, put (v: G)
-- Add item `v'.
invariant

readable_definition: readable = not empty
writable_definition: writable = not empty
end -- class DISPENSER

INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES