--- rpl/src/interruptions.c 2015/07/21 12:22:16 1.159 +++ rpl/src/interruptions.c 2015/10/23 09:58:50 1.162 @@ -1,6 +1,6 @@ /* ================================================================================ - RPL/2 (R) version 4.1.22 + RPL/2 (R) version 4.1.23 Copyright (C) 1989-2015 Dr. BERTRAND Joël This file is part of RPL/2. @@ -766,13 +766,14 @@ liberation_threads(struct_processus *s_e } } - // ne peut être effacé qu'une seule fois + // Ne peut être effacé qu'une seule fois if (suppression_variables_partagees == d_faux) { suppression_variables_partagees = d_vrai; liberation_arbre_variables_partagees(s_etat_processus, (*(*s_etat_processus).s_arbre_variables_partagees)); + (*(*s_etat_processus).s_arbre_variables_partagees) = NULL; l_element_partage_courant = (*(*s_etat_processus) .l_liste_variables_partagees); @@ -784,6 +785,8 @@ liberation_threads(struct_processus *s_e free(l_element_partage_courant); l_element_partage_courant = l_element_partage_suivant; } + + (*(*s_etat_processus).l_liste_variables_partagees) = NULL; } liberation_arbre_variables(s_etat_processus,