--- rpl/src/evaluation.c	2010/04/21 13:45:44	1.14
+++ rpl/src/evaluation.c	2010/05/16 19:36:19	1.15
@@ -1305,6 +1305,14 @@ evaluation(struct_processus *s_etat_proc
 														instruction_courante;
 													return(d_erreur);
 												}
+
+												if ((*(*s_etat_processus)
+														.l_base_pile_systeme)
+														.retour_definition
+														== 'Y')
+												{
+													break;
+												}
 											}
 											else
 											{