Re: newbie problem - how to

[dale@cs.rmit.edu.au (Dale Stanbrough)]

Dana Holland  wrote:

" I was about to send in a bug report, and then saw in the archives of this
  newsgroup that it wouldn't do any good (other people's opinions, not mine).
  Does this truly mean that something is wrong with GNAT, or does it mean that
  I've keyed something in wrong?  The section of code looks like this, with
  Line 23 marked:"

Gnat actually has a bad taste detector, and found that trying to read
your unindented source code left a bad taste in it's mouth :-).


 task body WriteChar is
 c : character;
 i : integer;
 begin
 loop
 select
 when not Buffer.full=>
 accept Write(ch : in character) do
 c := ch;
 end Write;
 i := (Buffer.rear + 1) mod 10;               <-------   Line 23
 delay 0.01;
 Buffer.rear := i;
 Buffer.empty := false;
 Buffer.List(Buffer.rear) := c;
 i := Buffer.count + 1;
 delay 0.1;
 Buffer.count := i;
 if (Buffer.count = 10) then
 Buffer.full := true;
 end if;
or
 delay 0.1;
 end select;
 end loop;
 end WriteChar;



seriously i'm not even going to waste my time trying to read this. Life is
just too short to be trying to read this.

The problem is with Gnat, not your code, but if you want anyone to help you
i would suggest indenting your code. Look at _any_ text book to get 
some idea of what to do.

dale