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 2002:a37:4f8f:: with SMTP id
 d137mr11570277qkb.410.1563051750139;
        Sat, 13 Jul 2019 14:02:30 -0700 (PDT)
X-Received: by 2002:a9d:3e4e:: with SMTP id
 h14mr13556175otg.182.1563051749837;
 Sat, 13 Jul 2019 14:02:29 -0700 (PDT)
Path: 
 eternal-september.org!reader01.eternal-september.org!feeder.eternal-september.org!news.gegeweb.eu!gegeweb.org!usenet-fr.net!proxad.net!feeder1-2.proxad.net!209.85.160.216.MISMATCH!b26no6075225qtq.0!news-out.google.com!e17ni131qtg.1!nntp.google.com!b26no6075223qtq.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Sat, 13 Jul 2019 14:02:29 -0700 (PDT)
In-Reply-To: <5f53e122-6b99-48ca-b6cc-4ae43c0a2221@googlegroups.com>
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com;
 posting-host=71.250.209.52;
 posting-account=h3IwYwoAAAAeE2lWQnRSCqcQ0dO-KDvQ
NNTP-Posting-Host: 71.250.209.52
References: <5f53e122-6b99-48ca-b6cc-4ae43c0a2221@googlegroups.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <287024ef-def7-43fe-8bb5-94cae597ffa7@googlegroups.com>
Subject: Re: How can I create an empty array of a generic type?
From: b.mcguinness747@gmail.com
Injection-Date: Sat, 13 Jul 2019 21:02:30 +0000
Content-Type: text/plain; charset="UTF-8"
Xref: reader01.eternal-september.org comp.lang.ada:56865
Date: 2019-07-13T14:02:29-07:00
List-Id: <comp.lang.ada>

On Friday, July 12, 2019 at 11:36:02 PM UTC-4, b.mcgui...@gmail.com wrote:
> I have a generic package
> 
> 
> generic
>   type Element_Type is private;
>   type Key_Component_Type is private;
>   with function "<" (Left, Right : Key_Component_Type) return Boolean is <>;
>   with function "=" (Left, Right : Element_Type) return Boolean is <>;
> package Ternary_Trees is
> 
> ...
> 
> 
> private
> 
> ...
> 
>   Empty_Key  : constant Key_Type(1..0) := (others => Key_Component_Type'First);
> 
> ...
> 
> end Ternary_Trees;
> 
> 
> When I try to compile the package, I get an error message:
> 
> ternary_trees.ads:77:54: prefix for "First" attribute may not be private type
> 
> 
> How can I make this work?  I want to create an empty array so I can build up a key through concatenation as I descend recursively through a tree.
> 
> Thanks.
> 
> --- Brian McGuinness

Ok.  Thanks for the help

--- Brian McGuinness