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.9 required=5.0 tests=BAYES_00 autolearn=ham
	autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,7596cfba54ad3207
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2002-07-04 02:15:46 PST
Path: 
 archiver1.google.com!news1.google.com!newsfeed.stanford.edu!news.tele.dk!small.news.tele.dk!195.27.83.146!news-FFM2.ecrc.net!news.iks-jena.de!lutz
From: lutz@iks-jena.de (Lutz Donnerhacke)
Newsgroups: comp.lang.ada
Subject: Re: Trivial Ada question
Date: Thu, 4 Jul 2002 09:15:05 +0000 (UTC)
Organization: IKS GmbH Jena
Message-ID: <slrnai84gn.og.lutz@taranis.iks-jena.de>
References: <mailman.1025773383.11604.comp.lang.ada@ada.eu.org>
NNTP-Posting-Host: taranis.iks-jena.de
X-Trace: branwen.iks-jena.de 1025774105 8993 217.17.192.37 (4 Jul 2002
 09:15:05 GMT)
X-Complaints-To: usenet@iks-jena.de
NNTP-Posting-Date: Thu, 4 Jul 2002 09:15:05 +0000 (UTC)
User-Agent: slrn/0.9.6.3 (Linux)
Xref: archiver1.google.com comp.lang.ada:26857
Date: 2002-07-04T09:15:05+00:00
List-Id: <comp.lang.ada>

* Grein, Christoph wrote:
>> So simply write:
>> 
>>   INCREMENT: for dummy in 1 .. 1 loop
>>     for i in a'Range loop
>>       exit INCREMENT when condition (a (i));
>>     end loop;
>>     n := n + 1;
>>   end loop;
>> 
>> No 'evil' goto, and a 'telling' label.
>
>This was a joke, wasn't it?

No. It is a solution for people living in eviroments where writing 'goto'
into programms may cause losing jobs.

>Is this really better than a simle and innocent and nearby goto?

No.

>These goto wars are astounding.

Ack.

>Event the most simple goto solution is replaced by a contrived no-goto
>one!

Ack.

>I have to confess that I have not needed a goto in so many years, but the
>goto solution is one of the simplest solutions of all those presented.

Ack.