Re: Ada Type Information

[korisko <korisko@newsguy.com>]

In article <7bpohc$j2t$1@nnrp1.dejanews.com>, dewar@gnat.com says...
>
 
>Source
>------
>
>procedure q is
>   type r is record
>      a : integer := 0;
>      s : string (1 .. 5);
>      t : integer;
>   end record;
 
>Representation information for unit q
>--------------------------------------
>
>for r'Object_Size use 128;
>for r use record
>   a at  0 range  0 .. 31;
>   s at  4 range  0 .. 39;   <====== ??
>   t at 12 range  0 .. 31;
>end record;
 

hi,

is it hard to change -gnatR to make it also print the type of the field as 
well, maybe as a comment? 

something like
 
for r'Object_Size use 128;  
for r use record
    a at  0 range  0 .. 31;  -- Integer
    s at  4 range  0 .. 39;  -- String(1..5)
    t at 12 range  0 .. 31;  -- Integer
end record;

korisko