From: Preben Randhol <randhol+abuse@pvv.org>
Subject: Re: Problem with Enumaration and visibility
Date: Wed, 14 Nov 2001 16:55:35 +0000 (UTC)
Date: 2001-11-14T16:55:35+00:00 [thread overview]
Message-ID: <slrn9v5ce2.k38.randhol+abuse@kiuk0156.chembio.ntnu.no> (raw)
In-Reply-To: mailman.1005748642.20883.comp.lang.ada@ada.eu.org
On Wed, 14 Nov 2001 14:48:47 +0100, Wilhelm Spickermann wrote:
>
>
> --On Mittwoch, November 14, 2001 13:03:19 +0000 Preben Randhol
><randhol+abuse@pvv.org> wrote:
>
> ...
>> if Method = Setup.Method_Enum_Type'(Spell) then
> ^ ^^^^^
>
> These are two items which are defined in Setup and need a
> "Setup." too, if you want to avoid using "use". This leads to:
>
> ...
> if Setup."=" (Method, Setup.Method_Enum_Type'(Setup.Spell)) then
> ...
>
> which can be simplified to:
>
> ...
> if Setup."=" (Method, Setup.Spell) then
> ...
>
> The ugly �Setup."="� can be avoided by a "use type" clause:
>
> ...
> use type Setup.Method_Enum_Type;
> Method : Setup.Method_Enum_Type := Setup.Get_Method;
> begin
> if Method = Setup.Spell then
Thanks. I understand!
Preben
next prev parent reply other threads:[~2001-11-14 16:55 UTC|newest]
Thread overview: 7+ messages / expand[flat|nested] mbox.gz Atom feed top
[not found] <slrn9v4uqg.h34.randhol+abuse@kiuk0156.chembio.ntnu.n o>
2001-11-14 13:03 ` Problem with Enumaration and visibility Preben Randhol
2001-11-14 13:48 ` Wilhelm Spickermann
2001-11-14 16:55 ` Preben Randhol [this message]
2001-11-14 15:28 ` Ted Dennison
2001-11-14 16:32 ` Jeffrey Carter
2001-11-14 17:25 ` Preben Randhol
2001-11-14 15:37 Hambut Frumblefoot
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox