3 lines
162 B
Ada
3 lines
162 B
Ada
|
Int_Bits : constant Integer := Integer'size;
|
||
|
|
Whole_Bytes : constant Integer := Int_Bits / Storage_Unit; -- Storage_Unit is the number of bits per storage element
|