comp.lang.ada
 help / color / mirror / Atom feed
From: Vinzent 'Gadget' Hoefler <ada.rocks@jlfencey.com>
Subject: Re: Thought this was funny
Date: Wed, 22 Oct 2003 08:36:04 +0200
Date: 2003-10-22T08:36:04+02:00	[thread overview]
Message-ID: <bn58ip$skq6o$3@ID-175126.news.uni-berlin.de> (raw)
In-Reply-To: bn42kf$ca3@cui1.lmms.lmco.com

Xenos wrote:

>Reviewing some old code we are converting from Ada 83 to 95, I came across
>this:
>
>case <boolean expression> is
>  when true =>
>       <do something>
>
>  when false =>
>       <do something else>
>
>end case;

Well, perhaps the programmer expected that the code might change to
fuzzy booleans later... :)

I've seen worse things:

|if <boolean expression> = True then
|   Boolean_Variable := True;
|else
|   Boolean_Variable := False;
|end if;

(Well, the original was written in Pascal, but that doesn't matter for
the demonstration, I guess)...

Can someone here see any reason, why someone should not simply write

|Boolean_Variable := <boolean expression>;

instead?

The "<boolean expression> = True" construct alone... *sigh*


Vinzent.



  parent reply	other threads:[~2003-10-22  6:36 UTC|newest]

Thread overview: 23+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2003-10-21 19:49 Thought this was funny Xenos
2003-10-21 20:26 ` Ching Bon Lam
2003-10-21 20:44   ` Lutz Donnerhacke
2003-10-21 20:36 ` Ed Falis
2003-10-21 21:08 ` Stephane Richard
2003-10-21 22:16   ` Robert I. Eachus
2003-10-21 22:24     ` Ed Falis
2003-10-22  0:36       ` Robert I. Eachus
2003-10-22  1:37         ` Ed Falis
2003-10-22  3:56           ` Robert I. Eachus
2003-10-22 13:44             ` Ed Falis
2003-10-21 23:13     ` Georg Bauhaus
2003-10-22  0:23     ` Alexandre E. Kopilovitch
2003-10-21 22:23   ` Simon Wright
2003-10-22  2:57 ` Steve
2003-10-22  6:26 ` Anders Wirzenius
2003-10-22  6:36 ` Vinzent 'Gadget' Hoefler [this message]
2003-10-22 12:38   ` Christopher J. Henrich
2003-10-22 15:00 ` Martin Dowie
  -- strict thread matches above, loose matches on Subject: below --
2003-10-22  6:44 christoph.grein
2003-10-22  7:31 ` Dmitry A. Kazakov
2003-10-22  8:48   ` Vinzent 'Gadget' Hoefler
2003-10-23  2:17 ` Wes Groleau
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox