--- rpl/src/instructions_r2.c	2010/04/21 13:45:48	1.8
+++ rpl/src/instructions_r2.c	2010/07/14 14:19:38	1.12
@@ -1,6 +1,6 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.0.15
+  RPL/2 (R) version 4.0.18
   Copyright (C) 1989-2010 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
@@ -565,6 +565,11 @@ instruction_return(struct_processus *s_e
 								.indice_boucle = NULL;
 
 						depilement_pile_systeme(s_etat_processus);
+
+						if ((*s_etat_processus).erreur_systeme != d_es)
+						{
+							return;
+						}
 					}
 					else
 					{