--- rpl/src/instructions_v2.c 2013/09/06 10:30:55 1.44 +++ rpl/src/instructions_v2.c 2017/01/18 15:44:23 1.58 @@ -1,7 +1,7 @@ /* ================================================================================ - RPL/2 (R) version 4.1.16 - Copyright (C) 1989-2013 Dr. BERTRAND Joël + RPL/2 (R) version 4.1.26 + Copyright (C) 1989-2017 Dr. BERTRAND Joël This file is part of RPL/2. @@ -343,7 +343,8 @@ instruction_verify(struct_processus *s_e { if ((*(*l_element_courant).donnee).type == CHN) { - if ((chaine_majuscule = conversion_majuscule((unsigned char *) + if ((chaine_majuscule = conversion_majuscule( + s_etat_processus, (unsigned char *) (*(*l_element_courant).donnee).objet)) == NULL) { (*s_etat_processus).erreur_systeme = @@ -467,6 +468,7 @@ instruction_verify(struct_processus *s_e if ((*(*l_element_version).donnee).type == CHN) { if ((chaine_majuscule = conversion_majuscule( + s_etat_processus, (unsigned char *) (*(*l_element_version) .donnee).objet)) == NULL) {