Diff for /rpl/src/instructions_s1.c between versions 1.56 and 1.57

version 1.56, 2012/10/04 15:21:26 version 1.57, 2012/10/07 08:18:36
Line 3239  instruction_sto(struct_processus *s_etat Line 3239  instruction_sto(struct_processus *s_etat
                     return;                      return;
                 }                  }
   
                 if ((*s_etat_processus).autorisation_nom_implicite == 'N')                  if (((*s_etat_processus).autorisation_nom_implicite == 'N') &&
                           ((*((struct_nom *) (*s_objet_1).objet)).symbole
                           == d_faux))
                 {                  {
                     liberation(s_etat_processus, s_objet_1);                      liberation(s_etat_processus, s_objet_1);
                     liberation(s_etat_processus, s_objet_2);                      liberation(s_etat_processus, s_objet_2);
Line 3300  instruction_sto(struct_processus *s_etat Line 3302  instruction_sto(struct_processus *s_etat
         }          }
         else          else
         {          {
             if ((*s_etat_processus).autorisation_nom_implicite == 'N')              if (((*s_etat_processus).autorisation_nom_implicite == 'N') &&
                       ((*((struct_nom *) (*s_objet_1).objet)).symbole == d_faux))
             {              {
                 if ((*(*s_etat_processus).pointeur_variable_courante)                  if ((*(*s_etat_processus).pointeur_variable_courante)
                         .niveau == 1)                          .niveau == 1)
Line 3327  instruction_sto(struct_processus *s_etat Line 3330  instruction_sto(struct_processus *s_etat
          * une variable globale.           * une variable globale.
          */           */
   
         if ((*s_etat_processus).autorisation_nom_implicite == 'N')          if (((*s_etat_processus).autorisation_nom_implicite == 'N') &&
                   ((*((struct_nom *) (*s_objet_1).objet)).symbole == d_faux))
         {          {
             liberation(s_etat_processus, s_objet_1);              liberation(s_etat_processus, s_objet_1);
             liberation(s_etat_processus, s_objet_2);              liberation(s_etat_processus, s_objet_2);

Removed from v.1.56  
changed lines
  Added in v.1.57


CVSweb interface <joel.bertrand@systella.fr>