Re: logical operations in Ada

[Dale Stanbrough <dale@cs.rmit.edu.au>]

Freelancer wrote:

> I am well aware of ada.characters.handling. That isn't my objective.
> As you said, I am trying to fiddle with bits. How to do this in Ada?
> 
> A small example would be greatly appreciated. :)
> Thank you for your references though.

You can use the appropriate routines, either by converting to 
an unsigned type, or to a packed boolean type.


e.g.

   type Bit_Array is array (natural range <>) of Boolean;

   subtype Bit_Array_32 is Bit_Array (0..31);
   pragma Pack (Bit_Array_32);


   X : Bit_Array_32;
   X (1) := True;
   X := not X;
   X := X xor X;

or...

   Item : Interfaces.Unsigned_16;

   Item := Item xor 2#0000_0000_1111_1010#;


You can use Unchecked_Conversion to convert back and forth
b/w your favourite type to do an even wider range of bit 
fiddling.


Dale