blob: 19fbb0ea90c512b856c05931f238cd601adce3ae [file] [log] [blame]
package Addr7 is
type Bytes is array (1 .. 4) of Character;
for Bytes'Alignment use 4;
procedure Proc (B: aliased Bytes);
end Addr7;