Diff for /rpl/src/evaluation.c between versions 1.20 and 1.22

version 1.20, 2010/06/24 10:10:40 version 1.22, 2010/07/13 13:01:21
Line 771  evaluation(struct_processus *s_etat_proc Line 771  evaluation(struct_processus *s_etat_proc
         registre_retour_definition = (*(*s_etat_processus).l_base_pile_systeme)          registre_retour_definition = (*(*s_etat_processus).l_base_pile_systeme)
                 .retour_definition;                  .retour_definition;
         (*(*s_etat_processus).l_base_pile_systeme).retour_definition = 'N';          (*(*s_etat_processus).l_base_pile_systeme).retour_definition = 'N';
           (*(*s_etat_processus).l_base_pile_systeme).pointeur_adresse_retour =
                   s_objet;
   
         l_element_courant = (struct_liste_chainee *) (*s_objet).objet;          l_element_courant = (struct_liste_chainee *) (*s_objet).objet;
         autorisation_empilement_programme = (*s_etat_processus)          autorisation_empilement_programme = (*s_etat_processus)
Line 1161  evaluation(struct_processus *s_etat_proc Line 1163  evaluation(struct_processus *s_etat_proc
                                             {                                              {
                                                 depilement_pile_systeme(                                                  depilement_pile_systeme(
                                                         s_etat_processus);                                                          s_etat_processus);
                                               }
   
                                                 if ((*s_etat_processus)                                              if ((*s_etat_processus)
                                                         .erreur_systeme != d_es)                                                      .erreur_systeme != d_es)
                                               {
                                                   if (presence_egalite ==
                                                           d_vrai)
                                                 {                                                  {
                                                     if (presence_egalite ==                                                      liberation(
                                                             d_vrai)                                                          s_etat_processus,
                                                     {                                                          s_objet_evalue);
                                                         liberation(  
                                                             s_etat_processus,  
                                                             s_objet_evalue);  
                                                     }  
   
                                                     (*s_etat_processus)  
                                                         .instruction_courante =  
                                                         instruction_courante;  
                                                     return(d_erreur);  
                                                 }                                                  }
   
                                                   (*s_etat_processus)
                                                       .instruction_courante =
                                                       instruction_courante;
                                                   return(d_erreur);
                                             }                                              }
                                         }                                          }
                                     }                                      }

Removed from v.1.20  
changed lines
  Added in v.1.22


CVSweb interface <joel.bertrand@systella.fr>