comp.lang.ada
 help / color / mirror / Atom feed
From: "Gep" <nodsa@sdfsffds.net>
Subject: Re: string manipulation
Date: Sat, 7 Dec 2002 18:20:50 -0500
Date: 2002-12-07T18:20:50-05:00	[thread overview]
Message-ID: <ynvI9.27498$Mn4.329910@wagner.videotron.net> (raw)
In-Reply-To: BhvI9.27495$Mn4.328936@wagner.videotron.net


"Gep" <nodsa@sdfsffds.net> wrote in message
news:BhvI9.27495$Mn4.328936@wagner.videotron.net...
> Is it possible to declare a string to be exactly 10 characters long and
> still be a variable? then
> for example
>
> declare V_string as being exactly 10 characters
>
>
> while not valid
> loop
> get_line(V_string, V_length);
>
> if v_Art_lng = t_Art_article.t_art_proprietaire.v_nas'length then
>       Skip_Line;
>       Valid := True;
> else
>     valid :=false;
>     Put("invalid");
> end if;
>
> end loop;


oops the code should be as follows

 while not valid
loop
 get_line(V_string, V_length);

 if V_length= V_string'length then
      Skip_Line;
      Valid := True;
 else
     valid :=false;
     Put("invalid");
 end if;
end loop;






  reply	other threads:[~2002-12-07 23:20 UTC|newest]

Thread overview: 10+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2002-12-07 23:14 string manipulation Gep
2002-12-07 23:20 ` Gep [this message]
2002-12-08  2:24   ` Jeffrey Carter
2002-12-08 18:34     ` Gep
2002-12-08 14:02   ` Marin David Condic
2002-12-08  0:07 ` Jacob Sparre Andersen
2002-12-08  0:12 ` James S. Rogers
  -- strict thread matches above, loose matches on Subject: below --
1998-09-22  0:00 String Manipulation SiliconJesus
1998-09-23  0:00 ` David C. Hoos, Sr.
1998-04-08  0:00 Howard Davies
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox