Attention des changements sont bientôt à prévoir sur l'instance gitea d'Aurore :
package Addr8 is
type Bytes is array (1 .. 4) of Character;
for Bytes'Alignment use 4;
procedure Proc (B: Bytes);
end Addr8;