--- rpl/src/analyse.c 2013/05/23 12:45:08 1.87 +++ rpl/src/analyse.c 2013/12/03 09:36:10 1.92 @@ -1,6 +1,6 @@ /* ================================================================================ - RPL/2 (R) version 4.1.14 + RPL/2 (R) version 4.1.17 Copyright (C) 1989-2013 Dr. BERTRAND Joël This file is part of RPL/2. @@ -513,6 +513,8 @@ initialisation_instructions(struct_proce INSTRUCTION("RECV", instruction_recv); INSTRUCTION("REGV", instruction_regv); INSTRUCTION("REPL", instruction_repl); + INSTRUCTION("RGDL", instruction_rgdl); + INSTRUCTION("RGDR", instruction_rgdr); INSTRUCTION("RNRM", instruction_rnrm); INSTRUCTION("ROLL", instruction_roll); //INSTRUCTION("ROOT") @@ -1159,7 +1161,8 @@ analyse(struct_processus *s_etat_process { if ((*s_etat_processus).test_instruction == 'N') { - if (pthread_mutex_lock(&(*s_etat_processus).mutex) != 0) + if (pthread_mutex_lock(&(*s_etat_processus).mutex_interruptions) + != 0) { (*s_etat_processus).erreur_systeme = d_es_processus; } @@ -1170,7 +1173,11 @@ analyse(struct_processus *s_etat_process affectation_interruptions_logicielles(s_etat_processus); } - pthread_mutex_unlock(&(*s_etat_processus).mutex); + if (pthread_mutex_unlock(&(*s_etat_processus) + .mutex_interruptions) != 0) + { + (*s_etat_processus).erreur_systeme = d_es_processus; + } } if (((*s_etat_processus).nombre_interruptions_en_queue != 0) &&