--- rpl/src/gestion_variables.c	2011/06/20 17:54:15	1.35
+++ rpl/src/gestion_variables.c	2011/06/21 07:35:40	1.36
@@ -1040,6 +1040,8 @@ retrait_variable(struct_processus *s_eta
 
 	unsigned long				niveau;
 
+	(*s_etat_processus).niveau_supprime = d_faux;
+
 	if (recherche_variable(s_etat_processus, nom_variable) == d_vrai)
 	{
 		// Une variable correspondant au nom recherché est accessible.
@@ -1245,6 +1247,9 @@ retrait_variable(struct_processus *s_eta
 
 								if ((*variables_par_niveau).liste == NULL)
 								{
+									(*s_etat_processus).niveau_supprime =
+											d_vrai;
+
 									if ((*s_etat_processus)
 											.l_liste_variables_par_niveau
 											== variables_par_niveau)