From mboxrd@z Thu Jan 1 00:00:00 1970 X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me X-Spam-Level: X-Spam-Status: No, score=-1.1 required=5.0 tests=BAYES_00, PP_MIME_FAKE_ASCII_TEXT autolearn=no autolearn_force=no version=3.4.4 X-Google-Language: ENGLISH,ASCII X-Google-Thread: 103376,92c39a3be0a7f17d X-Google-Attributes: gid103376,public X-Google-ArrivalTime: 2002-03-20 04:30:04 PST Path: archiver1.google.com!news1.google.com!newsfeed.stanford.edu!headwall.stanford.edu!newsfeed.media.kyoto-u.ac.jp!newsfeed.icl.net!newspeer.clara.net!news.clara.net!oleane.net!oleane!nnrp.oleane.net!not-for-mail From: "Jean-Pierre Rosen" Newsgroups: comp.lang.ada Subject: Re: ARG Urgent Problems (was: labeling) Date: Wed, 20 Mar 2002 13:19:42 +0100 Organization: Adalog Message-ID: References: NNTP-Posting-Host: mailhost.axlog.fr X-Trace: s1.read.news.oleane.net 1016627121 20459 195.25.228.57 (20 Mar 2002 12:25:21 GMT) X-Complaints-To: abuse@oleane.net NNTP-Posting-Date: Wed, 20 Mar 2002 12:25:21 +0000 (UTC) X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 5.50.4807.1700 X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4807.1700 Xref: archiver1.google.com comp.lang.ada:21485 Date: 2002-03-20T13:19:42+01:00 List-Id: "Christoph Grein" a �crit dans le message news: >The only problem being that your compiler might reject to compile this because >it cannot fulfil the request. My_Int'Base will necessarily be a _signed_integer_ >at least big enough to hold the specified range, will thus need at least 33 >bits, most probably a 64 bit >type. True, but there is no requirement that T'Base occupies the same number of bits as T. I just tried the following with Gnat: type Int32 is range 0..2**32-1; for Int32'size use 32; I : Int32; B: Int32'Base; begin Put_Line (Integer'image (I'size)); Put_Line (Integer'Image (B'size)); And it prints: 32 64 (note the use of 'size on objects rather than types - necessary to get the truth about how much memory space is used) -- --------------------------------------------------------- J-P. Rosen (rosen@adalog.fr) Visit Adalog's web site at http://www.adalog.fr