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=unavailable autolearn_force=no version=3.4.4 Path: eternal-september.org!reader01.eternal-september.org!reader02.eternal-september.org!news.eternal-september.org!mx02.eternal-september.org!.POSTED!not-for-mail From: "Jeffrey R. Carter" Newsgroups: comp.lang.ada Subject: Re: Ada 2005,Doubly_Linked_List with Controlled parameter Date: Mon, 4 Apr 2016 19:27:45 -0700 Organization: Also freenews.netfront.net; news.tornevall.net; news.eternal-september.org Message-ID: References: Mime-Version: 1.0 Content-Type: text/plain; charset=windows-1252 Content-Transfer-Encoding: 7bit Injection-Date: Tue, 5 Apr 2016 02:24:31 -0000 (UTC) Injection-Info: mx02.eternal-september.org; posting-host="48b46be33beed75863f69afa437f956b"; logging-data="10515"; mail-complaints-to="abuse@eternal-september.org"; posting-account="U2FsdGVkX18S46ZD8hQX0nb259G+l3JWTh5fV6I21+A=" User-Agent: Mozilla/5.0 (X11; Linux x86_64; rv:38.0) Gecko/20100101 Thunderbird/38.6.0 In-Reply-To: Cancel-Lock: sha1:fduFCocODYTNGeJ30TlMmWu+yiY= Xref: news.eternal-september.org comp.lang.ada:29976 Date: 2016-04-04T19:27:45-07:00 List-Id: On 04/04/2016 07:03 PM, George J wrote: > > Problem is that after calling "Append"->at once starts Finalization proc, so > appended pure line. I just use an access parameter after this > "Doubly_Linked_List(Info)", and it's ok now,but i think that i'm wrong,cause > Finalization doesn't start with Test_List.Clear and when exiting program. So > question is "How I can finalize Doubly_Connected_List Controlled parameter > correctly?Or I must not use Controlled parameter in this list?". Rather than trying to reinvent unbounded strings (incorrectly), use Ada.Strings.Unbounded.Unbounded_String instead of Info_Record and all your problems will disappear. Get rid of type Info while you're at it. -- Jeff Carter "Hold your temper. Count ten.... Now let 'er go. You got a good aim." Never Give a Sucker an Even Break 105