--- rpl/src/formateur_fichiers.c 2015/01/05 15:32:14 1.81 +++ rpl/src/formateur_fichiers.c 2015/02/19 11:01:19 1.83 @@ -1,6 +1,6 @@ /* ================================================================================ - RPL/2 (R) version 4.1.20 + RPL/2 (R) version 4.1.21 Copyright (C) 1989-2015 Dr. BERTRAND Joël This file is part of RPL/2. @@ -1541,7 +1541,8 @@ formateur_fichier(struct_processus *s_et } else { - if ((format_chaine = conversion_majuscule((unsigned char *) + if ((format_chaine = conversion_majuscule( + s_etat_processus, (unsigned char *) (*(*l_element_courant_format).donnee).objet)) == NULL) { @@ -1943,6 +1944,7 @@ formateur_fichier(struct_processus *s_et else { if ((format_chaine = conversion_majuscule( + s_etat_processus, (unsigned char *) (*(*((struct_tableau *) (*s_format).objet)).elements[i]).objet)) == NULL) @@ -3767,7 +3769,8 @@ formateur_fichier(struct_processus *s_et } else { - if ((format_chaine = conversion_majuscule((unsigned char *) + if ((format_chaine = conversion_majuscule( + s_etat_processus, (unsigned char *) (*(*l_element_courant_format).donnee).objet)) == NULL) {