--- rpl/src/instructions_d4.c	2012/12/21 12:09:50	1.46
+++ rpl/src/instructions_d4.c	2014/04/25 07:37:31	1.56
@@ -1,7 +1,7 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.1.12
-  Copyright (C) 1989-2012 Dr. BERTRAND Joël
+  RPL/2 (R) version 4.1.18
+  Copyright (C) 1989-2014 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
 
@@ -320,7 +320,7 @@ instruction_delete(struct_processus *s_e
 				}
 
 				if (sqlite3_prepare_v2((*descripteur).descripteur_sqlite,
-						commande, strlen(commande), &ppStmt, &queue)
+						commande, (int) strlen(commande), &ppStmt, &queue)
 						!= SQLITE_OK)
 				{
 					(*s_etat_processus).erreur_systeme = d_es_erreur_fichier;
@@ -386,7 +386,7 @@ instruction_delete(struct_processus *s_e
 				}
 
 				if (sqlite3_prepare_v2((*descripteur).descripteur_sqlite,
-						commande, strlen(commande), &ppStmt, &queue)
+						commande, (int) strlen(commande), &ppStmt, &queue)
 						!= SQLITE_OK)
 				{
 					(*s_etat_processus).erreur_systeme = d_es_erreur_fichier;
@@ -452,7 +452,7 @@ instruction_delete(struct_processus *s_e
 				free(utf8);
 
 				if (sqlite3_prepare_v2((*descripteur).descripteur_sqlite,
-						commande, strlen(commande), &ppStmt, &queue)
+						commande, (int) strlen(commande), &ppStmt, &queue)
 						!= SQLITE_OK)
 				{
 					(*s_etat_processus).erreur_systeme = d_es_erreur_fichier;
@@ -543,7 +543,7 @@ instruction_delete(struct_processus *s_e
 				}
 
 				if (sqlite3_prepare_v2((*descripteur).descripteur_sqlite,
-						commande, strlen(commande), &ppStmt, &queue)
+						commande, (int) strlen(commande), &ppStmt, &queue)
 						!= SQLITE_OK)
 				{
 					(*s_etat_processus).erreur_systeme = d_es_erreur_fichier;
@@ -574,7 +574,7 @@ instruction_delete(struct_processus *s_e
 				}
 
 				if (sqlite3_prepare_v2((*descripteur).descripteur_sqlite,
-						commande, strlen(commande), &ppStmt, &queue)
+						commande, (int) strlen(commande), &ppStmt, &queue)
 						!= SQLITE_OK)
 				{
 					(*s_etat_processus).erreur_systeme = d_es_erreur_fichier;
@@ -710,7 +710,7 @@ instruction_drws(struct_processus *s_eta
 
 	unsigned char				*nom_fichier;
 
-	unsigned long				j;
+	integer8					j;
 
 	struct_fichier_graphique	*l_fichier_courant;
 	struct_fichier_graphique	*l_fichier_precedent;
@@ -853,10 +853,10 @@ instruction_drws(struct_processus *s_eta
 
 			if (((*s_etat_processus).colonne_statistique_1 < 1) ||
 					((*s_etat_processus).colonne_statistique_2 < 1) ||
-					((*s_etat_processus).colonne_statistique_1 > (signed long)
+					((*s_etat_processus).colonne_statistique_1 >
 					(*((struct_matrice *) (*s_objet_statistique).objet))
 					.nombre_colonnes) ||
-					((*s_etat_processus).colonne_statistique_2 > (signed long)
+					((*s_etat_processus).colonne_statistique_2 >
 					(*((struct_matrice *) (*s_objet_statistique).objet))
 					.nombre_colonnes))
 			{