--- rpl/src/interruptions.c	2010/09/23 15:27:41	1.42
+++ rpl/src/interruptions.c	2011/09/01 12:14:56	1.62
@@ -1,7 +1,7 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.0.20
-  Copyright (C) 1989-2010 Dr. BERTRAND Joël
+  RPL/2 (R) version 4.1.3
+  Copyright (C) 1989-2011 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
 
@@ -803,25 +803,8 @@ liberation_threads(struct_processus *s_e
 				}
 			}
 
-			for(i = 0; i < (*s_etat_processus).nombre_variables; i++)
-			{
-				pthread_mutex_trylock(&((*(*s_etat_processus)
-						.s_liste_variables[i].objet).mutex));
-				pthread_mutex_unlock(&((*(*s_etat_processus)
-						.s_liste_variables[i].objet).mutex));
-
-				// Les variables de niveau 0 sont des définitions qui
-				// ne sont pas copiées entre threads.
-				if ((*s_etat_processus).s_liste_variables[i].niveau > 0)
-				{
-					liberation(s_etat_processus,
-							(*s_etat_processus).s_liste_variables[i].objet);
-				}
-
-				free((*s_etat_processus).s_liste_variables[i].nom);
-			}
-
-			free((*s_etat_processus).s_liste_variables);
+			liberation_arbre_variables(s_etat_processus,
+					(*s_etat_processus).s_arbre_variables, d_faux);
 
 			for(i = 0; i < (*s_etat_processus).nombre_variables_statiques; i++)
 			{
@@ -1335,6 +1318,7 @@ liberation_threads(struct_processus *s_e
 			sem_destroy2((*s_etat_processus).semaphore_fork, sem_fork);
 #			endif
 
+			liberation_contexte_cas(s_etat_processus);
 			free(s_etat_processus);
 
 			s_etat_processus = candidat;
@@ -1748,7 +1732,7 @@ interruption1(SIGHANDLER_ARGS)
 	verrouillage_gestionnaire_signaux();
 
 #	ifdef _BROKEN_SIGINFO
-	if (signal == SIGINT)
+	if ((signal == SIGINT) || (signal == SIGTERM))
 	{
 		// Si l'interruption provient du clavier, il n'y a pas eu d'appel
 		// à queue_in().
@@ -1812,6 +1796,7 @@ interruption1(SIGHANDLER_ARGS)
 		}
 
 		case SIGINT :
+		case SIGTERM :
 		{
 			/*
 			 * Une vieille spécification POSIX permet au pointeur siginfo
@@ -1837,8 +1822,17 @@ interruption1(SIGHANDLER_ARGS)
 
 				if (((*s_etat_processus).type_debug & d_debug_signaux) != 0)
 				{
-					printf("[%d] SIGINT (thread %llu)\n", (int) getpid(),
-							(unsigned long long) pthread_self());
+					if (signal == SIGINT)
+					{
+						printf("[%d] SIGINT (thread %llu)\n", (int) getpid(),
+								(unsigned long long) pthread_self());
+					}
+					else
+					{
+						printf("[%d] SIGTERM (thread %llu)\n", (int) getpid(),
+								(unsigned long long) pthread_self());
+					}
+
 					fflush(stdout);
 				}
 
@@ -1860,16 +1854,19 @@ interruption1(SIGHANDLER_ARGS)
 						return;
 					}
 
-					if (strncmp(getenv("LANG"), "fr", 2) == 0)
-					{
-						printf("+++Interruption\n");
-					}
-					else
+					if (signal == SIGINT)
 					{
-						printf("+++Interrupt\n");
-					}
+						if (strncmp(getenv("LANG"), "fr", 2) == 0)
+						{
+							printf("+++Interruption\n");
+						}
+						else
+						{
+							printf("+++Interrupt\n");
+						}
 
-					fflush(stdout);
+						fflush(stdout);
+					}
 
 					(*s_etat_processus).var_volatile_requete_arret = -1;
 					(*s_etat_processus).var_volatile_alarme = -1;
@@ -1994,20 +1991,12 @@ interruption2(SIGHANDLER_ARGS)
 void
 interruption3(SIGHANDLER_ARGS)
 {
-	pid_t					pid;
-
 	struct_processus		*s_etat_processus;
 
 	static int				compteur = 0;
 
 	verrouillage_gestionnaire_signaux();
 
-#	ifdef _BROKEN_SIGINFO
-	pid = origine_signal(signal);
-#	else
-	pid = (*siginfo).si_pid;
-#	endif
-
 	if ((s_etat_processus = recherche_thread(getpid(), pthread_self())) == NULL)
 	{
 		deverrouillage_gestionnaire_signaux();
@@ -2062,18 +2051,10 @@ interruption3(SIGHANDLER_ARGS)
 void
 interruption4(SIGHANDLER_ARGS)
 {
-	pid_t					pid;
-
 	struct_processus		*s_etat_processus;
 
 	verrouillage_gestionnaire_signaux();
 
-#	ifdef _BROKEN_SIGINFO
-	pid = origine_signal(signal);
-#	else
-	pid = (*siginfo).si_pid;
-#	endif
-
 	if ((s_etat_processus = recherche_thread(getpid(), pthread_self())) == NULL)
 	{
 		deverrouillage_gestionnaire_signaux();
@@ -2170,18 +2151,10 @@ interruption5(SIGHANDLER_ARGS)
 void
 interruption6(SIGHANDLER_ARGS)
 {
-	pid_t					pid;
-
 	struct_processus		*s_etat_processus;
 
 	verrouillage_gestionnaire_signaux();
 
-#	ifdef _BROKEN_SIGINFO
-	pid = origine_signal(signal);
-#	else
-	pid = (*siginfo).si_pid;
-#	endif
-
 	if ((s_etat_processus = recherche_thread(getpid(), pthread_self())) == NULL)
 	{
 		deverrouillage_gestionnaire_signaux();
@@ -2202,18 +2175,10 @@ interruption6(SIGHANDLER_ARGS)
 void
 interruption7(SIGHANDLER_ARGS)
 {
-	pid_t					pid;
-
 	struct_processus		*s_etat_processus;
 
 	verrouillage_gestionnaire_signaux();
 
-#	ifdef _BROKEN_SIGINFO
-	pid = origine_signal(signal);
-#	else
-	pid = (*siginfo).si_pid;
-#	endif
-
 	if ((s_etat_processus = recherche_thread(getpid(), pthread_self())) == NULL)
 	{
 		deverrouillage_gestionnaire_signaux();
@@ -2289,18 +2254,10 @@ interruption8(SIGHANDLER_ARGS)
 void
 interruption9(SIGHANDLER_ARGS)
 {
-	pid_t					pid;
-
 	struct_processus		*s_etat_processus;
 
 	verrouillage_gestionnaire_signaux();
 
-#	ifdef _BROKEN_SIGINFO
-	pid = origine_signal(signal);
-#	else
-	pid = (*siginfo).si_pid;
-#	endif
-
 	if ((s_etat_processus = recherche_thread(getpid(), pthread_self())) == NULL)
 	{
 		deverrouillage_gestionnaire_signaux();
@@ -2334,20 +2291,12 @@ interruption10(SIGHANDLER_ARGS)
 {
 	file					*fichier;
 
-	pid_t					pid;
-
 	struct_processus		*s_etat_processus;
 
 	unsigned char			nom[8 + 64 + 1];
 
 	verrouillage_gestionnaire_signaux();
 
-#	ifdef _BROKEN_SIGINFO
-	pid = origine_signal(signal);
-#	else
-	pid = (*siginfo).si_pid;
-#	endif
-
 	if ((s_etat_processus = recherche_thread(getpid(), pthread_self())) == NULL)
 	{
 		deverrouillage_gestionnaire_signaux();