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=-0.9 required=5.0 tests=BAYES_00,FORGED_GMAIL_RCVD, FREEMAIL_FROM autolearn=no autolearn_force=no version=3.4.4 X-Google-Thread: 103376,ec2a500cce3658c4 X-Google-Attributes: gid103376,public X-Google-Language: ENGLISH,ASCII-7-bit Path: g2news1.google.com!postnews1.google.com!not-for-mail From: mosteo@gmail.com (Alex R. Mosteo) Newsgroups: comp.lang.ada Subject: Re: Memory leak - What the ...? Date: 13 Oct 2004 06:01:12 -0700 Organization: http://groups.google.com Message-ID: References: NNTP-Posting-Host: 62.101.166.128 Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: 8bit X-Trace: posting.google.com 1097672473 23406 127.0.0.1 (13 Oct 2004 13:01:13 GMT) X-Complaints-To: groups-abuse@google.com NNTP-Posting-Date: Wed, 13 Oct 2004 13:01:13 +0000 (UTC) Xref: g2news1.google.com comp.lang.ada:5147 Date: 2004-10-13T06:01:12-07:00 List-Id: Matthew Heaney wrote in message news:... > Stephen Leake writes: > > > function Create (Data : in Ada.Streams.Stream_Element_Array) > > return Udp_Message > > is > > Msg : Udp_Message := > > (Ada.Finalization.Controlled with > > Data => new Ada.Streams.Stream_Element_Array'(Data)); > > begin > > return Msg; > > end Create; > > Implement Create this way: > > function Create (Data : in Ada.Streams.Stream_Element_Array) > return Udp_Message is > begin > return (Controlled with new Stream_Element_Array'(Data)); > end Create; > > Rerun your program with the change above and post your results. You're so right. However it doesn't seem to make a difference for the leak. I'm going to try with the Debug_Pool now. Thanks!