--- rpl/src/instructions_d6.c	2013/02/27 14:12:57	1.45
+++ rpl/src/instructions_d6.c	2013/02/27 15:31:23	1.46
@@ -612,7 +612,6 @@ instruction_digest(struct_processus *s_e
 
 	logical1					somme_invalide;
 
-	long						i;
 	long						longueur_chaine;
 
 	struct_liste_chainee		*l_element_courant;
@@ -628,6 +627,7 @@ instruction_digest(struct_processus *s_e
 	unsigned char				*tampon;
 	unsigned char				*vecteur_initialisation;
 
+	unsigned int				i;
 	unsigned int				longueur_bloc;
 	unsigned int				longueur_somme;
 	unsigned int				longueur_tampon;