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=ham autolearn_force=no version=3.4.4 X-Google-Thread: 103376,5b3aa4bc9027f04e X-Google-Attributes: gid103376,domainid0,public,usenet X-Google-Language: ENGLISH,ASCII Path: g2news2.google.com!postnews.google.com!q9g2000yqc.googlegroups.com!not-for-mail From: sjw Newsgroups: comp.lang.ada Subject: Re: Unconstrained Arrays Date: Sun, 29 Mar 2009 09:24:34 -0700 (PDT) Organization: http://groups.google.com Message-ID: References: <1a8008fb-c840-45bc-824c-d10eec9fe569@d36g2000prf.googlegroups.com> <0caa9cf8-0620-4544-9b2c-2c9f24142b7f@v23g2000pro.googlegroups.com> <386b0e00-a1c6-4c5f-adf7-89b8543d0e2d@c11g2000yqj.googlegroups.com> <46281cbb-2804-41e8-87a0-251c9060d4d1@c36g2000yqn.googlegroups.com> <000dc793-a278-4379-b44e-e5aa7375b0fc@e38g2000yqa.googlegroups.com> NNTP-Posting-Host: 82.20.239.213 Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable X-Trace: posting.google.com 1238343874 25111 127.0.0.1 (29 Mar 2009 16:24:34 GMT) X-Complaints-To: groups-abuse@google.com NNTP-Posting-Date: Sun, 29 Mar 2009 16:24:34 +0000 (UTC) Complaints-To: groups-abuse@google.com Injection-Info: q9g2000yqc.googlegroups.com; posting-host=82.20.239.213; posting-account=_RXWmAoAAADQS3ojtLFDmTNJCT0N2R4U User-Agent: G2/1.0 X-HTTP-UserAgent: Mozilla/5.0 (Macintosh; U; Intel Mac OS X 10_5_6; en-us) AppleWebKit/525.27.1 (KHTML, like Gecko) Version/3.2.1 Safari/525.27.1,gzip(gfe),gzip(gfe) Xref: g2news2.google.com comp.lang.ada:5351 Date: 2009-03-29T09:24:34-07:00 List-Id: On Mar 27, 9:39=A0am, Jean-Pierre Rosen wrote: > sjw a =E9crit : > > > My current problem is with this .. > > > =A0 =A0type Stream_Type > > =A0 =A0 =A0(Buffer : access Ada.Streams.Stream_Element_Array) > > =A0 =A0is new Ada.Streams.Root_Stream_Type with private; > > =A0 =A0-- =A0Provides an in-memory Stream over the elements of Buffer. > > =A0 =A0-- > > But why do you need to pass a Stream_Element_Array? Why not pass the > size as a discriminant, and have the buffer internal to Stream_Type. > > If you really need to access the buffer from the outside, you could have > a Get_Buffer function on Stream_Type that returns (your choice) the > buffer content, or a pointer to the internal buffer. To be useful, the pointer to the internal buffer would have to be an 'access Ada.Streams.Stream_Element_Array'. How could I create one of these from a constrained object? I think this idea of mine is a non-starter; I'll stick with the current BC.Support.Memory_Streams. No point providing a library component that no one can actually use!