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

Diff for /rpl/src/rplcore.c between versions 1.48 and 1.74

version 1.48, 2013/04/08 10:06:11 version 1.74, 2020/01/10 11:15:51
Line 1 Line 1
 /*  /*
 ================================================================================  ================================================================================
   RPL/2 (R) version 4.1.14    RPL/2 (R) version 4.1.32
   Copyright (C) 1989-2013 Dr. BERTRAND Joël    Copyright (C) 1989-2020 Dr. BERTRAND Joël
   
   This file is part of RPL/2.    This file is part of RPL/2.
   
Line 145  rplcore(struct_processus *s_etat_process Line 145  rplcore(struct_processus *s_etat_process
         return;          return;
     }      }
   
     if ((*s_etat_processus).instruction_derniere_erreur != NULL)      if ((*s_etat_processus).instruction_derniere_erreur == NULL)
     {      {
         if (fprintf(fichier, "// Error :\n%s [level %lld]\n\n",          if (fprintf(fichier, "// Error :\n%s [level %lld]\n\n",
                 message_erreur, (*s_etat_processus).niveau_derniere_erreur) < 0)                  message_erreur, (*s_etat_processus).niveau_derniere_erreur) < 0)
Line 198  rplcore(struct_processus *s_etat_process Line 198  rplcore(struct_processus *s_etat_process
             (*s_etat_processus).l_base_pile_processus;              (*s_etat_processus).l_base_pile_processus;
     i = 0;      i = 0;
   
     if (pthread_mutex_trylock(&((*s_etat_processus).mutex)) == 0)      if (pthread_mutex_trylock(&((*s_etat_processus).mutex_pile_processus)) == 0)
     {      {
         while(l_element_courant != NULL)          while(l_element_courant != NULL)
         {          {
Line 206  rplcore(struct_processus *s_etat_process Line 206  rplcore(struct_processus *s_etat_process
                     (*(*l_element_courant).donnee).objet)).thread)                      (*(*l_element_courant).donnee).objet)).thread)
                     .processus_detache == d_vrai)                      .processus_detache == d_vrai)
             {              {
                 if (fprintf(fichier, "%ld: Process [%d]\n",                  if (fprintf(fichier, "%d: Process [%d]\n",
                         (int) i++, (int) (*(*((struct_processus_fils *)                          (int) i++, (int) (*(*((struct_processus_fils *)
                         (*(*l_element_courant).donnee).objet)).thread).pid) < 0)                          (*(*l_element_courant).donnee).objet)).thread).pid) < 0)
                 {                  {
Line 238  rplcore(struct_processus *s_etat_process Line 238  rplcore(struct_processus *s_etat_process
             return;              return;
         }          }
   
         pthread_mutex_unlock(&((*s_etat_processus).mutex));          pthread_mutex_unlock(&((*s_etat_processus).mutex_pile_processus));
     }      }
   
     if (test_cfsf(s_etat_processus, 31) == d_vrai)      if (test_cfsf(s_etat_processus, 31) == d_vrai)
Removed from v.1.48  
changed lines
  Added in v.1.74

CVSweb interface <joel.bertrand@systella.fr>