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: 103376,26a21b9e317dc639
X-Google-NewGroupId: yes
X-Google-Attributes: gida07f3367d7,domainid0,public,usenet
X-Google-Language: ENGLISH,ASCII-7-bit
Received: by 10.66.80.4 with SMTP id n4mr465749pax.7.1353410887381;
        Tue, 20 Nov 2012 03:28:07 -0800 (PST)
Path: 
 s9ni1536pbb.0!nntp.google.com!news.glorb.com!feeder.erje.net!eu.feeder.erje.net!eternal-september.org!feeder.eternal-september.org!mx04.eternal-september.org!.POSTED!not-for-mail
From: Brian Drummond <brian@shapes.demon.co.uk>
Newsgroups: comp.lang.ada
Subject: Re: Access type to member procedure of instance (Object Oriented
 programming in Ada)
Date: Tue, 20 Nov 2012 11:28:06 +0000 (UTC)
Organization: A noiseless patient Spider
Message-ID: <k8fpg6$1hv$3@dont-email.me>
References: <9b0bcb37-8ae3-440f-af4f-a796702e4250@googlegroups.com>
	<k8eh4g$bs8$1@munin.nbi.dk>
Mime-Version: 1.0
Injection-Date: Tue, 20 Nov 2012 11:28:06 +0000 (UTC)
Injection-Info: mx04.eternal-september.org;
 posting-host="dfff62e1e537b55df42008571c03e0fe";
	logging-data="1599"; mail-complaints-to="abuse@eternal-september.org";
	posting-account="U2FsdGVkX1/vHdK/c+YWxoUU/A/VzwSgxO8jMf6ylRE="
User-Agent: Pan/0.139 (Sexual Chocolate; GIT bf56508
	git://git.gnome.org/pan2)
Cancel-Lock: sha1:4tmkrkCPGlD3odAJOd0sMB5vFSc=
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
Date: 2012-11-20T11:28:06+00:00
List-Id: <comp.lang.ada>

On Mon, 19 Nov 2012 17:59:06 -0600, Randy Brukardt wrote:

> The "name" (Ada synax terminology) "Message.Print" represents a
> parameterless procedure, and can be used in the same way as other
> parameterless procedures. In particular, it can be renamed as a
> parameterless procedure:
> 
>     procedure P renames Message.Print;
...
procedure Main is
   Message : Some_Package.Message_Type;

   procedure P renames Message.Print;
begin
   Message.Print;
   P;
end Main;
...
./main
Hello
Hello

Damn that's nice!
Where's the upvote button on this thing?

-Brian