--- rpl/src/instructions_f3.c	2013/03/16 20:11:29	1.57
+++ rpl/src/instructions_f3.c	2013/03/20 17:11:45	1.58
@@ -956,7 +956,7 @@ instruction_fleche_row(struct_processus
 				nombre_lignes;
 
 		if (((*((struct_matrice *) (*s_objet_resultat).objet)).tableau =
-				malloc(nombre_lignes * sizeof(integer8 *))) == NULL)
+				malloc(((size_t) nombre_lignes) * sizeof(integer8 *))) == NULL)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
 			return;
@@ -971,7 +971,7 @@ instruction_fleche_row(struct_processus
 			}
 
 			if ((((integer8 **) (*((struct_matrice *) (*s_objet_resultat)
-					.objet)).tableau)[i] = malloc(nombre_colonnes *
+					.objet)).tableau)[i] = malloc(((size_t) nombre_colonnes) *
 					sizeof(integer8))) == NULL)
 			{
 				(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
@@ -1002,7 +1002,7 @@ instruction_fleche_row(struct_processus
 				nombre_lignes;
 
 		if (((*((struct_matrice *) (*s_objet_resultat).objet)).tableau =
-				malloc(nombre_lignes * sizeof(real8 *))) == NULL)
+				malloc(((size_t) nombre_lignes) * sizeof(real8 *))) == NULL)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
 			return;
@@ -1017,7 +1017,7 @@ instruction_fleche_row(struct_processus
 			}
 
 			if ((((real8 **) (*((struct_matrice *) (*s_objet_resultat)
-					.objet)).tableau)[i] = malloc(nombre_colonnes *
+					.objet)).tableau)[i] = malloc(((size_t) nombre_colonnes) *
 					sizeof(real8))) == NULL)
 			{
 				(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
@@ -1029,7 +1029,7 @@ instruction_fleche_row(struct_processus
 				for(j = 0; j < nombre_colonnes; j++)
 				{
 					((real8 **) (*((struct_matrice *) (*s_objet_resultat)
-							.objet)).tableau)[i][j] = ((integer8 **)
+							.objet)).tableau)[i][j] = (real8) ((integer8 **)
 							(*((struct_matrice *) (*s_objet).objet))
 							.tableau)[0][j];
 				}
@@ -1062,7 +1062,7 @@ instruction_fleche_row(struct_processus
 				nombre_lignes;
 
 		if (((*((struct_matrice *) (*s_objet_resultat).objet)).tableau =
-				malloc(nombre_lignes * sizeof(complex16 *))) == NULL)
+				malloc(((size_t) nombre_lignes) * sizeof(complex16 *))) == NULL)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
 			return;
@@ -1077,7 +1077,7 @@ instruction_fleche_row(struct_processus
 			}
 
 			if ((((complex16 **) (*((struct_matrice *) (*s_objet_resultat)
-					.objet)).tableau)[i] = malloc(nombre_colonnes *
+					.objet)).tableau)[i] = malloc(((size_t) nombre_colonnes) *
 					sizeof(complex16))) == NULL)
 			{
 				(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
@@ -1089,7 +1089,7 @@ instruction_fleche_row(struct_processus
 				for(j = 0; j < nombre_colonnes; j++)
 				{
 					(((complex16 **) (*((struct_matrice *) (*s_objet_resultat)
-							.objet)).tableau)[i][j]).partie_reelle =
+							.objet)).tableau)[i][j]).partie_reelle = (real8)
 							((integer8 **) (*((struct_matrice *)
 							(*s_objet).objet)).tableau)[0][j];
 					(((complex16 **) (*((struct_matrice *) (*s_objet_resultat)
@@ -1351,7 +1351,7 @@ instruction_fleche_col(struct_processus
 				nombre_lignes;
 
 		if (((*((struct_matrice *) (*s_objet_resultat).objet)).tableau =
-				malloc(nombre_lignes * sizeof(integer8 *))) == NULL)
+				malloc(((size_t) nombre_lignes) * sizeof(integer8 *))) == NULL)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
 			return;
@@ -1360,7 +1360,7 @@ instruction_fleche_col(struct_processus
 		for(i = 0; i < nombre_lignes; i++)
 		{
 			if ((((integer8 **) (*((struct_matrice *) (*s_objet_resultat)
-					.objet)).tableau)[i] = malloc(nombre_colonnes *
+					.objet)).tableau)[i] = malloc(((size_t) nombre_colonnes) *
 					sizeof(integer8))) == NULL)
 			{
 				(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
@@ -1400,7 +1400,7 @@ instruction_fleche_col(struct_processus
 				nombre_lignes;
 
 		if (((*((struct_matrice *) (*s_objet_resultat).objet)).tableau =
-				malloc(nombre_lignes * sizeof(real8 *))) == NULL)
+				malloc(((size_t) nombre_lignes) * sizeof(real8 *))) == NULL)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
 			return;
@@ -1409,7 +1409,7 @@ instruction_fleche_col(struct_processus
 		for(i = 0; i < nombre_lignes; i++)
 		{
 			if ((((real8 **) (*((struct_matrice *) (*s_objet_resultat)
-					.objet)).tableau)[i] = malloc(nombre_colonnes *
+					.objet)).tableau)[i] = malloc(((size_t) nombre_colonnes) *
 					sizeof(real8))) == NULL)
 			{
 				(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
@@ -1430,7 +1430,7 @@ instruction_fleche_col(struct_processus
 				for(i = 0; i < nombre_lignes; i++)
 				{
 					((real8 **) (*((struct_matrice *) (*s_objet_resultat)
-							.objet)).tableau)[i][j] = ((integer8 **)
+							.objet)).tableau)[i][j] = (real8) ((integer8 **)
 							(*((struct_matrice *) (*s_objet).objet))
 							.tableau)[i][0];
 				}
@@ -1463,7 +1463,7 @@ instruction_fleche_col(struct_processus
 				nombre_lignes;
 
 		if (((*((struct_matrice *) (*s_objet_resultat).objet)).tableau =
-				malloc(nombre_lignes * sizeof(complex16 *))) == NULL)
+				malloc(((size_t) nombre_lignes) * sizeof(complex16 *))) == NULL)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
 			return;
@@ -1472,7 +1472,7 @@ instruction_fleche_col(struct_processus
 		for(i = 0; i < nombre_lignes; i++)
 		{
 			if ((((complex16 **) (*((struct_matrice *) (*s_objet_resultat)
-					.objet)).tableau)[i] = malloc(nombre_colonnes *
+					.objet)).tableau)[i] = malloc(((size_t) nombre_colonnes) *
 					sizeof(complex16))) == NULL)
 			{
 				(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
@@ -1493,7 +1493,7 @@ instruction_fleche_col(struct_processus
 				for(i = 0; i < nombre_lignes; i++)
 				{
 					(((complex16 **) (*((struct_matrice *) (*s_objet_resultat)
-							.objet)).tableau)[i][j]).partie_reelle =
+							.objet)).tableau)[i][j]).partie_reelle = (real8)
 							((integer8 **) (*((struct_matrice *)
 							(*s_objet).objet)).tableau)[i][0];
 					(((complex16 **) (*((struct_matrice *) (*s_objet_resultat)