--- rpl/src/instructions_s2.c	2010/05/24 10:58:35	1.12
+++ rpl/src/instructions_s2.c	2010/06/19 15:54:51	1.13
@@ -1257,7 +1257,8 @@ instruction_str_fleche(struct_processus
 
 			recherche_type(s_etat_processus);
 
-			if ((*s_etat_processus).erreur_execution != d_ex)
+			if (((*s_etat_processus).erreur_execution != d_ex) ||
+					((*s_etat_processus).erreur_systeme != d_es))
 			{
 				liberation(s_etat_processus, s_objet);