--- rpl/src/instructions_v2.c 2014/07/17 08:07:25 1.48 +++ rpl/src/instructions_v2.c 2015/11/26 11:44:41 1.55 @@ -1,7 +1,7 @@ /* ================================================================================ - RPL/2 (R) version 4.1.19 - Copyright (C) 1989-2014 Dr. BERTRAND Joël + RPL/2 (R) version 4.1.24 + Copyright (C) 1989-2015 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) {