--- rpl/src/instructions_n1.c	2012/10/01 11:05:05	1.39
+++ rpl/src/instructions_n1.c	2012/10/04 15:21:26	1.40
@@ -2288,7 +2288,7 @@ instruction_next(struct_processus *s_eta
 			{
 				(*s_etat_processus).niveau_courant--;
 
-				if (retrait_variable_par_niveau(s_etat_processus) == d_erreur)
+				if (retrait_variables_par_niveau(s_etat_processus) == d_erreur)
 				{
 					return;
 				}
@@ -2433,7 +2433,7 @@ instruction_next(struct_processus *s_eta
 
 			(*s_etat_processus).niveau_courant--;
 
-			if (retrait_variable_par_niveau(s_etat_processus) == d_erreur)
+			if (retrait_variables_par_niveau(s_etat_processus) == d_erreur)
 			{
 				return;
 			}