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,XPRIO
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,ff3b8295175e47f7,start
X-Google-Attributes: gid103376,public
From: "James Kerr" <jkerr@southwest.com.au>
Subject: Help with access types
Date: 2000/04/22
Message-ID: <956388888.780287@karri.southwest.com.au>#1/1
X-Deja-AN: 614233202
Cache-Post-Path: karri.southwest.com.au!unknown@tea-16.southwest.com.au
X-Trace: news.iinet.net.au 956388947 5703 news@203.16.9.20
Organization: SouthWest Internet Systems
X-MSMail-Priority: Normal
X-Priority: 3
X-Cache: nntpcache 2.4.0b3 (see http://www.nntpcache.org/)
Newsgroups: comp.lang.ada
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2314.1300
Date: 2000-04-22T00:00:00+00:00
List-Id: <comp.lang.ada>

Okay basically I have a Specification that has this in the private section

private

    type Node(Length: Integer);
    type Tree is access node;
    type Tree_Array is array (Integer range <>) of Tree;
    type Node(Length: Integer) is
        record
            Marker: Boolean;
            Symbols: Symbol_Array(1..Length);
            Subtrees: Tree_Array(1..Length);
        end record;

Okay what is the easiest way to access these record variables, (IE Marker,
Symbols, Length) from a program that is using this specification.

Basically in the body I have an Add procedure which adds nodes to the tree,
i want to be able to check the record variables from a test program I have
written,

any ideas

mail me at

jkerr@southwest.com.au

cheers

James