--- rpl/src/instructions_c7.c 2012/12/19 09:58:24 1.43 +++ rpl/src/instructions_c7.c 2013/04/01 15:29:35 1.47 @@ -1,7 +1,7 @@ /* ================================================================================ - RPL/2 (R) version 4.1.12 - Copyright (C) 1989-2012 Dr. BERTRAND Joël + RPL/2 (R) version 4.1.14 + Copyright (C) 1989-2013 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);