From mboxrd@z Thu Jan 1 00:00:00 1970 X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me X-Spam-Level: X-Spam-Status: No, score=-1.3 required=5.0 tests=BAYES_00,INVALID_MSGID autolearn=no autolearn_force=no version=3.4.4 X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 103376,a7e1cc697e6a4b51 X-Google-Attributes: gid103376,public From: dale@cs.rmit.edu.au (Dale Stanbrough) Subject: Re: newbie problem - how to Date: 1998/11/08 Message-ID: #1/1 X-Deja-AN: 409569655 References: <03F1770557943D79.F5DA81D0384C72CE.353F95DB3C8D0DD5@library-proxy.airnews.net> <87g1bwi7gj.fsf@mihalis.ix.netcom.com> X-Complaints-To: abuse@cs.rmit.edu.au X-Trace: emu.cs.rmit.edu.au 910511314 11721 131.170.27.23 (8 Nov 1998 07:48:34 GMT) Organization: RMIT NNTP-Posting-Date: 8 Nov 1998 07:48:34 GMT Newsgroups: comp.lang.ada Date: 1998-11-08T07:48:34+00:00 List-Id: 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