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.9 required=5.0 tests=BAYES_00,FREEMAIL_FROM
	autolearn=unavailable autolearn_force=no version=3.4.4
X-Received: by 10.66.220.163 with SMTP id px3mr4391910pac.38.1382726431003;
        Fri, 25 Oct 2013 11:40:31 -0700 (PDT)
X-Received: by 10.50.67.17 with SMTP id j17mr90384igt.8.1382726430748; Fri, 25
 Oct 2013 11:40:30 -0700 (PDT)
Path: 
 eternal-september.org!reader01.eternal-september.org!reader02.eternal-september.org!news.eternal-september.org!news.eternal-september.org!news.eternal-september.org!feeder.eternal-september.org!news.glorb.com!z6no58956033pbz.1!news-out.google.com!z6ni91518pbu.0!nntp.google.com!i2no34067242qav.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Fri, 25 Oct 2013 11:40:30 -0700 (PDT)
In-Reply-To: <0d509f96-1f16-4553-8e31-245ab7298322@googlegroups.com>
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com;
 posting-host=66.126.103.122;
 posting-account=RxNzCgoAAACA5KmgtFQuaU-WaH7rjnAO
NNTP-Posting-Host: 66.126.103.122
References: <5bae226f-91a2-4da0-a802-185a0de514f3@googlegroups.com>
 <0d509f96-1f16-4553-8e31-245ab7298322@googlegroups.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <36a35fe3-58bf-44b4-af99-3d2c42b559ed@googlegroups.com>
Subject: Re: How to do null comparision with pointers in ADA83?
From: Adam Beneschan <adambeneschan@aol.com>
Injection-Date: Fri, 25 Oct 2013 18:40:30 +0000
Content-Type: text/plain; charset=ISO-8859-1
Xref: news.eternal-september.org comp.lang.ada:17537
Date: 2013-10-25T11:40:30-07:00
List-Id: <comp.lang.ada>

On Friday, October 25, 2013 11:33:14 AM UTC-7, seshuch...@gmail.com wrote:

> Here my code is 
> 
> type AVL_Node_Ref is access AVL_Node;
> 
> procedure Search_Insert (T : in out AVL_Tree;
>                             Element : VCAST_MCDC_Statement_Ptr;
>                             Node : in out AVL_Node_Ref;
>                             Increased : in out Boolean;
>                             Inserted : out Boolean)
> 
> begin
> if Node = null then

Is the place where AVL_Node_Ref is declared in the "private" part of a package?  And is there something that says "type AVL_Node_Ref is private;"?

                        -- Adam