--- rpl/src/instructions_r4.c	2012/06/22 10:12:19	1.59
+++ rpl/src/instructions_r4.c	2012/08/22 10:47:17	1.61
@@ -1,6 +1,6 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.1.9
+  RPL/2 (R) version 4.1.10
   Copyright (C) 1989-2012 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
@@ -2108,7 +2108,7 @@ printf("L=%d\n", longueur_enregistrement
 
 					longueur = strlen(format_chaine);
 
-					if (format_chaine[longueur] != ')')
+					if (format_chaine[longueur - 1] != ')')
 					{
 						liberation(s_etat_processus, s_objet_argument_1);
 						liberation(s_etat_processus, s_objet_resultat);