--- rpl/src/gestion_variables.c	2012/10/03 14:53:11	1.58
+++ rpl/src/gestion_variables.c	2012/10/04 15:21:26	1.59
@@ -1499,7 +1499,7 @@ retrait_variable(struct_processus *s_eta
 */
 
 logical1
-retrait_variable_par_niveau(struct_processus *s_etat_processus)
+retrait_variables_par_niveau(struct_processus *s_etat_processus)
 {
 	struct_liste_variables			*l_element_a_supprimer;
 
@@ -1553,12 +1553,11 @@ retrait_variable_par_niveau(struct_proce
 								.l_liste_variables_par_niveau).liste).donnee))
 								.variable_statique, ((*s_etat_processus)
 								.mode_execution_programme
-								 == 'Y') ? 'P' : 'E') == d_vrai)
+								 == 'Y') ? 'P' : 'E') != NULL)
 						{
-							(*s_etat_processus).s_liste_variables_statiques
-									[(*s_etat_processus)
-									.position_variable_statique_courante]
-									.objet = (*((struct_variable *)
+							(*(*s_etat_processus)
+									.pointeur_variable_statique_courante)
+							 		.objet = (*((struct_variable *)
 									(*(*(*s_etat_processus)
 									.l_liste_variables_par_niveau).liste)
 									.donnee)).objet;
@@ -1592,11 +1591,10 @@ retrait_variable_par_niveau(struct_proce
 								.l_liste_variables_par_niveau).liste).donnee))
 								.variable_statique, ((*s_etat_processus)
 								.mode_execution_programme
-								 == 'Y') ? 'P' : 'E') == d_vrai)
+								 == 'Y') ? 'P' : 'E') != NULL)
 						{
-							(*s_etat_processus).s_liste_variables_statiques
-									[(*s_etat_processus)
-									.position_variable_statique_courante]
+							(*(*s_etat_processus)
+									.pointeur_variable_statique_courante)
 									.objet = (*((struct_variable *)
 									(*(*(*s_etat_processus)
 									.l_liste_variables_par_niveau).liste)