--- rpl/src/interruptions.c	2012/12/13 16:59:42	1.110
+++ rpl/src/interruptions.c	2013/03/21 12:07:38	1.122
@@ -1,7 +1,7 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.1.11
-  Copyright (C) 1989-2012 Dr. BERTRAND Joël
+  RPL/2 (R) version 4.1.13
+  Copyright (C) 1989-2013 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
 
@@ -81,6 +81,11 @@ thread_surveillance_signaux(void *argume
 
 	volatile struct_liste_chainee_volatile	*l_element_courant;
 
+	sigset_t								set;
+
+	sigfillset(&set);
+	pthread_sigmask(SIG_BLOCK, &set, NULL);
+
 	s_etat_processus = (struct_processus *) argument;
 
 	for(;;)
@@ -94,17 +99,17 @@ thread_surveillance_signaux(void *argume
 		if (sem_wait(semaphore_signalisation) == 0)
 #		endif
 		{
-			if ((*s_queue_signaux).requete_arret == d_vrai)
-			{
-				break;
-			}
-
 #			if (!defined(SEMAPHORES_NOMMES)) || defined(IPCS_SYSV)
 			sem_post(&(*s_queue_signaux).signalisation);
 #			else
 			sem_post(semaphore_signalisation);
 #			endif
 
+			if ((*s_queue_signaux).requete_arret == d_vrai)
+			{
+				break;
+			}
+
 			nombre_signaux_envoyes = 0;
 			sched_yield();
 
@@ -544,7 +549,13 @@ liberation_threads(struct_processus *s_e
 
 	struct_processus							*candidat;
 
-	unsigned long								i;
+	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;
+
+	integer8									i;
 
 	void										*element_candidat;
 	void										*element_courant;
@@ -765,12 +776,34 @@ liberation_threads(struct_processus *s_e
 				suppression_variables_partagees = d_vrai;
 
 				liberation_arbre_variables_partagees(s_etat_processus,
-						(*s_etat_processus).s_arbre_variables);
+						(*(*s_etat_processus).s_arbre_variables_partagees));
+
+				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;
+				}
 			}
 
 			liberation_arbre_variables(s_etat_processus,
 					(*s_etat_processus).s_arbre_variables, d_faux);
 
+			l_element_statique_courant = (*s_etat_processus)
+					.l_liste_variables_statiques;
+
+			while(l_element_statique_courant != NULL)
+			{
+				l_element_statique_suivant =
+					(*l_element_statique_courant).suivant;
+				free(l_element_statique_courant);
+				l_element_statique_courant = l_element_statique_suivant;
+			}
+
 			element_courant = (*s_etat_processus).l_base_pile;
 			while(element_courant != NULL)
 			{
@@ -2376,8 +2409,9 @@ signal_hup(struct_processus *s_etat_proc
 		return;
 	}
 
-	snprintf(nom, 8 + 64 + 1, "rpl-out-%lu-%lu", (unsigned long) getpid(),
-			(unsigned long) pthread_self());
+	snprintf(nom, 8 + 64 + 1, "rpl-out-%llu-%llu",
+			(unsigned long long) getpid(),
+			(unsigned long long) pthread_self());
 
 	if ((fichier = fopen(nom, "w+")) != NULL)
 	{