From: peter.h.m.brooks@gmail.com (Peter Brooks)
Subject: Re: Where would you start debugging?
Date: Fri, 28 Jun 2013 10:35:24 +0000 (UTC)
Date: 2013-06-28T10:35:24+00:00 [thread overview]
Message-ID: <kqjotc$qvq$1@news.albasani.net> (raw)
In-Reply-To: 51cc4d55$0$6637$9b4e6d93@newsspool2.arcor-online.net
G.B. <rm-dash-bau-haus@dash.futureapps.de> wrote:
> Will 'Value do?
>
> type Enum is (Yeah, Bee, See);
>
> ...
>
> declare
> use Ada.Command_Line;
> Test : Enum;
> begin
> Test := Enum'Value (Argument (1));
> Text_IO.Put_Line (Natural'Image (Enum'Pos (Test)));
> exception
> when Constraint_Error =>
> -- ...
> end;
>
Perfect - thank you!
prev parent reply other threads:[~2013-06-28 10:35 UTC|newest]
Thread overview: 4+ messages / expand[flat|nested] mbox.gz Atom feed top
2013-06-27 13:53 Where would you start debugging? Peter Brooks
2013-06-27 14:24 ` Peter Brooks
2013-06-27 14:33 ` G.B.
2013-06-28 10:35 ` Peter Brooks [this message]
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox