The PLVstk (PL/Vision STacK manager) package is a generic manager for both first-in-first-out (FIFO) and last-in-last-out (LIFO) stacks; it is built on PLVlst. See the companion disk for details.
defstk CONSTANT VARCHAR2(5) := 'stack';
The name of the default stack.
lifo CONSTANT VARCHAR2(4) := 'LIFO';
Indicates that you are working with a last-in-first-out stack. Used in calls to pop.
fifo CONSTANT VARCHAR2(4) := 'FIFO';
Indicates that you are working with a first-in-first-out stack. Used in calls to pop.
PROCEDURE make
(stack_in IN VARCHAR2 := defstk,
overwrite_in IN BOOLEAN := TRUE);
Allocates storage for a stack of up to 1,000 items with the specified name. By default, if the stack already exists it will be reinitialized to an empty stack.
PROCEDURE destroy (stack_in IN VARCHAR2 := defstk);
Releases all memory associated with this stack.
PROCEDURE show
(stack_in IN VARCHAR2 := defstk,
show_contents_in IN BOOLEAN := FALSE);
Requests that pre-action status of stack be displayed for the specified stack (or all).
PROCEDURE noshow;
Turns off display of pre-action status.
FUNCTION showing RETURN BOOLEAN;
Returns TRUE if showing pre-action status.
PROCEDURE verify
(stack_in IN VARCHAR2 := defstk,
show_contents_in IN BOOLEAN := FALSE);
Requests that post-action status of stack be displayed for the specified stack (or all).
PROCEDURE noverify;
Turns off display of post-action status.
FUNCTION verifying RETURN BOOLEAN;
Returns TRUE if showing post-action status.
Copyright (c) 2000 O'Reilly & Associates. All rights reserved.