--- rpl/src/instructions_c2.c 2014/04/25 07:37:30 1.55 +++ rpl/src/instructions_c2.c 2015/02/19 11:01:21 1.61 @@ -1,7 +1,7 @@ /* ================================================================================ - RPL/2 (R) version 4.1.18 - Copyright (C) 1989-2014 Dr. BERTRAND Joël + RPL/2 (R) version 4.1.21 + Copyright (C) 1989-2015 Dr. BERTRAND Joël This file is part of RPL/2. @@ -125,7 +125,7 @@ instruction_cycle(struct_processus *s_et tampon = (*s_etat_processus).instruction_courante; niveau = 1; - instruction_majuscule = conversion_majuscule(""); + instruction_majuscule = conversion_majuscule(s_etat_processus, ""); while(!(((strcmp(instruction_majuscule, "NEXT") == 0) || (strcmp(instruction_majuscule, "STEP") == 0)) && (niveau == 0))) @@ -139,7 +139,7 @@ instruction_cycle(struct_processus *s_et return; } - instruction_majuscule = conversion_majuscule( + instruction_majuscule = conversion_majuscule(s_etat_processus, (*s_etat_processus).instruction_courante); if (instruction_majuscule == NULL)