--- rpl/src/instructions_c4.c 2013/04/01 15:29:35 1.51 +++ rpl/src/instructions_c4.c 2016/03/23 21:51:14 1.68 @@ -1,7 +1,7 @@ /* ================================================================================ - RPL/2 (R) version 4.1.14 - Copyright (C) 1989-2013 Dr. BERTRAND Joël + RPL/2 (R) version 4.1.25 + Copyright (C) 1989-2016 Dr. BERTRAND Joël This file is part of RPL/2. @@ -471,8 +471,8 @@ instruction_convert(struct_processus *s_ (unsigned char *) (*s_objet_argument_2).objet, (unsigned char *) (*s_objet_argument_1).objet); - if (alsprintf(&executable_candidat, "%s/bin/rplconvert", - d_exec_path) < 0) + if (alsprintf(s_etat_processus, &executable_candidat, + "%s/bin/rplconvert", d_exec_path) < 0) { (*s_etat_processus).erreur_systeme = d_es_allocation_memoire; return; @@ -506,8 +506,8 @@ instruction_convert(struct_processus *s_ (unsigned char *) (*s_objet_argument_2).objet, (unsigned char *) (*s_objet_argument_1).objet); - if (alsprintf(&executable_candidat, "%s/bin/rplconvert", - (*s_etat_processus).rpl_home) < 0) + if (alsprintf(s_etat_processus, &executable_candidat, + "%s/bin/rplconvert", (*s_etat_processus).rpl_home) < 0) { (*s_etat_processus).erreur_systeme = d_es_allocation_memoire; return; @@ -549,6 +549,7 @@ instruction_convert(struct_processus *s_ (*s_etat_processus).instruction_courante; (*s_etat_processus).instruction_courante = ligne; + (*s_etat_processus).type_en_cours = NON; recherche_type(s_etat_processus); (*s_etat_processus).instruction_courante =