aliased

bonjour :-)


Je cherche à faire un paquetage dans lequel je vais pouvoir faire des  
pointeurs sur des objets du type passé en generic,
mais sans les allouer, juste pointer sur un objet qui existe deja
Est ce que c'est possible, ça ?


Je ne trouve pas où placer le "aliased" dans
generic
	type objetLimite is limited private;


J'ai toutes sortes d'erreurs dont certaines incompréhensibles, par  
exemple (celle ci est compréhensible) :

	type ptrLimite is access objetLimite;

	type objetNonLimite is new conteneur with record
		polc : ptrLimite;
	end record;

	procedure remplacer (onl : in out objetNonLimite; ol : in  
objetLimite) is
	begin
		onl.polc:= ol'Access ;
	end remplacer;

error: prefix of "access" attribute must be aliased

On dirait qu'il faut que je mette "aliased" dans les paramètres de la  
fonction, mais ça ne veut pas ...


-- 
Téléassistance / Télémaintenance
http://www.portparallele.com/ThomasDECONTES/

_______________________________________________
Site WWW de l'association Ada-France: http://www.ada-france.org/
[email protected]
http://www.ada-france.org/mailman/listinfo/ada-france