comp.lang.ada
 help / color / mirror / Atom feed
From: David Kristola <David95037@See-My.Sig>
Subject: Re: Static assertions
Date: Sat, 19 May 2001 0:40:15 -0700
Date: 2001-05-19T00:40:15-07:00	[thread overview]
Message-ID: <01HW.B72B716F00032943067E550C@news.pacbell.net> (raw)
In-Reply-To: 9e0pfb$ao9$1@s1.read.news.oleane.net

On Thu, 17 May 2001 8:07:51 -0700, Jean-Pierre Rosen wrote
(in message <9e0pfb$ao9$1@s1.read.news.oleane.net>):

> package Verifier is
>    subtype Assert is Boolean range True..True;
> 
>    Assert_1 : constant := Boolean'Pos( Assert (Integer'Size=32) );
>    Assert_2 : constant := Boolean'Pos( Assert 
> (Integer'Size=4*Character'Size) ); end Verifier;

Why not

   Assert_1 : constant Assert := (Integer'Size = 32);

?


-- 
   --djk, keeper of arcane lore & trivial fluff
   --Home: David95036 plus 1 at america on-line
   --Spam: goto.hades@welovespam.com




  parent reply	other threads:[~2001-05-19  7:40 UTC|newest]

Thread overview: 18+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2001-05-17 15:07 Static assertions Jean-Pierre Rosen
2001-05-17 17:44 ` Jeffrey Carter
2001-05-17 19:09   ` Marin David Condic
2001-05-17 22:34     ` Jeffrey Carter
2001-05-18 13:39       ` Marin David Condic
2001-05-18  1:23 ` Robert A Duff
2001-05-19  7:40 ` David Kristola [this message]
2001-05-19 22:56   ` Robert A Duff
2001-05-19  8:36 ` Aaro Koskinen
2001-05-21  7:50   ` Jean-Pierre Rosen
2001-06-12  3:59     ` David Thompson
  -- strict thread matches above, loose matches on Subject: below --
2001-05-18  5:34 Christoph Grein
2001-05-18 13:38 ` Robert A Duff
2001-05-18 16:15   ` Jeffrey Carter
2001-05-18 17:25     ` Ted Dennison
2001-05-18 21:27     ` Robert A Duff
2001-05-18 22:46       ` Jeffrey Carter
2001-05-19 22:53         ` Robert A Duff
replies disabled

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