--- rpl/src/formateur.c	2011/11/17 22:21:16	1.41
+++ rpl/src/formateur.c	2011/11/18 20:24:40	1.42
@@ -75,7 +75,6 @@ formateur(struct_processus *s_etat_proce
 	unsigned long				i;
 	unsigned long				j;
 	unsigned long				k;
-	unsigned long				longueur_binaire;
 	unsigned long				longueur_courante;
 	unsigned long				longueur_decimale_courante;
 	unsigned long				*longueurs_maximales;
@@ -94,7 +93,6 @@ formateur(struct_processus *s_etat_proce
 
 	strcpy(base, " ");
 
-	longueur_binaire = 0;
 	masque_binaire = 0;
 
 	if ((*s_objet).type == ADR)
@@ -1580,7 +1578,6 @@ formateur(struct_processus *s_etat_proce
 --------------------------------------------------------------------------------
 */
 
-		longueur_binaire = longueur_entiers_binaires(s_etat_processus);
 		masque_binaire = masque_entiers_binaires(s_etat_processus);
 
 		if ((test_cfsf(s_etat_processus, 43) == d_faux) &&