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 autolearn=ham
	autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,fed2e7871ca258cd
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2001-12-18 20:04:26 PST
Path: 
 archiver1.google.com!news1.google.com!sn-xit-02!supernews.com!news.tele.dk!small.news.tele.dk!130.133.1.3!fu-berlin.de!uni-berlin.de!ppp-1-20.cvx4.telinco.NET!not-for-mail
From: "Nick Roberts" <nickroberts@adaos.worldonline.co.uk>
Newsgroups: comp.lang.ada
Subject: Re: List Container Strawman 1.4
Date: Wed, 19 Dec 2001 04:03:27 -0000
Message-ID: <9vp3k7$gu5d7$1@ID-25716.news.dfncis.de>
References: <GaVR7.59636$xS6.97761@www.newsranger.com>
 <87heqs5awc.fsf@deneb.enyo.de> <v6iT7.14178$Kg2.1380222@rwcrnsc51>
 <87k7vkxkdw.fsf@deneb.enyo.de> <7wPT7.3528$NM4.163592@rwcrnsc53>
NNTP-Posting-Host: ppp-1-20.cvx4.telinco.net (212.1.148.20)
X-Trace: fu-berlin.de 1008734664 17765799 212.1.148.20 (16 [25716])
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 5.50.4133.2400
X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4133.2400
Xref: archiver1.google.com comp.lang.ada:18080
Date: 2001-12-19T04:03:27+00:00
List-Id: <comp.lang.ada>

I think this requirement can be solved by adding a generic child.


   generic
      type Alternate_Index is (<>);
      type Alternate_Array is array (Alternate_Index range <>) of
Element_Type;

   package x.Lists.Unbounded.Array_Conversion is

      function To_Alternate (Item:  in Element_Array;
                             First: in Alternate_Index :=
Alternate_Index'First)
        return Alternate_Array;

      function From_Alternate (Item:  in Alternate_Array;
                               First: in Positive := 1)
        return Element_Array;
   end;


and the same for Bounded.

--
Best wishes,
Nick Roberts