Diff for /rpl/src/evaluation.c between versions 1.8 and 1.9

version 1.8, 2010/03/09 10:18:43 version 1.9, 2010/04/07 13:33:22
Line 143  evaluation(struct_processus *s_etat_proc Line 143  evaluation(struct_processus *s_etat_proc
             if (recherche_variable(s_etat_processus, (*((struct_nom *)              if (recherche_variable(s_etat_processus, (*((struct_nom *)
                     (*s_objet_tampon).objet)).nom) == d_faux)                      (*s_objet_tampon).objet)).nom) == d_faux)
             {              {
                   if ((*s_etat_processus).autorisation_nom_implicite == 'N')
                   {
                       if ((*((struct_nom *) (*s_objet_tampon).objet)).symbole ==
                               d_faux)
                       {
                           (*s_etat_processus).erreur_execution =
                                   d_ex_manque_argument;
                           return(d_erreur);
                       }
                   }
   
                 (*s_etat_processus).erreur_systeme = d_es;                  (*s_etat_processus).erreur_systeme = d_es;
                 presence_variable = d_faux;                  presence_variable = d_faux;
             }              }
Line 4381  evaluation(struct_processus *s_etat_proc Line 4392  evaluation(struct_processus *s_etat_proc
                     if (recherche_variable(s_etat_processus, (*((struct_nom *)                      if (recherche_variable(s_etat_processus, (*((struct_nom *)
                             (*s_objet_elementaire).objet)).nom) == d_faux)                              (*s_objet_elementaire).objet)).nom) == d_faux)
                     {                      {
                           if ((*s_etat_processus).autorisation_nom_implicite
                                   == 'N')
                           {
                               if ((*((struct_nom *) (*s_objet_elementaire).objet))
                                       .symbole == d_faux)
                               {
                                   (*s_etat_processus).erreur_systeme =
                                           d_es_nom_implicite;
                                   return(d_erreur);
                               }
                           }
   
                         (*s_etat_processus).erreur_systeme = d_es;                          (*s_etat_processus).erreur_systeme = d_es;
                         presence_variable = d_faux;                          presence_variable = d_faux;
                     }                      }

Removed from v.1.8  
changed lines
  Added in v.1.9


CVSweb interface <joel.bertrand@systella.fr>