--- rpl/src/formateur_fichiers.c 2012/06/22 10:12:19 1.43 +++ rpl/src/formateur_fichiers.c 2012/10/01 11:05:01 1.46 @@ -1,6 +1,6 @@ /* ================================================================================ - RPL/2 (R) version 4.1.9 + RPL/2 (R) version 4.1.11 Copyright (C) 1989-2012 Dr. BERTRAND Joël This file is part of RPL/2. @@ -1496,7 +1496,7 @@ formateur_fichier(struct_processus *s_et return(NULL); } - position_3 = strlen(format_chaine); + position_3 = strlen(format_chaine) - 1; if (format_chaine[position_3] != ')') { @@ -1508,7 +1508,7 @@ formateur_fichier(struct_processus *s_et return(NULL); } - format_chaine[--position_3] = d_code_fin_chaine; + format_chaine[position_3] = d_code_fin_chaine; position_2 = position_1;