Re: Text_io, beginer's question

["Frank C. Post" <postman@christcom.net>]

Try this:

fname        : fname_type := (others=>' ');
fname_ndx : natural        := natural'first;

text_io.get_line(fname,fname_ndx);
if fname_ndx = fname'last then
   text_io.skip_line;
end if;

Indiscriminant use of text_io.skip_lines commonly cause more problems than
they solve.  If you want to know why, send me some email and I'll send you
a personal reply.

--postman

> > Wrote a loop to read in strings along with other types of variable from
> > keyboard.  Except the first time it was encounted in the loop, the line
> > " Text_IO.Get_Line(String, StringLength)" would not be executed.  Any
> > idea how to fix that?  BTW, I am using win95 GNAT v.304a.  Thanks in
> > advance.
> 
> Stick a Text_IO.Skip_Line in the code right before the loop. This might
work.
> I have had similar problems using Get_Line and sometimes a Skip_Line will
help.
> I don't know why, but if it works it works.
> 
> Hope this helps.
> 
> Wiley Wimberly
>