[BACK]Return to optimisation.c CVS log [TXT] [DIR] Up to [local] / rpl / src

Diff for /rpl/src/optimisation.c between versions 1.48 and 1.49

version 1.48, 2013/02/27 17:11:45 version 1.49, 2013/03/21 11:30:31
Line 38 Line 38
 logical1  logical1
 sequenceur_optimise(struct_processus *s_etat_processus)  sequenceur_optimise(struct_processus *s_etat_processus)
 {  {
     int                         i;      integer8                    adresse_point_entree;
     int                         nb_variables;      integer8                    i;
     int                         point_entree;      integer8                    nb_variables;
       integer8                    point_entree;
   
     logical1                    erreur;      logical1                    erreur;
   
Line 51  sequenceur_optimise(struct_processus *s_ Line 52  sequenceur_optimise(struct_processus *s_
     unsigned char               *message;      unsigned char               *message;
     unsigned char               registre;      unsigned char               registre;
   
     unsigned long               adresse_point_entree;  
   
     if ((*s_etat_processus).debug == d_vrai)      if ((*s_etat_processus).debug == d_vrai)
         if (((*s_etat_processus).type_debug &          if (((*s_etat_processus).type_debug &
                 d_debug_analyse) != 0)                  d_debug_analyse) != 0)
Line 81  sequenceur_optimise(struct_processus *s_ Line 80  sequenceur_optimise(struct_processus *s_
   
     nb_variables = nombre_variables(s_etat_processus);      nb_variables = nombre_variables(s_etat_processus);
   
     if ((tableau = malloc(nb_variables * sizeof(struct_tableau_variables)))      if ((tableau = malloc(((size_t) nb_variables) *
             == NULL)              sizeof(struct_tableau_variables))) == NULL)
     {      {
         if ((*s_etat_processus).langue == 'F')          if ((*s_etat_processus).langue == 'F')
         {          {
Line 106  sequenceur_optimise(struct_processus *s_ Line 105  sequenceur_optimise(struct_processus *s_
         {          {
             // Variables qui contiennent les points d'entrée des définitions.              // Variables qui contiennent les points d'entrée des définitions.
   
             (*s_etat_processus).position_courante = (*((unsigned long *)              (*s_etat_processus).position_courante = (*((integer8 *)
                     (*(tableau[i].objet)).objet));                      (*(tableau[i].objet)).objet));
   
             if (point_entree == -1)              if (point_entree == -1)
Removed from v.1.48  
changed lines
  Added in v.1.49

CVSweb interface <joel.bertrand@systella.fr>