Re: Efficient Fortran

Article View: comp.lang.misc

Article #1392

#1392

From: Bengt Larsson
Date: Mon, 30 Jul 1990 18:42

26 lines
1191 bytes

In article <1990Jul30.183426.26506@lth.se> I write:

>>comp:	some code;
>>	texp -= expr;
>>	if(texp < 0) branchto bad;
>>	....
>>
>>bad:	more code;
>>	unbranchto comp;
>
>Which, in a slightly more structured way would be
>
>comp: 	some code;
>	texp -= expr;
>	if (texp >= 0) {
>		more code;
>		goto comp;
>	}
>
>wouldn't it? 

No it wouldn't. Silly me. The test shouldn't be reversed. Sorry
(I couldn't cancel the original article).
-- 
Bengt Larsson - Dep. of Math. Statistics, Lund University, Sweden
Internet: bengtl@maths.lth.se             SUNET:    TYCHE::BENGT_L

Technical Details

Message-ID: <1990Jul30.184201.26665@lth.se>

Path: arc1-ca.pugleaf.net!utzoo!attcan!uunet!cs.utexas.edu!uwm.edu!rutgers!njin!uupsi!sunic!lth.se!newsuser

References:

<1991@key.COM> <2378@l.cc.purdue.edu> <ARS4N0F@xds13.ferranti.com> <1990Jul28.090036.374@lth.se> <2413@l.cc.purdue.edu> <1990Jul30.183426.26506@lth.se>

Show Full Headers

Complete Article Headers

Path: arc1-ca.pugleaf.net!utzoo!attcan!uunet!cs.utexas.edu!uwm.edu!rutgers!njin!uupsi!sunic!lth.se!newsuser
From: bengtl@maths.lth.se (Bengt Larsson)
Newsgroups: comp.lang.misc
Subject: Re: Efficient Fortran
Message-ID: <1990Jul30.184201.26665@lth.se>
Date: 30 Jul 90 18:42:01 GMT
References: <1991@key.COM> <2378@l.cc.purdue.edu> <ARS4N0F@xds13.ferranti.com> <1990Jul28.090036.374@lth.se> <2413@l.cc.purdue.edu> <1990Jul30.183426.26506@lth.se>
Sender: newsuser@lth.se (LTH network news server)
Reply-To: bengtl@maths.lth.se (Bengt Larsson)
Organization: Lund Institute of Technology, Sweden
Lines: 26

Reply to Parent Message