Diff for /rpl/src/instructions_r5.c between versions 1.1 and 1.8

version 1.1, 2010/01/26 15:22:44 version 1.8, 2010/04/30 15:01:14
Line 1 Line 1
 /*  /*
 ================================================================================  ================================================================================
   RPL/2 (R) version 4.0.9    RPL/2 (R) version 4.0.15
   Copyright (C) 1989-2010 Dr. BERTRAND Joël    Copyright (C) 1989-2010 Dr. BERTRAND Joël
   
   This file is part of RPL/2.    This file is part of RPL/2.
Line 816  instruction_row_plus(struct_processus *s Line 816  instruction_row_plus(struct_processus *s
             return;              return;
         }          }
   
         if (position == (integer8) (*((struct_matrice *)          if (position != ((integer8) (*((struct_matrice *)
                 (*s_objet_argument_3).objet)).nombre_lignes)                  (*s_objet_argument_3).objet)).nombre_lignes + 1))
         {          {
             for(j = i = 0; i < (*((struct_matrice *)              for(j = i = 0; i < (*((struct_matrice *)
                     (*s_objet_argument_3).objet)).nombre_lignes; i++)                      (*s_objet_argument_3).objet)).nombre_lignes; i++)

Removed from v.1.1  
changed lines
  Added in v.1.8


CVSweb interface <joel.bertrand@systella.fr>