Diff for /rpl/src/instructions_r4.c between versions 1.110 and 1.114

version 1.110, 2019/02/03 14:40:52 version 1.114, 2021/03/13 12:50:46
Line 1 Line 1
 /*  /*
 ================================================================================  ================================================================================
   RPL/2 (R) version 4.1.31    RPL/2 (R) version 4.1.33
   Copyright (C) 1989-2019 Dr. BERTRAND Joël    Copyright (C) 1989-2021 Dr. BERTRAND Joël
   
   This file is part of RPL/2.    This file is part of RPL/2.
   
Line 2120  instruction_read(struct_processus *s_eta Line 2120  instruction_read(struct_processus *s_eta
                             if (sscanf(&(format_chaine[8]), "%lld", &longueur)                              if (sscanf(&(format_chaine[8]), "%lld", &longueur)
                                     != 1)                                      != 1)
                             {                              {
                                 liberation(s_etat_processus, s_objet_argument_1);                                  liberation(s_etat_processus,
                                           s_objet_argument_1);
                                 liberation(s_etat_processus, s_objet_resultat);                                  liberation(s_etat_processus, s_objet_resultat);
                                 free(format_chaine);                                  free(format_chaine);
   

Removed from v.1.110  
changed lines
  Added in v.1.114


CVSweb interface <joel.bertrand@systella.fr>