ADA - Operaciones a bajo nivel en ADA 95

Hola, me gustaria saber, como puedo utilizar almacenamiento a nivel de bit, es decir, almacenar un array de bits pero no como se hace convencionalmente, sino en vez de ocupar un byte cada posicion del array conteniendo un tipo enumerado TipoBit, que ocupe solo un bit de la maquina. Todo esto es por problemas de sobrecarga de la memoria ya que manejo grandes cantidades de datos.
Gracias

Te recomiendo usar arrays de booleanos empaquetados.

type Bits is array (Natural range <>) of Boolean;
pragma Pack (Bits);

subtype Byte is Bits (0 .. 7);

Y recuerda que sobre los arrays de booleanos puedes usar los operadores lógicos: and, or y xor.

---
Página del canal Ada de IRC Hispano: http://www.canalada.org

Para cada tipo que utilices puedes definir la posicion de los elementos que o componen y su tamaño, un ejemplo:

type X_int is mod 256;
for X_int'size use 8;

type Something is
record
x : X_int := 0;
y : X_int := 0;
end record;

for Something use
record
x at 0;
y at 8;
end record;

Para la entrada y la salida aunque definas objetos con tamaños inferiores a un byte, no se puede trabajar con ellos por lo que te veras obligado a agruparlos.
Te recomiendo que mires el Language Reference Manual