Diff for /rpl/src/types.c between versions 1.23 and 1.24

version 1.23, 2010/11/09 10:47:43 version 1.24, 2010/11/26 11:46:38
Line 75  recherche_type(struct_processus *s_etat_ Line 75  recherche_type(struct_processus *s_etat_
     unsigned char               registre_instruction_valide;      unsigned char               registre_instruction_valide;
     unsigned char               registre_interruption;      unsigned char               registre_interruption;
     unsigned char               registre_mode_execution_programme;      unsigned char               registre_mode_execution_programme;
       unsigned char               registre_recherche_type;
     unsigned char               registre_test;      unsigned char               registre_test;
     unsigned char               registre_test_bis;      unsigned char               registre_test_bis;
     unsigned char               *tampon;      unsigned char               *tampon;
Line 370  recherche_type(struct_processus *s_etat_ Line 371  recherche_type(struct_processus *s_etat_
                 }                  }
             }              }
   
               registre_recherche_type = (*s_etat_processus).recherche_type;
               (*s_etat_processus).recherche_type = 'Y';
   
             if (sequenceur(s_etat_processus) == d_erreur)              if (sequenceur(s_etat_processus) == d_erreur)
             {              {
                   (*s_etat_processus).erreur_execution = d_ex_syntaxe;
                   (*s_etat_processus).recherche_type = registre_recherche_type;
                 (*s_etat_processus).instruction_courante = tampon;                  (*s_etat_processus).instruction_courante = tampon;
                 (*s_etat_processus).mode_execution_programme =                  (*s_etat_processus).mode_execution_programme =
                         registre_mode_execution_programme;                          registre_mode_execution_programme;
Line 397  recherche_type(struct_processus *s_etat_ Line 403  recherche_type(struct_processus *s_etat_
                 return;                  return;
             }              }
   
               (*s_etat_processus).recherche_type = registre_recherche_type;
             (*s_etat_processus).instruction_courante = tampon;              (*s_etat_processus).instruction_courante = tampon;
             (*s_etat_processus).mode_execution_programme =              (*s_etat_processus).mode_execution_programme =
                     registre_mode_execution_programme;                      registre_mode_execution_programme;
Line 1162  recherche_type(struct_processus *s_etat_ Line 1169  recherche_type(struct_processus *s_etat_
                         }                          }
                     }                      }
   
                       registre_recherche_type =
                               (*s_etat_processus).recherche_type;
                       (*s_etat_processus).recherche_type = 'Y';
   
                     if (sequenceur(s_etat_processus) == d_erreur)                      if (sequenceur(s_etat_processus) == d_erreur)
                     {                      {
                           (*s_etat_processus).erreur_execution = d_ex_syntaxe;
                           (*s_etat_processus).recherche_type =
                                   registre_recherche_type;
                         (*s_etat_processus).mode_execution_programme =                          (*s_etat_processus).mode_execution_programme =
                                 registre_mode_execution_programme;                                  registre_mode_execution_programme;
                         nombre_lignes_a_supprimer =                          nombre_lignes_a_supprimer =
Line 1210  recherche_type(struct_processus *s_etat_ Line 1224  recherche_type(struct_processus *s_etat_
                         return;                          return;
                     }                      }
   
                       (*s_etat_processus).recherche_type =
                               registre_recherche_type;
                     (*s_etat_processus).mode_execution_programme =                      (*s_etat_processus).mode_execution_programme =
                             registre_mode_execution_programme;                              registre_mode_execution_programme;
   
Line 1570  recherche_type(struct_processus *s_etat_ Line 1586  recherche_type(struct_processus *s_etat_
                             return;                              return;
                         }                          }
                     }                      }
    
                       registre_recherche_type = (*s_etat_processus)
                               .recherche_type;
                       (*s_etat_processus).recherche_type = 'Y';
   
                     if (sequenceur(s_etat_processus) == d_erreur)                      if (sequenceur(s_etat_processus) == d_erreur)
                     {                      {
                           (*s_etat_processus).erreur_execution = d_ex_syntaxe;
                           (*s_etat_processus).recherche_type =
                                   registre_recherche_type;
                         (*s_etat_processus).mode_execution_programme =                          (*s_etat_processus).mode_execution_programme =
                                 registre_mode_execution_programme;                                  registre_mode_execution_programme;
                         nombre_lignes_a_supprimer =                          nombre_lignes_a_supprimer =
Line 1620  recherche_type(struct_processus *s_etat_ Line 1643  recherche_type(struct_processus *s_etat_
                         return;                          return;
                     }                      }
   
                       (*s_etat_processus).recherche_type =
                               registre_recherche_type;
                     (*s_etat_processus).mode_execution_programme =                      (*s_etat_processus).mode_execution_programme =
                             registre_mode_execution_programme;                              registre_mode_execution_programme;
   
Line 2293  recherche_type(struct_processus *s_etat_ Line 2318  recherche_type(struct_processus *s_etat_
                 }                  }
             }              }
   
               registre_recherche_type = (*s_etat_processus).recherche_type;
               (*s_etat_processus).recherche_type = 'Y';
   
             if (sequenceur(s_etat_processus) == d_erreur)              if (sequenceur(s_etat_processus) == d_erreur)
             {              {
                   (*s_etat_processus).erreur_execution = d_ex_syntaxe;
                   (*s_etat_processus).recherche_type = registre_recherche_type;
                 (*s_etat_processus).mode_execution_programme =                  (*s_etat_processus).mode_execution_programme =
                         registre_mode_execution_programme;                          registre_mode_execution_programme;
                 (*s_etat_processus).erreur_execution = d_ex_syntaxe;                  (*s_etat_processus).erreur_execution = d_ex_syntaxe;
Line 2343  recherche_type(struct_processus *s_etat_ Line 2373  recherche_type(struct_processus *s_etat_
                 return;                  return;
             }              }
   
               (*s_etat_processus).recherche_type = registre_recherche_type;
             (*s_etat_processus).mode_execution_programme =              (*s_etat_processus).mode_execution_programme =
                     registre_mode_execution_programme;                      registre_mode_execution_programme;
   
Line 2923  recherche_type(struct_processus *s_etat_ Line 2954  recherche_type(struct_processus *s_etat_
                     }                      }
                 }                  }
   
                   registre_recherche_type = (*s_etat_processus).recherche_type;
                   (*s_etat_processus).recherche_type = 'Y';
   
                 if (sequenceur(s_etat_processus) == d_erreur)                  if (sequenceur(s_etat_processus) == d_erreur)
                 {                  {
                       (*s_etat_processus).erreur_execution = d_ex_syntaxe;
                       (*s_etat_processus).recherche_type =
                               registre_recherche_type;
                     (*s_etat_processus).mode_execution_programme =                      (*s_etat_processus).mode_execution_programme =
                             registre_mode_execution_programme;                              registre_mode_execution_programme;
                     nombre_lignes_a_supprimer =                      nombre_lignes_a_supprimer =
Line 2972  recherche_type(struct_processus *s_etat_ Line 3009  recherche_type(struct_processus *s_etat_
                     return;                      return;
                 }                  }
   
                   (*s_etat_processus).recherche_type = registre_recherche_type;
                 (*s_etat_processus).mode_execution_programme =                  (*s_etat_processus).mode_execution_programme =
                         registre_mode_execution_programme;                          registre_mode_execution_programme;
   

Removed from v.1.23  
changed lines
  Added in v.1.24


CVSweb interface <joel.bertrand@systella.fr>