--- rpl/src/instructions_s6.c	2013/02/27 17:11:44	1.42
+++ rpl/src/instructions_s6.c	2013/03/21 11:30:30	1.43
@@ -42,7 +42,7 @@ instruction_sdev(struct_processus *s_eta
 	struct_objet						*s_objet_resultat;
 	struct_objet						*s_objet_temporaire;
 
-	unsigned long						nombre_colonnes;
+	integer8							nombre_colonnes;
 
 	(*s_etat_processus).erreur_execution = d_ex;
 
@@ -1205,7 +1205,7 @@ instruction_scls(struct_processus *s_eta
 
 	struct_objet				*s_objet_statistique;
 
-	unsigned long				j;
+	integer8					j;
 
 	(*s_etat_processus).erreur_execution = d_ex;