Re: Case statement and Integers.

["Vadim Godunko" <vgodunko@vipmail.ru>]

Sorry, this is my mistake. The correct expamle:

case Numbers (J) is
   when Numbers_Array_Element_Type'First .. Pivot - 1 =>
      ...
   when Pivot + 1 .. Numbers_Array_Element_Type'Last =>
      ...
   when others =>
      null;
end case;

and, Pivot must be constant.

----- Original Message -----
From: "Robert Dewar" <dewar@gnat.com>
Newsgroups: comp.lang.ada
Sent: Monday, April 22, 2002 7:05 AM
Subject: Re: Case statement and Integers.


> "Vadim Godunko" <vgodunko@vipmail.ru> wrote in message
news:<mailman.1019330222.4196.comp.lang.ada@ada.eu.org>...
>
> > case Numbers(J) is
> >    when Numbers (J) in Numbers_Array_Element_Type'First .. Pivot - 1 =>
> >       swap ...
> >    when Numbers (J) in Pivot + 1 .. Numbers_Array_Element_Type'Last =>
> >       swap ...
> >    when others =>
> >       null;
> > end case;
>
> Please don't post junk code. If you are trying to be deliberately
unhelpful,
> do it by email. If you really think that the above is correct, you are as
> seriously confused as the questioner :-)
>
> As always, I suggest that people actually compile any sample code they
> think of suggesting on CLA.