--- rpl/src/compilation.c	2015/01/29 09:33:41	1.76
+++ rpl/src/compilation.c	2015/06/08 14:11:29	1.79
@@ -1,6 +1,6 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.1.20
+  RPL/2 (R) version 4.1.22
   Copyright (C) 1989-2015 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
@@ -1706,6 +1706,11 @@ recherche_instruction_suivante_recursive
 		erreur = ((erreur_analyse == d_ex) && (erreur_format == d_ex))
 				? d_absence_erreur : d_erreur;
 		(*s_etat_processus).erreur_execution = erreur_analyse;
+
+		if ((*s_etat_processus).erreur_execution == d_ex)
+		{
+			(*s_etat_processus).erreur_execution = erreur_format;
+		}
 	}
 	else
 	{