Diff for /rpl/src/instructions_s9.c between versions 1.58 and 1.61

version 1.58, 2013/02/26 19:56:16 version 1.61, 2013/04/01 15:29:38
Line 1 Line 1
 /*  /*
 ================================================================================  ================================================================================
   RPL/2 (R) version 4.1.12    RPL/2 (R) version 4.1.14
   Copyright (C) 1989-2013 Dr. BERTRAND Joël    Copyright (C) 1989-2013 Dr. BERTRAND Joël
   
   This file is part of RPL/2.    This file is part of RPL/2.
Line 60  instruction_sort(struct_processus *s_eta Line 60  instruction_sort(struct_processus *s_eta
     struct_objet                *s_objet_registre;      struct_objet                *s_objet_registre;
     struct_objet                *s_objet_test;      struct_objet                *s_objet_test;
   
     signed long                 indice_i;      integer8                    ecartement;
     signed long                 indice_j;      integer8                    indice_i;
     signed long                 indice_k;      integer8                    indice_j;
     signed long                 indice_l;      integer8                    indice_k;
       integer8                    indice_l;
     unsigned long               ecartement;  
   
     (*s_etat_processus).erreur_execution = d_ex;      (*s_etat_processus).erreur_execution = d_ex;
   
Line 1397  instruction_swi(struct_processus *s_etat Line 1396  instruction_swi(struct_processus *s_etat
             }              }
         }          }
   
         interruption_reduite = interruption;          interruption_reduite = (int) interruption;
   
         attente.tv_sec = 0;          attente.tv_sec = 0;
         attente.tv_nsec = GRANULARITE_us * 1000;          attente.tv_nsec = GRANULARITE_us * 1000;

Removed from v.1.58  
changed lines
  Added in v.1.61


CVSweb interface <joel.bertrand@systella.fr>