From: Christoph Grein <christoph.grein@eurocopter.com>
Subject: Re: constrained subtypes
Date: Tue, 12 Mar 2002 08:59:43 +0100 (MET)
Date: 2002-03-12T08:59:43+01:00 [thread overview]
Message-ID: <mailman.1015920063.13431.comp.lang.ada@ada.eu.org> (raw)
subtype X is Integer range 1 .. 8;
V : X;
I: Integer;
begin
case V is
when 1 .. 7 =>
when 8 =>
end case;
case I is
when 1 .. 7 =>
when 8 =>
when others =>
end case;
case X'(I) is
when 1 .. 7 =>
when 8 =>
end case;
Hope this helps.
next reply other threads:[~2002-03-12 7:59 UTC|newest]
Thread overview: 16+ messages / expand[flat|nested] mbox.gz Atom feed top
2002-03-12 7:59 Christoph Grein [this message]
-- strict thread matches above, loose matches on Subject: below --
2002-03-14 11:01 constrained subtypes Christoph Grein
2002-03-13 6:22 Christoph Grein
2002-03-13 14:18 ` Robert Dewar
2002-03-12 10:37 Christoph Grein
2002-03-11 15:00 George Stevens
2002-03-11 16:16 ` Stephen Leake
2002-03-11 16:50 ` Jeffrey Carter
2002-03-11 21:05 ` Anh_Vo
2002-03-12 9:39 ` George Stevens
2002-03-12 10:38 ` Martin Dowie
2002-03-12 11:57 ` George Stevens
2002-03-12 12:02 ` Martin Dowie
2002-03-12 12:03 ` Martin Dowie
2002-03-12 16:42 ` Jeffrey Carter
2002-03-13 22:09 ` Wannabe h4x0r
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox