--- rpl/src/instructions_e1.c 2014/10/13 07:12:54 1.51 +++ rpl/src/instructions_e1.c 2015/01/27 14:18:06 1.54 @@ -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.20 + Copyright (C) 1989-2015 Dr. BERTRAND Joël This file is part of RPL/2. @@ -544,6 +544,7 @@ instruction_else(struct_processus *s_eta } if ((instruction_majuscule = conversion_majuscule( + s_etat_processus, (*s_etat_processus).instruction_courante)) == NULL) { free((*s_etat_processus).instruction_courante); @@ -835,6 +836,7 @@ instruction_elseif(struct_processus *s_e } if ((instruction_majuscule = conversion_majuscule( + s_etat_processus, (*s_etat_processus).instruction_courante)) == NULL) { free((*s_etat_processus).instruction_courante);