--- rpl/src/instructions_d6.c	2015/01/05 15:32:17	1.57
+++ rpl/src/instructions_d6.c	2015/01/27 14:18:06	1.58
@@ -794,8 +794,8 @@ instruction_digest(struct_processus *s_e
 		// - EVP_sha512
 		// - EVP_whirlpool
 
-		if ((fonction = conversion_majuscule((unsigned char *)
-				(*s_objet_argument_1).objet)) == NULL)
+		if ((fonction = conversion_majuscule(s_etat_processus,
+				(unsigned char *) (*s_objet_argument_1).objet)) == NULL)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
 			return;
@@ -1446,8 +1446,9 @@ instruction_digest(struct_processus *s_e
 
 		l_element_courant = (*s_objet_argument_1).objet;
 
-		if ((fonction = conversion_majuscule((unsigned char *)
-				(*(*l_element_courant).donnee).objet)) == NULL)
+		if ((fonction = conversion_majuscule(s_etat_processus,
+				(unsigned char *) (*(*l_element_courant).donnee).objet))
+				== NULL)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
 			return;
@@ -2277,7 +2278,7 @@ instruction_digest(struct_processus *s_e
 
 			memset(vecteur_initialisation, 0, (size_t) longueur_clef);
 
-			if ((tampon = chiffrement(EVP_chiffrement, d_vrai,
+			if ((tampon = chiffrement(s_etat_processus, EVP_chiffrement, d_vrai,
 					chaine, longueur_chaine, clef, longueur_clef,
 					vecteur_initialisation, &longueur_tampon)) == NULL)
 			{