Diff for /rpl/src/instructions_e2.c between versions 1.46 and 1.47

version 1.46, 2013/02/28 12:41:27 version 1.47, 2013/02/28 13:10:29
Line 1338  instruction_exit(struct_processus *s_eta Line 1338  instruction_exit(struct_processus *s_eta
                     {                      {
                         if ((strcmp(instruction_majuscule, "FOR") == 0) ||                          if ((strcmp(instruction_majuscule, "FOR") == 0) ||
                                 (strcmp(instruction_majuscule, "FORALL") == 0)                                  (strcmp(instruction_majuscule, "FORALL") == 0)
                                 || (strcmp(instruction_majuscule, "START")                                  || (strcmp(instruction_majuscule, "START")
                                 == 0))                                  == 0))
                         {                          {
                             niveau++;                              niveau++;
Line 1829  instruction_exit(struct_processus *s_eta Line 1829  instruction_exit(struct_processus *s_eta
     if ((drapeau_boucle_definie == d_vrai) &&      if ((drapeau_boucle_definie == d_vrai) &&
             (drapeau_presence_fin_boucle == d_vrai))              (drapeau_presence_fin_boucle == d_vrai))
     {      {
         presence_compteur = ((*(*s_etat_processus).l_base_pile_systeme)          presence_compteur = (((*(*s_etat_processus).l_base_pile_systeme)
                 .type_cloture == 'F') ? d_vrai : d_faux;                  .type_cloture == 'F') || ((*(*s_etat_processus)
                   .l_base_pile_systeme).type_cloture == 'A')) ? d_vrai : d_faux;
   
         if (((*(*s_etat_processus).l_base_pile_systeme).type_cloture != 'S')          if (((*(*s_etat_processus).l_base_pile_systeme).type_cloture != 'S')
                 && (presence_compteur == d_faux))                  && (presence_compteur == d_faux))

Removed from v.1.46  
changed lines
  Added in v.1.47


CVSweb interface <joel.bertrand@systella.fr>