From: "Dmitry A. Kazakov" <mailbox@dmitry-kazakov.de>
Subject: Re: Reference counting and idempotent finalize
Date: Wed, 11 Sep 2013 14:16:00 +0200
Date: 2013-09-11T14:16:00+02:00 [thread overview]
Message-ID: <1c1whdbu9kbp9$.1vifz4b2nlphs.dlg@40tude.net> (raw)
In-Reply-To: slrnl30ie3.1lme.lithiumcat@sigil.instinctive.eu
On Wed, 11 Sep 2013 10:45:37 +0000 (UTC), Natasha Kerensikova wrote:
> procedure Release (Access_Value : in out Access_To_Actual_Data) is
> begin
> if Access_Value /= null then
> Access_Value.all.Counter := Access_Value.all.Counter - 1;
A minor stylistic issue, you don't need .all in order to access components:
Access_Value.Counter := Access_Value.Counter - 1;
--
Regards,
Dmitry A. Kazakov
http://www.dmitry-kazakov.de
next prev parent reply other threads:[~2013-09-11 12:16 UTC|newest]
Thread overview: 21+ messages / expand[flat|nested] mbox.gz Atom feed top
2013-09-11 10:45 Reference counting and idempotent finalize Natasha Kerensikova
2013-09-11 11:21 ` AdaMagica
2013-09-11 12:12 ` Dmitry A. Kazakov
2013-09-12 5:34 ` Natasha Kerensikova
2013-09-12 7:33 ` Dmitry A. Kazakov
2013-09-11 12:16 ` Dmitry A. Kazakov [this message]
2013-09-12 4:53 ` Natasha Kerensikova
2013-09-11 12:21 ` Jeffrey R. Carter
2013-09-11 20:03 ` Simon Wright
2013-09-12 4:46 ` Natasha Kerensikova
2013-09-12 5:05 ` Natasha Kerensikova
2013-09-12 7:54 ` Dmitry A. Kazakov
2013-09-12 17:03 ` Jeffrey R. Carter
2013-09-11 13:50 ` Pascal Obry
2013-09-12 4:56 ` Natasha Kerensikova
2013-09-12 14:33 ` Simon Wright
2013-09-12 15:40 ` Pascal Obry
2013-09-12 10:23 ` sbelmont700
2013-09-30 6:25 ` Natasha Kerensikova
2013-09-30 10:02 ` AdaMagica
2013-10-01 6:22 ` Natasha Kerensikova
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox