Diff for /rpl/src/gestion_objets.c between versions 1.97 and 1.102

version 1.97, 2013/03/20 17:11:43 version 1.102, 2013/05/22 13:40:40
Line 1 Line 1
 /*  /*
 ================================================================================  ================================================================================
   RPL/2 (R) version 4.1.13    RPL/2 (R) version 4.1.14
   Copyright (C) 1989-2013 Dr. BERTRAND Joël    Copyright (C) 1989-2013 Dr. BERTRAND Joël
   
   This file is part of RPL/2.    This file is part of RPL/2.
Line 859  liberation(struct_processus *s_etat_proc Line 859  liberation(struct_processus *s_etat_proc
             }              }
             else              else
             {              {
                 free((unsigned long *) ((*s_objet).objet));                  free((*s_objet).objet);
             }              }
   
             break;              break;
Line 1394  liberation(struct_processus *s_etat_proc Line 1394  liberation(struct_processus *s_etat_proc
                             .nombre_occurrences <= 1,                              .nombre_occurrences <= 1,
                             pthread_mutex_unlock(&((*s_objet).mutex)),                              pthread_mutex_unlock(&((*s_objet).mutex)),
                             printf("(*((*((struct_tableau *) (*s_objet).objet))"                              printf("(*((*((struct_tableau *) (*s_objet).objet))"
                             ".element[%lu])).nombre_occurrences=%ld\n", i,                              ".element[%lld])).nombre_occurrences=%ld\n", i,
                             (*((*((struct_tableau *) (*s_objet).objet))                              (*((*((struct_tableau *) (*s_objet).objet))
                             .elements[i])).nombre_occurrences));                              .elements[i])).nombre_occurrences));
                     liberation(s_etat_processus, (*((struct_tableau *)                      liberation(s_etat_processus, (*((struct_tableau *)
Line 1641  copie_objet(struct_processus *s_etat_pro Line 1641  copie_objet(struct_processus *s_etat_pro
                 return(NULL);                  return(NULL);
             }              }
   
             (*((unsigned long *) ((*s_nouvel_objet).objet))) =              (*((integer8 *) ((*s_nouvel_objet).objet))) =
                     (*((unsigned long *) ((*s_objet).objet)));                      (*((integer8 *) ((*s_objet).objet)));
             break;              break;
         }          }
   
Line 2863  copie_etat_processus(struct_processus *s Line 2863  copie_etat_processus(struct_processus *s
      * n'ont aucune raison de changer.       * n'ont aucune raison de changer.
      */       */
   
     pthread_mutexattr_init(&attributs_mutex);  
     pthread_mutexattr_settype(&attributs_mutex, PTHREAD_MUTEX_NORMAL);  
     (*s_nouvel_etat_processus).sections_critiques = 0;      (*s_nouvel_etat_processus).sections_critiques = 0;
       (*s_nouvel_etat_processus).initialisation_scheduler = d_faux;
   
     // Les sémaphores sont initialisés dans le nouveau thread. Il      // Les sémaphores sont initialisés dans le nouveau thread. Il
     // s'agit d'une limitation de l'implantation de l'émulation      // s'agit d'une limitation de l'implantation de l'émulation

Removed from v.1.97  
changed lines
  Added in v.1.102


CVSweb interface <joel.bertrand@systella.fr>