Attention des changements sont bientôt à prévoir sur l'instance gitea d'Aurore :
package ref_type is
private
type T is tagged null record;
procedure Print (X : T);
end ref_type;