Diff for /rpl/src/instructions_r4.c between versions 1.115 and 1.117

version 1.115, 2022/09/07 13:40:38 version 1.117, 2023/08/08 08:53:40
Line 1 Line 1
 /*  /*
 ================================================================================  ================================================================================
   RPL/2 (R) version 4.1.34    RPL/2 (R) version 4.1.35
   Copyright (C) 1989-2021 Dr. BERTRAND Joël    Copyright (C) 1989-2023 Dr. BERTRAND Joël
   
   This file is part of RPL/2.    This file is part of RPL/2.
   
Line 962  instruction_read(struct_processus *s_eta Line 962  instruction_read(struct_processus *s_eta
             printf("(read a record of a file)\n\n");              printf("(read a record of a file)\n\n");
         }          }
   
         printf("    1: %s, %s\n\n", d_FCH, d_SCK);          printf("    1: %s, %s\n", d_FCH, d_SCK);
           printf("->  1: %s\n\n", d_LST);
   
         printf("    2: %s, %s\n", d_INT, d_CHN);          printf("    2: %s, %s\n", d_INT, d_CHN);
         printf("    1: %s\n", d_FCH);          printf("    1: %s\n", d_FCH);
           printf("->  1: %s\n\n", d_LST);
         return;          return;
     }      }
     else if ((*s_etat_processus).test_instruction == 'Y')      else if ((*s_etat_processus).test_instruction == 'Y')

Removed from v.1.115  
changed lines
  Added in v.1.117


CVSweb interface <joel.bertrand@systella.fr>