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-Thread: 103376,bccad95d5436eaf8
X-Google-Attributes: gid103376,public
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news1.google.com!news2.google.com!proxad.net!134.158.69.22.MISMATCH!in2p3.fr!irazu.switch.ch!switch.ch!newsmi-eu.news.garr.it!NewsITBone-GARR!newsserver.cilea.it!news.crs4.it!not-for-mail
From: Jacob Sparre Andersen <sparre@nbi.dk>
Newsgroups: comp.lang.ada
Subject: Re: Ada begginer's new problem.
Date: 28 Oct 2004 10:44:21 +0200
Organization: CRS4, Center for Adv. Studies,
 Research and Development in Sardinia
Message-ID: <rlsk6tbb5ay.fsf@jacob.crs4.it>
References: <clqa5t$pif$1@netnews.hinet.net>
NNTP-Posting-Host: jacob.crs4.it
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
X-Trace: pietro.crs4.it 1098948101 4718 156.148.71.80 (28 Oct 2004 07:21:41
 GMT)
X-Complaints-To: news@nntpserver.crs4.it.
NNTP-Posting-Date: 28 Oct 2004 07:21:41 GMT
User-Agent: Gnus/5.09 (Gnus v5.9.0) Emacs/21.2
Xref: g2news1.google.com comp.lang.ada:5786
Date: 2004-10-28T07:21:41+00:00
List-Id: <comp.lang.ada>

"bubble" <bubble@bubble.d2g.com> writes:

[ please use relevant subject lines ]

>    outer:loop
>          execute_some_Statement_here0;
>       EXIT when some_condition;
>          execute_some_Statement_here1;
>       inner: loop
>          execute_some_Statement_here3;
>          IF some_condition_is_true THEN
>             goto outerContinueLabel;
>          END IF;
>          execute_some_Statement_here4;
>       end loop inner;
>          execute_some_Statement_here5;
>       <<outerContinueLabel>>
>          null;
>    end loop outer;
> 
> It's hard to read,

Yes. :-(

 Outer:
   loop
      Execute_Some_Statement_Here0;
      exit Outer when Some_Condition;
      Execute_Some_Statement_Here1;

    Inner:
      loop
         Execute_Some_Statement_Here3;
         exit Inner when Some_Condition_Is_True;
         Execute_Some_Statement_Here4;
      end loop Inner;

      if not Some_Condition_Is_True then
         Execute_Some_Statement_Here5;
      end if;
   end loop Outer;

Greetings,

Jacob
-- 
"There is a slight error in the exponent" - quantum vaacum
 mass is 10^35 times the total dark matter mass