--- rpl/src/gestion_objets.c	2011/06/21 07:45:22	1.50
+++ rpl/src/gestion_objets.c	2011/06/21 15:03:58	1.51
@@ -3110,17 +3110,13 @@ copie_etat_processus(struct_processus *s
 	 * Copie de la table des variables
 	 */
 
-	if (((*s_nouvel_etat_processus).s_arbre_variables =
-			copie_arbre_variables(s_etat_processus)) == NULL)
+	copie_arbre_variables(s_etat_processus, s_nouvel_etat_processus);
+
+	if ((*s_nouvel_etat_processus).erreur_systeme != d_es)
 	{
 		return(NULL);
 	}
 
-	// La pile des variables par niveau n'est pas copiée puisqu'il est
-	// impossible n'enlever dans un thread une variable créée dans le père.
-
-	(*s_etat_processus).l_liste_variables_par_niveau = NULL;
-
 	/*
 	 * Copie de la table des variables statiques
 	 */