--- rpl/src/instructions_l4.c 2013/02/27 17:11:42 1.41 +++ rpl/src/instructions_l4.c 2013/03/20 17:11:45 1.42 @@ -46,8 +46,8 @@ instruction_lu(struct_processus *s_etat_ struct_objet *s_objet_resultat_2; struct_objet *s_objet_resultat_3; - unsigned long i; - unsigned long j; + integer8 i; + integer8 j; (*s_etat_processus).erreur_execution = d_ex; @@ -183,8 +183,8 @@ instruction_lu(struct_processus *s_etat_ .nombre_colonnes; if (((*((struct_matrice *) (*s_objet_resultat_3).objet)).tableau = - malloc((*((struct_matrice *) (*s_objet_resultat_3) - .objet)).nombre_lignes * sizeof(real8 *))) == NULL) + malloc(((size_t) (*((struct_matrice *) (*s_objet_resultat_3) + .objet)).nombre_lignes) * sizeof(real8 *))) == NULL) { (*s_etat_processus).erreur_systeme = d_es_allocation_memoire; return; @@ -194,8 +194,8 @@ instruction_lu(struct_processus *s_etat_ .nombre_lignes; i++) { if ((((real8 **) (*((struct_matrice *) (*s_objet_resultat_3).objet)) - .tableau)[i] = malloc((*((struct_matrice *) - (*s_objet_resultat_3).objet)).nombre_colonnes * + .tableau)[i] = malloc(((size_t) (*((struct_matrice *) + (*s_objet_resultat_3).objet)).nombre_colonnes) * sizeof(real8))) == NULL) { (*s_etat_processus).erreur_systeme = d_es_allocation_memoire; @@ -240,8 +240,8 @@ instruction_lu(struct_processus *s_etat_ .nombre_colonnes; if (((*((struct_matrice *) (*s_objet_resultat_2).objet)).tableau = - malloc((*((struct_matrice *) (*s_objet_resultat_2) - .objet)).nombre_lignes * sizeof(real8 *))) == NULL) + malloc(((size_t) (*((struct_matrice *) (*s_objet_resultat_2) + .objet)).nombre_lignes) * sizeof(real8 *))) == NULL) { (*s_etat_processus).erreur_systeme = d_es_allocation_memoire; return; @@ -251,8 +251,8 @@ instruction_lu(struct_processus *s_etat_ .nombre_lignes; i++) { if ((((real8 **) (*((struct_matrice *) (*s_objet_resultat_2).objet)) - .tableau)[i] = malloc((*((struct_matrice *) - (*s_objet_resultat_2).objet)).nombre_colonnes * + .tableau)[i] = malloc(((size_t) (*((struct_matrice *) + (*s_objet_resultat_2).objet)).nombre_colonnes) * sizeof(real8))) == NULL) { (*s_etat_processus).erreur_systeme = d_es_allocation_memoire; @@ -367,8 +367,8 @@ instruction_lu(struct_processus *s_etat_ .nombre_colonnes; if (((*((struct_matrice *) (*s_objet_resultat_3).objet)).tableau = - malloc((*((struct_matrice *) (*s_objet_resultat_3) - .objet)).nombre_lignes * sizeof(complex16 *))) == NULL) + malloc(((size_t) (*((struct_matrice *) (*s_objet_resultat_3) + .objet)).nombre_lignes) * sizeof(complex16 *))) == NULL) { (*s_etat_processus).erreur_systeme = d_es_allocation_memoire; return; @@ -379,8 +379,8 @@ instruction_lu(struct_processus *s_etat_ { if ((((complex16 **) (*((struct_matrice *) (*s_objet_resultat_3).objet)) - .tableau)[i] = malloc((*((struct_matrice *) - (*s_objet_resultat_3).objet)).nombre_colonnes * + .tableau)[i] = malloc(((size_t) (*((struct_matrice *) + (*s_objet_resultat_3).objet)).nombre_colonnes) * sizeof(complex16))) == NULL) { (*s_etat_processus).erreur_systeme = d_es_allocation_memoire; @@ -429,8 +429,8 @@ instruction_lu(struct_processus *s_etat_ .nombre_colonnes; if (((*((struct_matrice *) (*s_objet_resultat_2).objet)).tableau = - malloc((*((struct_matrice *) (*s_objet_resultat_2) - .objet)).nombre_lignes * sizeof(complex16 *))) == NULL) + malloc(((size_t) (*((struct_matrice *) (*s_objet_resultat_2) + .objet)).nombre_lignes) * sizeof(complex16 *))) == NULL) { (*s_etat_processus).erreur_systeme = d_es_allocation_memoire; return; @@ -441,8 +441,8 @@ instruction_lu(struct_processus *s_etat_ { if ((((complex16 **) (*((struct_matrice *) (*s_objet_resultat_2).objet)) - .tableau)[i] = malloc((*((struct_matrice *) - (*s_objet_resultat_2).objet)).nombre_colonnes * + .tableau)[i] = malloc(((size_t) (*((struct_matrice *) + (*s_objet_resultat_2).objet)).nombre_colonnes) * sizeof(complex16))) == NULL) { (*s_etat_processus).erreur_systeme = d_es_allocation_memoire;