Bonjour,
Je vais essayer d'exposer mon problème le plus simplement possible (donc en évitant au maximum les explications de "pourquoi c'est comme ça").
J'ai un package avec unet un autre type
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 type T_Liste_Carte is record Nb_Carte : Natural; Cartes : T_Liste_Max_Carte(Index'Range); end record;J'aimerais que ce dernier type soit privé.
Code : Sélectionner tout - Visualiser dans une fenêtre à part type T_Liste_Max_Carte is array (Index Range <>) of T_Carte;
J'ai besoin que ce type soit non contraint car j'ai une procédure privéequi reçoit des tranches de tableau. Et si T_Liste_Max_Carte est contraint alors je ne peux plus passer à cette procédure des traches de tableau de taille arbitraire.
Code : Sélectionner tout - Visualiser dans une fenêtre à part procedure Melanger_Paquet (L : in out T_Liste_Max_Carte);
Et je ne peux apparemment pas avoir T_Liste_Max_Carte non contraint en privé, et l'utiliser contraint en publique.
Actuellement j'ai mis le type T_Liste_Max_Carte publique, mais ça ne me convient pas. Ya-t'il une autre solution que d'avoir T_Liste_Max_Carte contraint en privé et de recréer à la main l'envoie des attributs First et Last à la procédure Mélanger_Paquet ?
Je sais pas si j'ai été très claire, j'ai fait au mieux possible étant donné l'heure et la brume cérébrale.
Merci de vos futures réponses.
Partager