Diff for /rpl/src/sequenceur.c between versions 1.36 and 1.44

version 1.36, 2011/06/22 13:27:04 version 1.44, 2011/09/14 17:56:00
Line 1 Line 1
 /*  /*
 ================================================================================  ================================================================================
   RPL/2 (R) version 4.1.0.prerelease.3    RPL/2 (R) version 4.1.3
   Copyright (C) 1989-2011 Dr. BERTRAND Joël    Copyright (C) 1989-2011 Dr. BERTRAND Joël
   
   This file is part of RPL/2.    This file is part of RPL/2.
Line 63  sequenceur(struct_processus *s_etat_proc Line 63  sequenceur(struct_processus *s_etat_proc
     unsigned char               tampon_retour;      unsigned char               tampon_retour;
     unsigned char               *t_ligne;      unsigned char               *t_ligne;
   
     unsigned long               i;  
     unsigned long               j;  
     unsigned long               niveau;      unsigned long               niveau;
     unsigned long               position_courante;      unsigned long               position_courante;
   
Line 109  sequenceur(struct_processus *s_etat_proc Line 107  sequenceur(struct_processus *s_etat_proc
 --------------------------------------------------------------------------------  --------------------------------------------------------------------------------
 */  */
   
     i = 0;  
     j = 0;  
   
     do      do
     {      {
         drapeau_appel_definition = d_faux;          drapeau_appel_definition = d_faux;
Line 809  sequenceur(struct_processus *s_etat_proc Line 804  sequenceur(struct_processus *s_etat_proc
                     {                      {
                         if ((*s_etat_processus).l_base_pile == NULL)                          if ((*s_etat_processus).l_base_pile == NULL)
                         {                          {
                             (*s_etat_processus).erreur_execution =                              if ((*s_etat_processus).erreur_execution !=
                                     d_ex_manque_argument;                                      d_ex_nom_implicite)
                               {
                                   (*s_etat_processus).erreur_execution =
                                           d_ex_manque_argument;
                               }
                         }                          }
                         else if ((*(*(*s_etat_processus).l_base_pile).donnee)                          else if ((*(*(*s_etat_processus).l_base_pile).donnee)
                                 .type == NOM)                                  .type == NOM)
Line 1394  sequenceur(struct_processus *s_etat_proc Line 1393  sequenceur(struct_processus *s_etat_proc
   
         if ((*s_etat_processus).var_volatile_processus_pere == 0)          if ((*s_etat_processus).var_volatile_processus_pere == 0)
         {          {
             kill((*s_etat_processus).pid_processus_pere, SIGALRM);              envoi_signal_processus((*s_etat_processus).pid_processus_pere,
                       rpl_sigalrm);
         }          }
         else          else
         {          {

Removed from v.1.36  
changed lines
  Added in v.1.44


CVSweb interface <joel.bertrand@systella.fr>