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-Thread: a07f3367d7,19b8909eebb73a8e X-Google-Attributes: gida07f3367d7,public,usenet X-Google-NewGroupId: yes X-Google-Language: ENGLISH,ASCII-7-bit Path: g2news2.google.com!news2.google.com!news.glorb.com!feeder.erje.net!ecngs!feeder2.ecngs.de!newsfeed.freenet.de!novso.com!news.skynet.be!195.238.0.222.MISMATCH!newsspl501.isp.belgacom.be!tjb!not-for-mail Date: Sat, 30 May 2009 16:48:37 +0200 From: Olivier Scalbert User-Agent: Thunderbird 2.0.0.21 (X11/20090409) MIME-Version: 1.0 Newsgroups: comp.lang.ada Subject: Re: Question on Controlled types References: <4a211b98$0$2862$ba620e4c@news.skynet.be> <1m6a6s5xq3hrf.1i7zbi65wq3cd$.dlg@40tude.net> <4a213fd0$0$2847$ba620e4c@news.skynet.be> In-Reply-To: <4a213fd0$0$2847$ba620e4c@news.skynet.be> Content-Type: text/plain; charset=ISO-8859-1; format=flowed Content-Transfer-Encoding: 7bit Message-ID: <4a214769$0$2865$ba620e4c@news.skynet.be> Organization: -= Belgacom Usenet Service =- NNTP-Posting-Host: ca15990e.news.skynet.be X-Trace: 1243694953 news.skynet.be 2865 80.201.76.217:43111 X-Complaints-To: usenet-abuse@skynet.be Xref: g2news2.google.com comp.lang.ada:6122 Date: 2009-05-30T16:48:37+02:00 List-Id: More accurately from the Delay_Line user point of view, I would like to be able to: 1- Create a Delay_Line: Delay1 : Delay_Line := Make_Delay_Line(Duration: Duration_Type); -- here the internal large array is created on the heap. 2- Use it (I prefer dot notation!): Delay1.Set_Input(Input_Signal); Output_Signal := Delay1.Get_Output(); 3- Be able to adjust the duration later: Delay1.Set_Duration(...); -- here the new array is created, the values of the old array are processed and re-injected into the new one and then the old array is freed. 4- When Delay1 will end his life, I want the allocated array to be freed. 5- I do not need this: Delay2 := Delay1; Olivier