--- rpl/src/bibliotheques_externes.c	2013/03/20 17:11:43	1.51
+++ rpl/src/bibliotheques_externes.c	2013/03/29 10:30:32	1.52
@@ -41,7 +41,8 @@ void *
 chargement_bibliotheque(struct_processus *s_etat_processus,
 		unsigned char *bibliotheque)
 {
-	char					**(*fonction)(integer8	 *, const char *);
+	char					**(*fonction)(struct_rpl_arguments *,
+									integer8 *, const char *);
 	char					*message;
 
 	integer8				i;
@@ -56,7 +57,7 @@ chargement_bibliotheque(struct_processus
 	unsigned char			*tampon;
 
 	void					*descripteur_bibliotheque;
-	void					(*onloading)(struct_rpl_arguments *);
+	int						(*onloading)(struct_rpl_arguments *);
 
 	/*
 	 * On vérifie que la bibliothèque n'est pas déjà chargée.
@@ -335,8 +336,8 @@ chargement_bibliotheque(struct_processus
 	 * Ajout des symboles externes
 	 */
 
-	if ((tableau = (unsigned char **) (*fonction)((&nombre_symboles),
-			d_version_rpl)) == NULL)
+	if ((tableau = (unsigned char **) (*fonction)(&rpl_arguments,
+			(&nombre_symboles), d_version_rpl)) == NULL)
 	{
 		/*
 		 * Nombre symboles :
@@ -489,7 +490,7 @@ retrait_bibliotheque(struct_processus *s
 	integer8					j;
 	integer8					nombre_symboles_residuels;
 
-	void						(*onclosing)(struct_rpl_arguments *);
+	int							(*onclosing)(struct_rpl_arguments *);
 
 	l_element_courant = (*s_etat_processus).s_bibliotheques;
 	presence_bibliotheque = d_faux;
@@ -870,7 +871,7 @@ execution_fonction_de_bibliotheque(struc
 	integer8						nombre_iterations_maximal;
 	integer8						ordre_iteration;
 
-	void							(*fonction)(struct_rpl_arguments *);
+	int								(*fonction)(struct_rpl_arguments *);
 
 	/*
 	 * Recherche dichotomique de la définition externe