Re: Ada95 Data Structures

Re: Ada95 Data Structures

[Robert Dewar]

That reminds me, has anyone taken a look at the proposed STL (standard
template library) for C++ with an eye to implementing a similar library
for Ada 95?

Ada95 Data Structures

[Jack Beidler]

For those who may be interested, a collection of data structures
written in Ada95 is available via anonymous ftp from

    ftp.cs.uofs.edu

They are in the file Ada95ds.zip in the pub/Ada subdirectory.

The zip file expands into a single file following the pager2
format.  It contains various examples of stacks, queues, lists,
binary trees, and n-ary trees.  It includes some examples of
data structures that may contain tagged types, and examples of
structures made visible as controlled types.  They all compile
and run under gnat v.2.03.

The expanded file can be "gnatchop"ped once the two descriptive
files are removed from the beginning of the paged file and the
sets of data are removed from the end of the file.

Features of interest:
1.  A family of list packages all derived from a single package
    with each packages providing different client-package visibility.

2.  The list and tree packages make use of three Ada95 features
    (aliased, access all, and 'Class) to produce a recursive
    representation of the structures.

3.  The queue and stack packages have child units containing
    features that override the fundamental structures.

There are several test programs and data sets included.

This suite of software is currently being used in two courses and
have not been thoroughly tested.  A more complete set will be
released in about six weeks, once the semester is over.

PS:  Also at ftp.cs.uofs.edu is a collection of Visual Basic
examples in pub/VB
-- 
+----------------------------------------+------------------------+
|John (Jack) Beidler                    ++   beidler@cs.uofs.edu  |
|  Professor, Computing Sciences Dept. ++                         |
|  University of Scranton             ++  (717) 941-7446 (voice)  |
| Scranton, PA 18510                 ++     (717) 941-4250 (FAX)  |
|      WWW site:  http://www.cs.uofs.edu/CS/cs.home.html          |
+------------------------------------+----------------------------+

Re: Ada95 Data Structures -- Correction

[Jack Beidler]

In article <3n6ep4$nac@gopher.cs.uofs.edu>, beidler@guinness.cs.uofs.edu (Jack Beidler) writes:
|> For those who may be interested, a collection of data structures
|> written in Ada95 is available via anonymous ftp from
|> 
|>     ftp.cs.uofs.edu
|> 
|> They are in the file Ada95ds.zip in the pub/Ada subdirectory.
|> 
|> The zip file expands into a single file following the pager2
|> format.  It contains various examples of stacks, queues, lists,
|> binary trees, and n-ary trees.  It includes some examples of
|> data structures that may contain tagged types, and examples of
|> structures made visible as controlled types.  They all compile
|> and run under gnat v.2.03.
|> 
|> The expanded file can be "gnatchop"ped once the two descriptive
|> files are removed from the beginning of the paged file and the
|> sets of data are removed from the end of the file.
|> 
|> Features of interest:
|> 1.  A family of list packages all derived from a single package
|>     with each packages providing different client-package visibility.
|> 
|> 2.  The list and tree packages make use of three Ada95 features
|>     (aliased, access all, and 'Class) to produce a recursive
|>     representation of the structures.
|> 
|> 3.  The queue and stack packages have child units containing
|>     features that override the fundamental structures.
|> 
|> There are several test programs and data sets included.
|> 
|> This suite of software is currently being used in two courses and
|> have not been thoroughly tested.  A more complete set will be
|> released in about six weeks, once the semester is over.
|> 
|> PS:  Also at ftp.cs.uofs.edu is a collection of Visual Basic
|> examples in pub/VB

A corrected version of the Ada95ds.zip file has been placed in 
pub/Ada.  It unzips into

guinness% unzip Ada95ds.zip
  Inflating: read.me                
  Inflating: stack.pag              
  Inflating: queue.pag              
  Inflating: list.pag               
  Inflating: tree.pag               
  Inflating: samples.pag            
  Inflating: random.dat             
  Inflating: words.dat              
  Inflating: morse.cod              
  Inflating: message.cdd  

Each .pag file is now compatible with gnatchop, which may be used to
separate the paged files into the various .ads and .adb files,

guinness% gnatchop list.pag
splitting list.pag into: 
   list_2way_pt_lpt.ads 
   list_2way_pt_lpt.adb 
   list_2way_pt_lpt-advanced.ads 
   list_2way_pt_lpt-advanced.adb 
   list_2way_pt_lpt-iterators.ads 
   list_2way_pt_lpt-iterators.adb 
   list_lpbase.ads 
   list_lpbase.adb 
   list_ppbase.ads 
   list_ppbase.adb 
   list_pt_lpt.ads 
   list_pt_lpt.adb 
   list_lpt_lpt.ads 
   list_lpt_lpt.adb 
   list_lpt_cntl.ads 
   list_lpt_cntl.adb 
   list_pt_cntl.ads 
   list_pt_cntl.adb 
   list_tag_cntl.ads 
   list_tag_cntl.adb 
   list_tag_lpt.ads 
   list_tag_lpt.adb 

Pager2, which is on the Ada CDROM, may also be used to split the 
paged files.  ALSO, when "chopped" on SUNs, each line ends with
a ^M (because they were originally taken from a PC).  This has no
effect on there compilation and use.
-- 
+----------------------------------------+------------------------+
|John (Jack) Beidler                    ++   beidler@cs.uofs.edu  |
|  Professor, Computing Sciences Dept. ++                         |
|  University of Scranton             ++  (717) 941-7446 (voice)  |
| Scranton, PA 18510                 ++     (717) 941-4250 (FAX)  |
|      WWW site:  http://www.cs.uofs.edu/CS/cs.home.html          |
+------------------------------------+----------------------------+