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.3 required=5.0 tests=BAYES_00,INVALID_MSGID
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,af7d617cad40d0b,start
X-Google-Attributes: gid103376,public
From: castroto@remus.rutgers.edu (Fabrizio Castrotorres)
Subject: Problem with representation clause
Date: 1997/12/08
Message-ID: <66gvas$pmp@remus.rutgers.edu>#1/1
X-Deja-AN: 296270506
Summary: GNAT 95 and representation problems
Organization: Rutgers University LCSR
Keywords: representation,gnat
Newsgroups: comp.lang.ada
Date: 1997-12-08T00:00:00+00:00
List-Id: <comp.lang.ada>


Hi,

Given the code:
-- START CODE


   type Measurement_Status_Value is range -2 .. 1;
   for  Measurement_Status_Value'Size use 2;

   type Slot_Number is range 0 .. 23;

   type Integrity_Data is array (Slot_Number) of Measurement_Status_Value;
   For Integrity_Data'Size use 24*2;   -- REPRESENTATION 1
   pragma Pack(Integrity_Data);

   type Global_Integrity_Array is array( Slot_Number ) of Integrity_Data;
   For Global_Integrity_Array'Size use 24*48;  -- REPRESENTATION 2
   pragma Pack(Global_Integrity_Array);

-- END CODE

The GNAT ADA 95 compiler (the one with the graphical user interface for NT/95)
lets th file compile fine. The problem comes when I try to build the main 
module which uses this package specification (no body). It
gives me the following error message:

size for "Global_Integrity_Array" too small, minimun allowed is 1536


The size I specified is             24*(24*2) = 1152 bits
The size the compiler requires is   24*(32*2) = 1536 bits

Is there a pragma I overlooked, specification I can write/correct, or command
line switch I need, in order to fix this ?

Please reply to fcastrot@ccmail.avionics.itt.com

Thanks