--- rpl/src/instructions_o1.c	2015/01/05 15:32:20	1.79
+++ rpl/src/instructions_o1.c	2015/01/27 14:18:07	1.80
@@ -1149,8 +1149,9 @@ instruction_open(struct_processus *s_eta
 		{
 			if ((*(*l_element_courant).donnee).type == CHN)
 			{
-				if ((argument_majuscule = conversion_majuscule((unsigned char *)
-						(*(*l_element_courant).donnee).objet)) == NULL)
+				if ((argument_majuscule = conversion_majuscule(s_etat_processus,
+						(unsigned char *) (*(*l_element_courant).donnee).objet))
+						== NULL)
 				{
 					(*s_etat_processus).erreur_systeme =
 							d_es_allocation_memoire;
@@ -1764,7 +1765,7 @@ instruction_open(struct_processus *s_eta
 					if ((*(*l_element_courant_sous_objet).donnee).type == CHN)
 					{
 						if ((argument_majuscule = conversion_majuscule(
-								(unsigned char *)
+								s_etat_processus, (unsigned char *)
 								(*(*l_element_courant_sous_objet)
 								.donnee).objet)) == NULL)
 						{
@@ -1830,7 +1831,7 @@ instruction_open(struct_processus *s_eta
 							free(argument_majuscule);
 
 							if ((argument_majuscule = conversion_majuscule(
-									(unsigned char *)
+									s_etat_processus, (unsigned char *)
 									(*(*l_element_courant_sous_objet)
 									.donnee).objet)) == NULL)
 							{
@@ -2320,7 +2321,7 @@ instruction_open(struct_processus *s_eta
 					if ((*(*l_element_courant_sous_objet).donnee).type == CHN)
 					{
 						if ((argument_majuscule = conversion_majuscule(
-								(unsigned char *)
+								s_etat_processus, (unsigned char *)
 								(*(*l_element_courant_sous_objet)
 								.donnee).objet)) == NULL)
 						{
@@ -2361,7 +2362,7 @@ instruction_open(struct_processus *s_eta
 							}
 
 							if ((argument_majuscule = conversion_majuscule(
-									(unsigned char *)
+									s_etat_processus, (unsigned char *)
 									(*(*l_element_courant_sous_objet)
 									.donnee).objet)) == NULL)
 							{
@@ -3622,7 +3623,8 @@ instruction_open(struct_processus *s_eta
 				}
 
 				if ((parametre_courant_majuscule = conversion_majuscule(
-						(*(*parametre_courant).donnee).objet)) == NULL)
+						s_etat_processus, (*(*parametre_courant).donnee).objet))
+						== NULL)
 				{
 					liberation(s_etat_processus, s_objet_argument);
 					liberation(s_etat_processus, s_objet_resultat);
@@ -3936,7 +3938,8 @@ instruction_open(struct_processus *s_eta
 					}
 
 					if ((parametre_courant_majuscule = conversion_majuscule(
-							(*(*parametre_courant).donnee).objet)) == NULL)
+							s_etat_processus, (*(*parametre_courant).donnee)
+							.objet)) == NULL)
 					{
 						(*s_etat_processus).erreur_systeme =
 								d_es_allocation_memoire;