Re: changing alignment of built-in boolean

[invalidemail@aerojockey.com]

Jeffrey R. Carter wrote:
> invalidemail@aerojockey.com wrote:
> > Is it possible, in GNAT, to force the built-in Boolean type to use
> > 4-byte (32-bit) alignment?  Reason: I have to interface some Ada code
> > to a package that insists on 32-bit variables on 4-byte-aligned
> > addresses.
>
> You could always modify the compiler :)
>
> You might want to look at user-defined boolean types here (it's sometimes a
> little confusing in Ada to distinguish between integer types and type Integer,
> character types and type Character, string types and type String, boolean types
> and type Boolean):
>
> type Big_Boolean is new Boolean;
> for Big_Boolean'Size use 32;
> for Big_Boolean'Alignment use 4;
>
> Conditions can be of any boolean type, so you can use this just like type Boolean:

Yes, but there appears to be one little catch:

   if B and then (Some_Integer /= 0) then ...

Unfortunately I got stuff like this all over the Ada code :(  Otherwise
this would be something I could do with a simple search and replace.
Maybe there's a flag to loosen the type checking for this case.
Probably not.  Oh well.

Thanks.