Re: C getchar() functionality in Ada

[anon@anon.org (anon)]

Actually you can input "end of line" and "end of file" character in Ada you 
just use the "Get_Immediate" routine in "Ada.Text_IO" instead of Get.

with Ada.Text_IO ;
use  Ada.Text_IO ;

procedure a is
    Keystroke : character ;
    Ready     : Boolean ;
  begin
    Keystroke := ' ' ;
    while Keystroke /= 'q' loop   -- just away to stop program
      Get_Immediate ( Keystroke, Ready ) ;
      if ready then
        Put ( Keystroke ) ;
      end if ;
    end loop ;
  end ;

And is "Ada.Text_IO" broken? Not if you use the correct routine or the correct
job. And Ada in the pure form, is a base that one can create better and more 
useful packages for each job that one needs.

In <wccab8kbpdp.fsf@shell01.TheWorld.com>, Robert A Duff <bobduff@shell01.TheWorld.com> writes:
>Hyman Rosen <hyrosen@mail.com> writes:
>
>> Thomas Locke wrote:
>>> But I understand what you're saying: No end of line characters in Ada!
>                                                                  ^^^^^^
>....in Ada.Text_IO.
>
>>> Except perhaps when using Get_Immediate and Look_Ahead?
>>
>> The Ada design has the same error here as Pascal did.
>      ^^^^^^^^^^
>....Ada.Text_IO design...
>
>Text_IO is a bit broken, I agree.  But you can also use streams,
>or you can interface directly to the underlying OS primitives.
>
>Ada has a lot of strengths, but unfortunately, the design of the
>Ada.Text_IO package is not one of them.
>
>- Bob