From: Wilhelm Spickermann <wilhelm.spickermann@t-online.de>
To: comp.lang.ada@ada.eu.org
Subject: Re: How to get a compilation error
Date: Fri, 16 Nov 2001 10:05:08 +0100
Date: 2001-11-16T10:05:08+01:00 [thread overview]
Message-ID: <mailman.1005901593.22579.comp.lang.ada@ada.eu.org> (raw)
In-Reply-To: <9t0mm9$hq8$1@s1.read.news.oleane.net>
--On Donnerstag, November 15, 2001 16:09:50 +0100 Jean-Pierre
Rosen <rosen@adalog.fr> wrote:
> Since Check is a named number, an invalid value will result in
> a compile time error (new in 95).
I´ve used this idea to make my solution less ugly. Instead of
writing:
type Check is (Checkitem1, Checkitem2);
for Check'SIZE use 1 - Integer'MIN (96 mod Chunk_Bits, 1);
I´ve used now:
Check : constant := 1 / (1 - Integer'MIN (96 mod Chunk_Bits,
1));
Thanks
Wilhelm
next prev parent reply other threads:[~2001-11-16 9:05 UTC|newest]
Thread overview: 13+ messages / expand[flat|nested] mbox.gz Atom feed top
2001-11-15 14:16 How to get a compilation error Wilhelm Spickermann
2001-11-15 15:06 ` Martin Dowie
2001-11-15 15:09 ` Jean-Pierre Rosen
2001-11-15 17:38 ` Wilhelm Spickermann
2001-11-16 8:19 ` Jean-Pierre Rosen
2001-11-16 9:44 ` Wilhelm Spickermann
2001-11-16 10:22 ` Pi
2001-11-16 17:27 ` Wilhelm Spickermann
2001-11-15 23:49 ` martin.m.dowie
2001-11-16 9:05 ` Wilhelm Spickermann [this message]
2001-11-15 17:47 ` Wilhelm Spickermann
-- strict thread matches above, loose matches on Subject: below --
2001-11-16 8:23 Gautier Write-only-address
[not found] <mailman.1005975714.13778.comp.lang.ada@ada.eu.org>
2001-11-17 11:32 ` Preben Randhol
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox