Diff for /rpl/src/instructions_x1.c between versions 1.40 and 1.41

version 1.40, 2013/02/27 17:11:44 version 1.41, 2013/03/21 11:30:30
Line 47  instruction_xor(struct_processus *s_etat Line 47  instruction_xor(struct_processus *s_etat
     struct_objet                *s_objet_argument_2;      struct_objet                *s_objet_argument_2;
     struct_objet                *s_objet_resultat;      struct_objet                *s_objet_resultat;
   
     unsigned long               nombre_elements;      integer8                    nombre_elements;
   
     (*s_etat_processus).erreur_execution = d_ex;      (*s_etat_processus).erreur_execution = d_ex;
   
Line 790  instruction_xpon(struct_processus *s_eta Line 790  instruction_xpon(struct_processus *s_eta
         }          }
   
         (*((integer8 *) (*s_objet_resultat).objet)) = (integer8)          (*((integer8 *) (*s_objet_resultat).objet)) = (integer8)
                 floor(log10((*((integer8 *) (*s_objet_argument).objet))));                  floor(log10((real8) (*((integer8 *)
                   (*s_objet_argument).objet))));
     }      }
   
 /*  /*

Removed from v.1.40  
changed lines
  Added in v.1.41


CVSweb interface <joel.bertrand@systella.fr>