Diff for /rpl/src/instructions_t1.c between versions 1.11 and 1.12

version 1.11, 2010/07/13 08:59:20 version 1.12, 2010/07/13 09:39:14
Line 345  instruction_then(struct_processus *s_eta Line 345  instruction_then(struct_processus *s_eta
         return;          return;
     }      }
   
     if (((*s_objet).type == INT) ||      if (((*s_objet).type == INT) || ((*s_objet).type == REL))
             ((*s_objet).type == REL))  
     {      {
         if ((*s_objet).type == INT)          if ((*s_objet).type == INT)
         {          {
Line 369  instruction_then(struct_processus *s_eta Line 368  instruction_then(struct_processus *s_eta
   
             if (((*(*s_etat_processus).l_base_pile_systeme).clause ==              if (((*(*s_etat_processus).l_base_pile_systeme).clause ==
                     'I') || ((*(*s_etat_processus).l_base_pile_systeme).clause                      'I') || ((*(*s_etat_processus).l_base_pile_systeme).clause
                     == 'R'))                      == 'X'))
             {              {
                 (*(*s_etat_processus).l_base_pile_systeme).clause = 'T';                  (*(*s_etat_processus).l_base_pile_systeme).clause = 'T';
             }              }

Removed from v.1.11  
changed lines
  Added in v.1.12


CVSweb interface <joel.bertrand@systella.fr>