Re: how to "put" a binary structure? (newbie question!)

[Georg Bauhaus <bauhaus@futureapps.de>]

Norbert Caspari wrote:

> 
> How can I correct the source code to print the values stored in the 
> structure Xxx? Is it possible, to print the whole content of Xxx with just 
> one put statement? Or alternatively how can I assign the content of Xxx to 
> another variable of the type Unsigned_8 that I can use for output? Or is 
> there maybe another way?

In addition to Dmitry's suggestions, consider initialising an
entire aggregate (record, or array). This way the compiler can
check complete initialisation

You can use the predefined 'Image attribute function of Bit_T for
printing, as shown below.

   Xxx: Byte :=
     (Bit0 => off,
      Bit1 => on,
      Bit2 => off,
      Bit3 => off,
      Bit4 => on,
      Bit5 => on,
      Bit6 => off,
      Bit7 => off);

begin
   Text_IO.put_line("Bit 1 is " & Bit_T'image(Xxx.Bit1));
   -- etc.
end bittest;

-- Georg