--- rpl/src/instructions_d5.c 2012/12/13 16:59:41 1.97 +++ rpl/src/instructions_d5.c 2012/12/17 21:22:43 1.98 @@ -838,6 +838,9 @@ instruction_detach(struct_processus *s_e struct_liste_chainee *l_element_precedent; struct_liste_chainee *l_element_suivant; + struct_liste_variables_partagees *l_element_partage_courant; + struct_liste_variables_partagees *l_element_partage_suivant; + struct_liste_variables_statiques *l_element_statique_courant; struct_liste_variables_statiques *l_element_statique_suivant; @@ -938,7 +941,7 @@ instruction_detach(struct_processus *s_e (*(*s_etat_processus).pointeur_variable_courante).nom, (*(*s_etat_processus).pointeur_variable_courante) .variable_partagee, (*(*s_etat_processus) - .pointeur_variable_courante).origine) == d_faux) + .pointeur_variable_courante).origine) == NULL) { liberation(s_etat_processus, s_objet); @@ -2574,6 +2577,16 @@ instruction_detach(struct_processus *s_e l_element_statique_courant = l_element_statique_suivant; } + l_element_partage_courant = (*(*s_etat_processus) + .l_liste_variables_partagees); + + while(l_element_partage_courant != NULL) + { + l_element_partage_suivant = (*l_element_partage_courant).suivant; + free(l_element_partage_courant); + l_element_partage_courant = l_element_partage_suivant; + } + if ((*s_etat_processus).entree_standard != NULL) { pclose((*s_etat_processus).entree_standard); @@ -2599,7 +2612,7 @@ instruction_detach(struct_processus *s_e } liberation_arbre_variables_partagees(s_etat_processus, - (*s_etat_processus).s_arbre_variables); + (*(*s_etat_processus).s_arbre_variables_partagees)); liberation_arbre_variables(s_etat_processus, (*s_etat_processus).s_arbre_variables, d_vrai); free((*s_etat_processus).pointeurs_caracteres_variables);