Re: Weird string I/O problem

[christoph.grein@eurocopter.com]

On 2 Dez., 07:55, a...@anon.org (anon) wrote:
> Have you ever learn, you do not give the complete code, because too many
> students like to steal code for there grade.
>
> So, you ONLY give enough code for the person to use the code to
> build his own. And that's what i did!

anon pretending educational intentions presents wrong code. What a
nice fellow!

for index in input_string'Range loop
  ... Here get the next char from the input stream.
  ... Be careful, there might be control characters.
  ... See Ada.Text_IO for appropriate subprograms.
  exit when char = CR or char = LF ;  -- not all OSes treat end of
lines like this
                                         this is why there are
End_of_Line queries
  input_string ( index ) := char ;
  Last := Index ;
end loop;

This would be the way, I guess.

To quote from Porgy and Bess: anon is a sometime thing.