Re: Ada95 Data Structures -- Correction

[beidler@guinness.cs.uofs.edu (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          |
+------------------------------------+----------------------------+