--- rpl/src/instructions_d2.c	2013/02/27 17:11:41	1.40
+++ rpl/src/instructions_d2.c	2013/03/20 17:11:44	1.41
@@ -524,7 +524,7 @@ instruction_dot(struct_processus *s_etat
 	struct_objet					*s_objet_argument_2;
 	struct_objet					*s_objet_resultat;
 
-	unsigned long					i;
+	integer8						i;
 
 	void							*accumulateur;
 
@@ -648,8 +648,8 @@ instruction_dot(struct_processus *s_etat
 				return;
 			}
 
-			if ((accumulateur = malloc((*((struct_vecteur *)
-					(*s_objet_argument_1).objet)).taille * sizeof(real8)))
+			if ((accumulateur = malloc(((size_t) (*((struct_vecteur *)
+					(*s_objet_argument_1).objet)).taille) * sizeof(real8)))
 					== NULL)
 			{
 				(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
@@ -705,8 +705,8 @@ instruction_dot(struct_processus *s_etat
 			return;
 		}
 
-		if ((accumulateur = malloc((*((struct_vecteur *)
-				(*s_objet_argument_1).objet)).taille * sizeof(real8))) == NULL)
+		if ((accumulateur = malloc(((size_t) (*((struct_vecteur *)
+				(*s_objet_argument_1).objet)).taille) * sizeof(real8))) == NULL)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
 			return;
@@ -715,9 +715,9 @@ instruction_dot(struct_processus *s_etat
 		for(i = 0; i < (*((struct_vecteur *) (*s_objet_argument_1).objet))
 				.taille; i++)
 		{
-			((real8 *) accumulateur)[i] =
+			((real8 *) accumulateur)[i] = ((real8)
 					((integer8 *) (*((struct_vecteur *) (*s_objet_argument_1)
-					.objet)).tableau)[i] * ((real8 *) (*((struct_vecteur *)
+					.objet)).tableau)[i]) * ((real8 *) (*((struct_vecteur *)
 					(*s_objet_argument_2).objet)).tableau)[i];
 		}
 
@@ -752,8 +752,8 @@ instruction_dot(struct_processus *s_etat
 			return;
 		}
 
-		if ((accumulateur = malloc((*((struct_vecteur *)
-				(*s_objet_argument_1).objet)).taille * sizeof(real8))) == NULL)
+		if ((accumulateur = malloc(((size_t) (*((struct_vecteur *)
+				(*s_objet_argument_1).objet)).taille) * sizeof(real8))) == NULL)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
 			return;
@@ -764,8 +764,9 @@ instruction_dot(struct_processus *s_etat
 		{
 			((real8 *) accumulateur)[i] =
 					((real8 *) (*((struct_vecteur *) (*s_objet_argument_1)
-					.objet)).tableau)[i] * ((integer8 *) (*((struct_vecteur *)
-					(*s_objet_argument_2).objet)).tableau)[i];
+					.objet)).tableau)[i] * ((real8) ((integer8 *)
+					(*((struct_vecteur *)(*s_objet_argument_2).objet))
+					.tableau)[i]);
 		}
 
 		(*((real8 *) (*s_objet_resultat).objet)) = sommation_vecteur_reel(
@@ -799,8 +800,8 @@ instruction_dot(struct_processus *s_etat
 			return;
 		}
 
-		if ((accumulateur = malloc((*((struct_vecteur *)
-				(*s_objet_argument_1).objet)).taille * sizeof(real8))) == NULL)
+		if ((accumulateur = malloc(((size_t) (*((struct_vecteur *)
+				(*s_objet_argument_1).objet)).taille) * sizeof(real8))) == NULL)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
 			return;
@@ -853,8 +854,8 @@ instruction_dot(struct_processus *s_etat
 			return;
 		}
 
-		if ((accumulateur = malloc((*((struct_vecteur *)
-				(*s_objet_argument_1).objet)).taille * sizeof(complex16)))
+		if ((accumulateur = malloc(((size_t) (*((struct_vecteur *)
+				(*s_objet_argument_1).objet)).taille) * sizeof(complex16)))
 				== NULL)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
@@ -902,8 +903,8 @@ instruction_dot(struct_processus *s_etat
 			return;
 		}
 
-		if ((accumulateur = malloc((*((struct_vecteur *)
-				(*s_objet_argument_1).objet)).taille * sizeof(complex16)))
+		if ((accumulateur = malloc(((size_t) (*((struct_vecteur *)
+				(*s_objet_argument_1).objet)).taille) * sizeof(complex16)))
 				== NULL)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
@@ -955,8 +956,8 @@ instruction_dot(struct_processus *s_etat
 			return;
 		}
 
-		if ((accumulateur = malloc((*((struct_vecteur *)
-				(*s_objet_argument_1).objet)).taille * sizeof(complex16)))
+		if ((accumulateur = malloc(((size_t) (*((struct_vecteur *)
+				(*s_objet_argument_1).objet)).taille) * sizeof(complex16)))
 				== NULL)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
@@ -1014,8 +1015,8 @@ instruction_dot(struct_processus *s_etat
 			return;
 		}
 
-		if ((accumulateur = malloc((*((struct_vecteur *)
-				(*s_objet_argument_1).objet)).taille * sizeof(complex16)))
+		if ((accumulateur = malloc(((size_t) (*((struct_vecteur *)
+				(*s_objet_argument_1).objet)).taille) * sizeof(complex16)))
 				== NULL)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
@@ -1072,8 +1073,8 @@ instruction_dot(struct_processus *s_etat
 			return;
 		}
 
-		if ((accumulateur = malloc((*((struct_vecteur *)
-				(*s_objet_argument_1).objet)).taille * sizeof(complex16)))
+		if ((accumulateur = malloc(((size_t) (*((struct_vecteur *)
+				(*s_objet_argument_1).objet)).taille) * sizeof(complex16)))
 				== NULL)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;