[BACK]Return to instructions_g2.c CVS log [TXT] [DIR] Up to [local] / rpl / src

Diff for /rpl/src/instructions_g2.c between versions 1.38 and 1.49

version 1.38, 2012/12/13 16:59:41 version 1.49, 2014/01/26 18:21:32
Line 1 Line 1
 /*  /*
 ================================================================================  ================================================================================
   RPL/2 (R) version 4.1.11    RPL/2 (R) version 4.1.17
   Copyright (C) 1989-2012 Dr. BERTRAND Joël    Copyright (C) 1989-2014 Dr. BERTRAND Joël
   
   This file is part of RPL/2.    This file is part of RPL/2.
   
Line 48  instruction_get(struct_processus *s_etat Line 48  instruction_get(struct_processus *s_etat
     struct_objet                        *s_objet_element;      struct_objet                        *s_objet_element;
     struct_objet                        *s_objet_resultat;      struct_objet                        *s_objet_resultat;
   
     unsigned long                       indice_i;      integer8                            indice_i;
     unsigned long                       indice_j;      integer8                            indice_j;
     unsigned long                       nombre_dimensions;      integer8                            nombre_dimensions;
   
     (*s_etat_processus).erreur_execution = d_ex;      (*s_etat_processus).erreur_execution = d_ex;
   
Line 543  instruction_get(struct_processus *s_etat Line 543  instruction_get(struct_processus *s_etat
                     (*(*s_etat_processus).pointeur_variable_courante).nom,                      (*(*s_etat_processus).pointeur_variable_courante).nom,
                     (*(*s_etat_processus).pointeur_variable_courante)                      (*(*s_etat_processus).pointeur_variable_courante)
                     .variable_partagee, (*(*s_etat_processus)                      .variable_partagee, (*(*s_etat_processus)
                     .pointeur_variable_courante).origine) == d_faux)                      .pointeur_variable_courante).origine) == NULL)
             {              {
                 (*s_etat_processus).erreur_systeme = d_es;                  (*s_etat_processus).erreur_systeme = d_es;
                 (*s_etat_processus).erreur_execution =                  (*s_etat_processus).erreur_execution =
Line 1274  instruction_geti(struct_processus *s_eta Line 1274  instruction_geti(struct_processus *s_eta
     struct_objet                        *s_objet_3;      struct_objet                        *s_objet_3;
     struct_objet                        *s_objet_resultat;      struct_objet                        *s_objet_resultat;
   
     unsigned long                       indice_i;      integer8                            indice_i;
     unsigned long                       indice_j;      integer8                            indice_j;
     unsigned long                       nombre_dimensions;      integer8                            nombre_dimensions;
     unsigned long                       nombre_elements;      integer8                            nombre_elements;
   
     (*s_etat_processus).erreur_execution = d_ex;      (*s_etat_processus).erreur_execution = d_ex;
   
Line 1742  instruction_geti(struct_processus *s_eta Line 1742  instruction_geti(struct_processus *s_eta
                     (*(*s_etat_processus).pointeur_variable_courante).nom,                      (*(*s_etat_processus).pointeur_variable_courante).nom,
                     (*(*s_etat_processus).pointeur_variable_courante)                      (*(*s_etat_processus).pointeur_variable_courante)
                     .variable_partagee, (*(*s_etat_processus)                      .variable_partagee, (*(*s_etat_processus)
                     .pointeur_variable_courante).origine) == d_faux)                      .pointeur_variable_courante).origine) == NULL)
             {              {
                 (*s_etat_processus).erreur_systeme = d_es;                  (*s_etat_processus).erreur_systeme = d_es;
                 (*s_etat_processus).erreur_execution =                  (*s_etat_processus).erreur_execution =
Removed from v.1.38  
changed lines
  Added in v.1.49

CVSweb interface <joel.bertrand@systella.fr>