--- rpl/src/instructions_c7.c 2012/09/15 12:57:09 1.40 +++ rpl/src/instructions_c7.c 2014/01/26 18:21:31 1.51 @@ -1,7 +1,7 @@ /* ================================================================================ - RPL/2 (R) version 4.1.10 - Copyright (C) 1989-2012 Dr. BERTRAND Joël + RPL/2 (R) version 4.1.17 + Copyright (C) 1989-2014 Dr. BERTRAND Joël This file is part of RPL/2. @@ -90,7 +90,7 @@ instruction_crmtx(struct_processus *s_et } pthread_mutexattr_init(&attributs_mutex); - pthread_mutexattr_settype(&attributs_mutex, PTHREAD_MUTEX_NORMAL); + pthread_mutexattr_settype(&attributs_mutex, PTHREAD_MUTEX_RECURSIVE); pthread_mutex_init(&((*((struct_mutex *) (*s_objet).objet)).mutex), &attributs_mutex); pthread_mutexattr_destroy(&attributs_mutex);