From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.5-pre1 (2020-06-20) on
	ip-172-31-74-118.ec2.internal
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=3.0 tests=BAYES_00 autolearn=ham
	autolearn_force=no version=3.4.5-pre1
Date: 29 Sep 92 18:33:24 GMT
From: visicom!amstel!rlk@nosc.mil  (Bob Kitzberger)
Subject: Re: Declaring Arrays of Bits (how)?
Message-ID: <rlk.717791604@amstel>
List-Id: <comp.lang.ada>

>I am trying to declare arrays of bits in Ada.  Here's my attempt:
>
>type Array_Range_Type is range 1..128;
>
>type Bit_Type is (OFF, ON);
>for  Bit_Type use (OFF => 0, ON => 1);
>for  Bit_Type'size use 1;
>
>type Bit_Array_Type is array (Array_Range_Type) of Bit_Type;

Try slapping a rep spec on the array type:

   for Bit_Array_Type'size use 128;


	.Bob.
----------------
Bob Kitzberger          VisiCom Laboratories, Inc.
rlk@visicom.com         10052 Mesa Ridge Court, San Diego CA 92121 USA
                        +1 619 457 2111    FAX +1 619 457 0888