--- rpl/src/instructions_m4.c 2012/10/05 13:12:39 1.47 +++ rpl/src/instructions_m4.c 2012/12/13 16:59:41 1.48 @@ -47,8 +47,6 @@ instruction_mem(struct_processus *s_etat struct_tableau_variables *tableau; - unsigned long i; - (*s_etat_processus).erreur_execution = d_ex; if ((*s_etat_processus).affichage_arguments == 'Y') @@ -169,19 +167,6 @@ instruction_mem(struct_processus *s_etat free(tableau); - for(i = 0; i < (*(*s_etat_processus).s_liste_variables_partagees) - .nombre_variables; i++) - { - (*((integer8 *) (*((*((*((struct_liste_chainee *) - (*s_objet_resultat).objet)).suivant)).donnee)).objet)) += - sizeof(unsigned char) * strlen((*(*s_etat_processus) - .s_liste_variables_partagees).table[i].nom); - (*((integer8 *) (*((*((*((struct_liste_chainee *) - (*s_objet_resultat).objet)).suivant)).donnee)).objet)) += - occupation_memoire((*(*s_etat_processus) - .s_liste_variables_partagees).table[i].objet); - } - /* * Empilement du résultat */