From mboxrd@z Thu Jan 1 00:00:00 1970 X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me X-Spam-Level: X-Spam-Status: No, score=-1.3 required=5.0 tests=BAYES_00,INVALID_MSGID autolearn=no autolearn_force=no version=3.4.4 X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 103376,43c864810fef7743 X-Google-Attributes: gid103376,public From: beidler@guinness.cs.uofs.edu (Jack Beidler) Subject: Re: Ada95 Data Structures -- Correction Date: 1995/04/21 Message-ID: <3n8s2d$pkl@gopher.cs.uofs.edu>#1/1 X-Deja-AN: 101370084 distribution: world references: <3n6ep4$nac@gopher.cs.uofs.edu> organization: Department of Computing Sciences newsgroups: comp.lang.ada Date: 1995-04-21T00:00:00+00:00 List-Id: 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 | +------------------------------------+----------------------------+