--- rpl/src/rpl.c 2017/07/04 10:28:08 1.195 +++ rpl/src/rpl.c 2017/07/12 15:42:43 1.196 @@ -129,7 +129,6 @@ rplinit(int argc, char *argv[], char *en routine_recursive = 0; nombre_thread_surveillance_processus = 0; pid_processus_pere = getpid(); - affichage_rplso = d_vrai; # ifdef DEBUG_PROC __proc = 0; @@ -4134,9 +4133,7 @@ rplinit(int argc, char *argv[], char *en return(EXIT_FAILURE); } - affichage_rplso = d_faux; instruction_use(s_etat_processus); - affichage_rplso = d_vrai; if (depilement(s_etat_processus, &((*s_etat_processus) .l_base_pile), &((*l_bibliotheque_courante) @@ -5085,73 +5082,6 @@ rplinit(int argc, char *argv[], char *en { if (setjmp(contexte_initial) == 0) { - // Libération des bibliothèques - - l_bibliotheque_courante = l_bibliotheques; - - while(l_bibliotheque_courante != NULL) - { - if (empilement(s_etat_processus, - &((*s_etat_processus).l_base_pile), - (*l_bibliotheque_courante).donnee) - == d_erreur) - { -# ifndef SEMAPHORES_NOMMES - sem_post(&((*s_etat_processus) - .semaphore_fork)); - sem_destroy(&((*s_etat_processus) - .semaphore_fork)); -# else - sem_post((*s_etat_processus) - .semaphore_fork); - sem_destroy3((*s_etat_processus) - .semaphore_fork, getpid(), - pthread_self(), SEM_FORK); -# endif - - liberation_contexte_cas( - s_etat_processus); - destruction_queue_signaux( - s_etat_processus); - -# ifdef HAVE_STACK_OVERFLOW_RECOVERY - stackoverflow_deinstall_handler(); -# endif - -# ifdef HAVE_SIGSEGV_RECOVERY - if (debug == d_faux) - { - sigsegv_deinstall_handler(); - } -# endif - - erreur = d_es_allocation_memoire; - - if ((*s_etat_processus).langue == 'F') - { - printf("+++Système : Mémoire " - "insuffisante\n"); - } - else - { - printf("+++System : Not enough " - "memory\n"); - } - - return(EXIT_FAILURE); - } - - affichage_rplso = d_faux; - instruction_remove(s_etat_processus); - affichage_rplso = d_vrai; - - l_nouvelle_bibliotheque = - (*l_bibliotheque_courante).suivant; - free(l_bibliotheque_courante); - l_bibliotheque_courante = - l_nouvelle_bibliotheque; - } - erreur = sequenceur(s_etat_processus); if (erreur == d_absence_erreur)