Article View: comp.lang.pascal.borland
Article #610Re: Random function - PASCAL
From: Robert Rossmair
Date: Wed, 08 Dec 1999 00:00
Date: Wed, 08 Dec 1999 00:00
23 lines
1476 bytes
1476 bytes
Hi Jud,
you wrote:
> >> Something that is equivalent to the UNTIL condition is "until
> >> false".
> >
> >And?
>
> And that's it - nothing else. The neatest way to do it.
I consider the following to be neater than neatest :)
const
SystemDown = False;
...
repeat
DoSomething;
until SystemDown;
Greetings, Robert
Technical Details
Message-ID:
<384DC718.F5C9C609@t-online.de>Path:
arc1-ca.pugleaf.net!unknown!not-for-mailReferences:
<384c42e3.0@news1.mweb.co.za> <384C4D84.1F625BA7@gmx.at> <kmko4ssvc7sr3k908b2dekf0v9lds0cfp4@4ax.com> <384C5638.D278469F@gmx.at> <acuo4s8gc4lgbud1t3dehbaeq5oq8fl5nu@4ax.com>Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: fd1d1,22f85d6fecf732ec X-Google-Attributes: gidfd1d1,public X-Google-Thread: 10261c,22f85d6fecf732ec X-Google-Attributes: gid10261c,public X-Google-Thread: 102601,22f85d6fecf732ec X-Google-Attributes: gid102601,public X-Google-Thread: 111659,22f85d6fecf732ec X-Google-Attributes: gid111659,public From: Robert Rossmair <Robert.Rossmair@t-online.de> Subject: Re: Random function - PASCAL Date: 1999/12/08 Message-ID: <384DC718.F5C9C609@t-online.de> X-Deja-AN: 558017875 Content-Transfer-Encoding: 7bit References: <384c42e3.0@news1.mweb.co.za> <384C4D84.1F625BA7@gmx.at> <kmko4ssvc7sr3k908b2dekf0v9lds0cfp4@4ax.com> <384C5638.D278469F@gmx.at> <acuo4s8gc4lgbud1t3dehbaeq5oq8fl5nu@4ax.com> X-Accept-Language: de,en X-Sender: 340065752685-0001@t-dialin.net Content-Type: text/plain; charset=us-ascii X-Complaints-To: abuse@t-online.de X-Trace: news01.btx.dtag.de 944629285 13456 340065752685-0001 991208 05:01:25 Organization: - Mime-Version: 1.0 Newsgroups: comp.lang.pascal.borland,comp.lang.pascal.misc,ctdl.lang.pascal,de.comp.lang.pascal