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

Diff for /rpl/src/instructions_d5.c between versions 1.64 and 1.65

version 1.64, 2011/09/01 12:14:56 version 1.65, 2011/09/03 10:31:50
Line 2074  instruction_detach(struct_processus *s_e Line 2074  instruction_detach(struct_processus *s_e
   
         if ((*s_etat_processus).erreur_systeme == d_es)          if ((*s_etat_processus).erreur_systeme == d_es)
         {          {
             if (variable_partagee == d_faux)              if (setjmp(contexte_processus) == 0)
             {              {
                 if (evaluation(s_etat_processus, s_objet, 'E') == d_erreur)                  if (variable_partagee == d_faux)
                 {                  {
                     if (((*s_etat_processus).erreur_execution == d_ex) &&                      if (evaluation(s_etat_processus, s_objet, 'E') == d_erreur)
                             ((*s_etat_processus).erreur_systeme == d_es))  
                     {                      {
                         (*s_etat_processus).erreur_execution =                          if (((*s_etat_processus).erreur_execution == d_ex) &&
                                 d_ex_erreur_evaluation;                                  ((*s_etat_processus).erreur_systeme == d_es))
                     }  
                 }  
                 else  
                 {  
                     if (((*s_etat_processus).var_volatile_alarme == 0)  
                             && ((*s_etat_processus).arret_depuis_abort == 0)  
                             && ((*s_etat_processus).at_exit != NULL))  
                     {  
                         (*s_etat_processus).var_volatile_requete_arret = 0;  
   
                         if (evaluation(s_etat_processus,  
                                 (*s_etat_processus).at_exit, 'E') == d_erreur)  
                         {                          {
                             (*s_etat_processus).erreur_execution =                              (*s_etat_processus).erreur_execution =
                                     d_ex_erreur_evaluation;                                      d_ex_erreur_evaluation;
                         }                          }
                     }                      }
                 }                      else
             }  
             else  
             {  
                 if (evaluation(s_etat_processus, s_copie, 'E') == d_erreur)  
                 {  
                     if (((*s_etat_processus).erreur_execution == d_ex) &&  
                             ((*s_etat_processus).erreur_systeme == d_es))  
                     {                      {
                         (*s_etat_processus).erreur_execution =                          if (((*s_etat_processus).var_volatile_alarme == 0)
                                 d_ex_erreur_evaluation;                                  && ((*s_etat_processus).arret_depuis_abort == 0)
                                   && ((*s_etat_processus).at_exit != NULL))
                           {
                               (*s_etat_processus).var_volatile_requete_arret = 0;
   
                               if (evaluation(s_etat_processus,
                                       (*s_etat_processus).at_exit, 'E') ==
                                       d_erreur)
                               {
                                   (*s_etat_processus).erreur_execution =
                                           d_ex_erreur_evaluation;
                               }
                           }
                     }                      }
                 }                  }
                 else                  else
                 {                  {
                     if ((*s_etat_processus).at_exit != NULL)                      if (evaluation(s_etat_processus, s_copie, 'E') == d_erreur)
                     {                      {
                         (*s_etat_processus).var_volatile_requete_arret = 0;                          if (((*s_etat_processus).erreur_execution == d_ex) &&
                                   ((*s_etat_processus).erreur_systeme == d_es))
                         if (evaluation(s_etat_processus,  
                                 (*s_etat_processus).at_exit, 'E') == d_erreur)  
                         {                          {
                             (*s_etat_processus).erreur_execution =                              (*s_etat_processus).erreur_execution =
                                     d_ex_erreur_evaluation;                                      d_ex_erreur_evaluation;
                         }                          }
                     }                      }
                 }                      else
                       {
                           if ((*s_etat_processus).at_exit != NULL)
                           {
                               (*s_etat_processus).var_volatile_requete_arret = 0;
   
                 liberation(s_etat_processus, s_copie);                              if (evaluation(s_etat_processus,
                                       (*s_etat_processus).at_exit, 'E') ==
                                       d_erreur)
                               {
                                   (*s_etat_processus).erreur_execution =
                                           d_ex_erreur_evaluation;
                               }
                           }
                       }
   
                       liberation(s_etat_processus, s_copie);
                   }
             }              }
         }          }
   
Removed from v.1.64  
changed lines
  Added in v.1.65

CVSweb interface <joel.bertrand@systella.fr>