[comp.lang.pascal] Queue, stack and doublely-linked list OBJECTS

TOMJ@csdserver3.csd.scarolina.edu (Thomas E. Jenkins, Jr.) (05/18/91)

Hi,

  I've placed an archive ( TJOOP10.ZIP ) at both garbo and simtel for FTP.
Please feel free to use these objects.

garbo :  128.214.12.37   /pc/turbopas   TJOOP10.ZIP
simtel:  192.88.110.20   PD:<MSDOS.TURBOPAS>TJOOP10.ZIP

Here's the readme file :

README.DOC          5/17/1991

The files in this archive should include :

README.DOC     This file
BASETYPE.PAS   The base object types used by the OOP data structures.
ELEMENTS.PAS   Elements useable in the data structures.  This currently
               includes an integer object, a real object, and a string
object.
STACKOBJ.PAS   Unit defining the stack object and it's basic functionality.
               It is possible ( and expected ) to be extended.
QUEUEOBJ.PAS   Unit defining the queue object and it's basic functionality.
               Again, through OOP and inheritance, this object can be
extended.
DLISTOBJ.PAS   Unit defining the doubly-linked list object and it's basic
               functionality.  This could be extended furthur as well.
DLSTTEST.PAS   Program to show use of a DListOBJ.
QUEUTEST.PAS   Program to show use of a QueueOBJ.
STCKTEST.PAS   Program to show use of a StackOBJ.

=============================================================================

There is some documentation in each Unit, but the choice of variable and
method
names should be self documenting.  Each unit includes an inheritance tree as
well.  Please feel free to contact the author with questions or bugs.  Please
use this code if you want, but do give me some credit ;-).  I hope these
units
can help some people grasp OOP and polymorphism, because they were ( are )
very
difficult subjects to master.  Also note that the method I chose to implement
these objects could have been different, there's several ways to skin the cat
as they say.

tom

      Thomas E. Jenkins, Jr.
      9732 Windsor Lake Blvd.
      Columbia, SC 29223

      wk  (803) 777-6666  ( ask for tom - see next note too ;-)
      hm  (803) 788-7179  ( no collect calls please ;-)

tom
+--------------------------------------------------------------------------+
|  Thomas E. Jenkins, Jr.   Programmer, University of South Carolina CSD   |
+--------------------------------------------------------------------------+
| BITNET         :  C0361@UNIVSCVM.BITNET  |  CSDNET  :  tomj/csdserver3   |
| INTERNET       :  TOMJ@csdserver3.csd.scarolina.EDU          {PREFERRED} |
|                :  C0361@univscvm.csd.scarolina.EDU  |  129.252.43.30     |
| FROM Compuserv :  INTERNET:TOMJ@csdserver3.csd.scarolina.EDU {PREFERRED} |
|                :  INTERNET:C0361@univscvm.csd.scarolina.EDU              |
+--------------------------------------------------------------------------+