Re: PROGRAM_ERROR : access before elaboration

On Tue, 2007-11-20 at 17:20 +0100, Thomas De Contes wrote:
> un paquetage dans lequel je veux simplement mettre des constantes,  
> qui sont trop compliquées à construire pour pouvoir se faire  
> directement avec des agrégats, par exemple :
> 
> 
> package defaut is
> 	pragma Elaborate_Body;
> 
> 	pageParDefaut : constant page;
> 
> private
> 	function constructionPageParDefaut return page;
> 	pageParDefaut : constant page := constructionPageParDefaut;
> end defaut;

Tu peux directement mettre dans la partie publique

function pageParDefaut return page;

Pour l'utilisateur il n'y a pas de difference entre une fonction de ce
type et une constante.

Laurent
http://guerby.org/blog/

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