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!news.eternal-september.org!news.eternal-september.org!.POSTED!not-for-mail
From: Jeffrey Carter <spam.jrcarter.not@spam.not.acm.org>
Newsgroups: comp.lang.ada
Subject: Re: 4 beginner's questions on the PL Ada
Date: Fri, 09 Aug 2013 17:52:29 -0700
Organization: Also freenews.netfront.net; news.tornevall.net
Message-ID: <ku42sd$fi5$2@dont-email.me>
References: <87ob96ajv6.fsf@VLAN-3434.student.uu.se>
 <03ea570b-e45f-4694-ab9b-3413c4770379@googlegroups.com>
 <ku3eb3$7ql$1@loke.gir.dk> <878v0aee8i.fsf@VLAN-3434.student.uu.se>
 <ku3opa$svn$3@dont-email.me> <87txiycxx9.fsf@VLAN-3434.student.uu.se>
Mime-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Transfer-Encoding: 7bit
Injection-Date: Sat, 10 Aug 2013 00:52:31 +0000 (UTC)
Injection-Info: mx05.eternal-september.org;
 posting-host="da68e1c0dc00d4aa5d0283c494e3a17a";
	logging-data="15941"; mail-complaints-to="abuse@eternal-september.org";
	posting-account="U2FsdGVkX18DlQQYDFcRlzgQx3N2ii3BNZMN37hZ598="
User-Agent: Mozilla/5.0 (X11; Linux x86_64;
 rv:17.0) Gecko/17.0 Thunderbird/17.0
In-Reply-To: <87txiycxx9.fsf@VLAN-3434.student.uu.se>
Cancel-Lock: sha1:3TSjbDypmrjOip71vDTVIXKjbJA=
Xref: news.eternal-september.org comp.lang.ada:16766
Date: 2013-08-09T17:52:29-07:00
List-Id: <comp.lang.ada>

On 08/09/2013 03:16 PM, Emanuel Berg wrote:
>
> That sounds great. Unless it requires lots of code, why don't you
> just show me how it is done? It is much easier understanding that
> way.

In my original response I referenced PragmARC.Reflection and included a link to 
the PragmAda Reusable Components, allowing you to examine how it's done if you 
wanted. It's not a whole lot of code, but it is somewhat complex, using 
Ada.Strings.Fixed.Index to trim off unwanted parts of the returned name and 
converting the result to mixed case. Even after seeing it you'll probably want 
to experiment with Expanded_Name to understand what it's doing.

-- 
Jeff Carter
"Well, a gala day is enough for me. I don't think
I can handle any more."
Duck Soup
93