--- rpl/src/instructions_c4.c 2013/02/27 17:11:41 1.48 +++ rpl/src/instructions_c4.c 2013/03/20 17:11:44 1.49 @@ -179,7 +179,7 @@ instruction_corr(struct_processus *s_eta struct_objet *s_objet_statistique; struct_objet *s_objet_resultat; - unsigned long nombre_colonnes; + integer8 nombre_colonnes; (*s_etat_processus).erreur_execution = d_ex; @@ -372,7 +372,7 @@ instruction_convert(struct_processus *s_ logical1 last_valide; - long longueur_chaine; + size_t longueur_chaine; logical1 presence_resultat; @@ -1085,10 +1085,9 @@ instruction_cswp(struct_processus *s_eta struct_objet *s_objet_argument_2; struct_objet *s_objet_argument_3; - signed long colonne_1; - signed long colonne_2; - - unsigned long i; + integer8 colonne_1; + integer8 colonne_2; + integer8 i; (*s_etat_processus).erreur_execution = d_ex;