--- rpl/src/interface_tex.c	2015/01/05 15:32:23	1.56
+++ rpl/src/interface_tex.c	2015/01/27 14:18:08	1.57
@@ -582,7 +582,7 @@ formateur_elementaire_tex(struct_process
 
 		if ((*s_etat_processus).instruction_valide == 'Y')
 		{
-			if ((instruction_majuscule = conversion_majuscule(
+			if ((instruction_majuscule = conversion_majuscule(s_etat_processus,
 					(*s_etat_processus).instruction_courante)) == NULL)
 			{
 				(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
@@ -1574,7 +1574,8 @@ formateur_elementaire_tex(struct_process
 
 							chaine_parametre = (unsigned char *)
 									(*s_sous_objet_1).objet;
-							conversion_element_tex(&chaine_parametre, "^");
+							conversion_element_tex(s_etat_processus,
+									&chaine_parametre, "^");
 
 							if ((*s_sous_objet_1).objet == NULL)
 							{
@@ -1602,8 +1603,8 @@ formateur_elementaire_tex(struct_process
 						{
 							chaine_parametre = (unsigned char *)
 									(*s_sous_objet_1).objet;
-							conversion_element_tex(&chaine_parametre,
-									(*((struct_fonction *)
+							conversion_element_tex(s_etat_processus,
+									&chaine_parametre, (*((struct_fonction *)
 									(*(*l_element_courant).donnee).objet))
 									.nom_fonction);
 
@@ -1616,8 +1617,8 @@ formateur_elementaire_tex(struct_process
 
 							chaine_parametre = (unsigned char *)
 									(*s_sous_objet_2).objet;
-							conversion_element_tex(&chaine_parametre,
-									(*((struct_fonction *)
+							conversion_element_tex(s_etat_processus,
+									&chaine_parametre, (*((struct_fonction *)
 									(*(*l_element_courant).donnee).objet))
 									.nom_fonction);
 
@@ -1700,7 +1701,8 @@ formateur_elementaire_tex(struct_process
 							{
 								chaine_parametre = (unsigned char *)
 										(*s_sous_objet_1).objet;
-								conversion_element_tex(&chaine_parametre,
+								conversion_element_tex(s_etat_processus,
+										&chaine_parametre,
 										(*((struct_fonction *)
 										(*(*l_element_courant).donnee).objet))
 										.nom_fonction);
@@ -1714,7 +1716,8 @@ formateur_elementaire_tex(struct_process
 
 								chaine_parametre = (unsigned char *)
 										(*s_sous_objet_2).objet;
-								conversion_element_tex(&chaine_parametre,
+								conversion_element_tex(s_etat_processus,
+										&chaine_parametre,
 										(*((struct_fonction *)
 										(*(*l_element_courant).donnee).objet))
 										.nom_fonction);
@@ -2052,8 +2055,9 @@ formateur_elementaire_tex(struct_process
 
 					free(chaine_sauvegarde);
 
-					chaine_majuscule = conversion_majuscule((*((struct_nom *)
-							(*(*l_element_courant).donnee).objet)).nom);
+					chaine_majuscule = conversion_majuscule(s_etat_processus,
+							(*((struct_nom *) (*(*l_element_courant).donnee)
+							.objet)).nom);
 
 					if (strcmp(chaine_majuscule, "PI") == 0)
 					{
@@ -2335,7 +2339,7 @@ impression_tex(struct_processus *s_etat_
 
 	if ((*s_etat_processus).rpl_home == NULL)
 	{
-		if (alsprintf(&commande, ds_tex_commande,
+		if (alsprintf(s_etat_processus, &commande, ds_tex_commande,
 				d_exec_path, d_exec_path, d_exec_path,
 				(*s_etat_processus).nom_fichier_impression,
 				d_exec_path, d_exec_path,
@@ -2347,7 +2351,7 @@ impression_tex(struct_processus *s_etat_
 			return;
 		}
 
-		if (alsprintf(&executable_candidat, "%s/bin/rpliconv",
+		if (alsprintf(s_etat_processus, &executable_candidat, "%s/bin/rpliconv",
 				d_exec_path) < 0)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
@@ -2363,7 +2367,7 @@ impression_tex(struct_processus *s_etat_
 
 		free(executable_candidat);
 
-		if (alsprintf(&executable_candidat, "%s/bin/rplfile",
+		if (alsprintf(s_etat_processus, &executable_candidat, "%s/bin/rplfile",
 				d_exec_path) < 0)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
@@ -2381,7 +2385,7 @@ impression_tex(struct_processus *s_etat_
 	}
 	else
 	{
-		if (alsprintf(&commande, ds_tex_commande,
+		if (alsprintf(s_etat_processus, &commande, ds_tex_commande,
 				(*s_etat_processus).rpl_home,
 				(*s_etat_processus).rpl_home,
 				(*s_etat_processus).rpl_home,
@@ -2396,7 +2400,7 @@ impression_tex(struct_processus *s_etat_
 			return;
 		}
 
-		if (alsprintf(&executable_candidat, "%s/bin/rpliconv",
+		if (alsprintf(s_etat_processus, &executable_candidat, "%s/bin/rpliconv",
 				(*s_etat_processus).rpl_home) < 0)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
@@ -2412,7 +2416,7 @@ impression_tex(struct_processus *s_etat_
 
 		free(executable_candidat);
 
-		if (alsprintf(&executable_candidat, "%s/bin/rplfile",
+		if (alsprintf(s_etat_processus, &executable_candidat, "%s/bin/rplfile",
 				(*s_etat_processus).rpl_home) < 0)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
@@ -2438,7 +2442,8 @@ impression_tex(struct_processus *s_etat_
 	{
 		free(commande);
 
-		if (alsprintf(&commande, ds_tex_postscript, nom_fichier_ps) < 0)
+		if (alsprintf(s_etat_processus, &commande, ds_tex_postscript,
+				nom_fichier_ps) < 0)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
 			return;
@@ -2539,7 +2544,8 @@ impression_tex(struct_processus *s_etat_
 */
 
 void
-conversion_element_tex(unsigned char **element, unsigned char *fonction)
+conversion_element_tex(struct_processus *s_etat_processus,
+		unsigned char **element, unsigned char *fonction)
 {
 	unsigned char			*chaine;
 	unsigned char			*element_courant;
@@ -2562,7 +2568,8 @@ conversion_element_tex(unsigned char **e
 		{
 			if (niveau == 0)
 			{
-				extrait = extraction_chaine((*element), debut_fonction, i - 1);
+				extrait = extraction_chaine(s_etat_processus,
+						(*element), debut_fonction, i - 1);
 
 				if (strcmp(extrait, fonction) != 0)
 				{