--- rpl/src/instructions_w1.c	2019/02/12 14:38:43	1.117
+++ rpl/src/instructions_w1.c	2019/02/13 14:27:44	1.118
@@ -2328,29 +2328,6 @@ instruction_wflock(struct_processus *s_e
 				return;
 			}
 
-#			ifndef SEMAPHORES_NOMMES
-				if (sem_post(&((*s_etat_processus).semaphore_fork)) != 0)
-#			else
-				if (sem_post((*s_etat_processus).semaphore_fork) != 0)
-#			endif
-			{
-				(*s_etat_processus).erreur_systeme = d_es_processus;
-				return;
-			}
-
-#			ifndef SEMAPHORES_NOMMES
-				while(sem_wait(&((*s_etat_processus).semaphore_fork)) != 0)
-#			else
-				while(sem_wait((*s_etat_processus).semaphore_fork) != 0)
-#			endif
-			{
-				if (errno != EINTR)
-				{
-					(*s_etat_processus).erreur_systeme = d_es_processus;
-					return;
-				}
-			}
-
 			if (lock.l_type == F_UNLCK)
 			{
 				drapeau = d_vrai;
@@ -2386,10 +2363,34 @@ instruction_wflock(struct_processus *s_e
 							registre_instruction_valide;
 				}
 
-				nanosleep(&attente, NULL);
 				scrutation_injection(s_etat_processus);
 
+#				ifndef SEMAPHORES_NOMMES
+					if (sem_post(&((*s_etat_processus).semaphore_fork)) != 0)
+#				else
+					if (sem_post((*s_etat_processus).semaphore_fork) != 0)
+#				endif
+				{
+					(*s_etat_processus).erreur_systeme = d_es_processus;
+					return;
+				}
+
+				nanosleep(&attente, NULL);
+
 				INCR_GRANULARITE(attente.tv_nsec);
+
+#				ifndef SEMAPHORES_NOMMES
+					while(sem_wait(&((*s_etat_processus).semaphore_fork)) != 0)
+#				else
+					while(sem_wait((*s_etat_processus).semaphore_fork) != 0)
+#				endif
+				{
+					if (errno != EINTR)
+					{
+						(*s_etat_processus).erreur_systeme = d_es_processus;
+						return;
+					}
+				}
 			}
 		} while((drapeau == d_faux) && ((*s_etat_processus)
 				.var_volatile_requete_arret != -1));
@@ -3928,7 +3929,30 @@ instruction_wfswi(struct_processus *s_et
 			}
 			else
 			{
+#				ifndef SEMAPHORES_NOMMES
+					if (sem_post(&((*s_etat_processus).semaphore_fork)) != 0)
+#				else
+					if (sem_post((*s_etat_processus).semaphore_fork) != 0)
+#				endif
+				{
+					(*s_etat_processus).erreur_systeme = d_es_processus;
+					return;
+				}
 				nanosleep(&attente, NULL);
+
+#				ifndef SEMAPHORES_NOMMES
+					while(sem_wait(&((*s_etat_processus).semaphore_fork)) != 0)
+#				else
+					while(sem_wait((*s_etat_processus).semaphore_fork) != 0)
+#				endif
+				{
+					if (errno != EINTR)
+					{
+						(*s_etat_processus).erreur_systeme = d_es_processus;
+						return;
+					}
+				}
+
 				scrutation_injection(s_etat_processus);
 				INCR_GRANULARITE(attente.tv_nsec);
 			}