From: gautier_niouzes@hotmail.com (Gautier)
Subject: Re: if X in 1..35000 versus Boolean
Date: 16 Jul 2002 12:24:27 -0700
Date: 2002-07-16T19:24:27+00:00 [thread overview]
Message-ID: <17cd177c.0207161124.591d32d6@posting.google.com> (raw)
In-Reply-To: yecfzykccgh.fsf@king.cts.com
Keith Thompson:
> If I recall correctly (it's been a while), in Pascal you can write
> something like:
>
> if X in [1 .. 4] then (* This is Pascal, not Ada *)
> begin
> ...;
> end;
>
> where [1 .. 4] is a set value constructor. A naive Pascal compiler
> would build a set value with bits 1, 2, 3, and 4 set, and all other
> bits cleared, and test whether bit X is set. A more clever Pascal
> compiler might generate code equivalent to X >= 1 and X <= 4.
BTW what "all other bits" means is undefined in Pascal set expression.
Of course it is not the full integer range, otherwise a set
value with integers would be a quite huge object...
In fact Turbo Pascal 6 (1990) or Delphi 6 (2001) seem
to limit the values in sets to 0..255.
if X in [1 .. 4, 254 .. 255] then ;
passes compilation,
if X in [1 .. 4, 254 .. 256] then ;
or
if X in [-1 .. 4] then ;
doesn't!
________________________________________________________
Gautier -- http://www.mysunrise.ch/users/gdm/gsoft.htm
NB: For a direct answer, address on the Web site!
next prev parent reply other threads:[~2002-07-16 19:24 UTC|newest]
Thread overview: 37+ messages / expand[flat|nested] mbox.gz Atom feed top
2002-07-13 19:10 if X in 1..35000 versus Boolean Jan Prazak
2002-07-13 16:27 ` Frank J. Lhota
2002-07-13 20:36 ` Jan Prazak
2002-07-13 18:05 ` Jeffrey Carter
2002-07-14 15:02 ` Jan Prazak
2002-07-13 22:10 ` Robert Dewar
2002-07-14 21:16 ` Jan Prazak
2002-07-14 20:47 ` Frank J. Lhota
2002-07-15 1:21 ` Jeffrey Carter
2002-07-16 8:18 ` Keith Thompson
2002-07-16 13:54 ` Jan Prazak
2002-07-16 11:13 ` Lutz Donnerhacke
2002-07-17 19:04 ` Jan Prazak
2002-07-17 20:00 ` Georg Bauhaus
2002-07-18 8:11 ` Lutz Donnerhacke
2002-07-18 14:39 ` Georg Bauhaus
2002-07-20 0:37 ` Robert Dewar
2002-07-16 20:25 ` Georg Bauhaus
2002-07-17 19:29 ` Jan Prazak
2002-07-16 19:24 ` Gautier [this message]
2002-07-17 19:04 ` Jan Prazak
2002-07-13 16:32 ` David C. Hoos, Sr.
2002-07-13 20:36 ` Jan Prazak
2002-07-13 18:02 ` David C. Hoos, Sr.
2002-07-13 18:17 ` sk
2002-07-13 20:02 ` Jeffrey Creem
[not found] ` <3D306ED5.33E80E09@myob.com>
2002-07-13 18:52 ` David C. Hoos, Sr.
[not found] ` <020a01c22a9f$2b50d6c0$6400000a@dhoos>
2002-07-13 19:02 ` sk
2002-07-14 15:02 ` Jan Prazak
2002-07-14 19:25 ` Darren New
2002-07-15 15:22 ` Steffen Huber
2002-07-13 16:44 ` Christopher Browne
2002-07-13 22:09 ` Robert Dewar
2002-07-13 17:17 ` tmoran
2002-07-13 19:44 ` Florian Weimer
-- strict thread matches above, loose matches on Subject: below --
2002-07-14 20:22 Gautier direct_replies_not_read
2002-07-15 11:36 ` Jan Prazak
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox