--- rpl/src/instructions_s1.c	2011/09/20 08:56:23	1.39
+++ rpl/src/instructions_s1.c	2011/09/20 09:51:43	1.40
@@ -3894,12 +3894,15 @@ instruction_syseval(struct_processus *s_
 					while(write_atomic(s_etat_processus,
 							pipes_entree[1], "\n", 1) != 1)
 					{
-						if (sem_wait(&((*s_etat_processus)
+						while(sem_wait(&((*s_etat_processus)
 								.semaphore_fork)) != 0)
 						{
-							(*s_etat_processus).erreur_systeme =
-									d_es_processus;
-							return;
+							if (errno != EINTR)
+							{
+								(*s_etat_processus).erreur_systeme =
+										d_es_processus;
+								return;
+							}
 						}
 
 						if (longueur_ecriture == -1)
@@ -3916,10 +3919,13 @@ instruction_syseval(struct_processus *s_
 						}
 					}
 
-					if (sem_wait(&((*s_etat_processus).semaphore_fork)) != 0)
+					while(sem_wait(&((*s_etat_processus).semaphore_fork)) != 0)
 					{
-						(*s_etat_processus).erreur_systeme = d_es_processus;
-						return;
+						if (errno != EINTR)
+						{
+							(*s_etat_processus).erreur_systeme = d_es_processus;
+							return;
+						}
 					}
 
 					l_element_courant = (*l_element_courant).suivant;
@@ -3961,10 +3967,13 @@ instruction_syseval(struct_processus *s_
 					return;
 				}
 
-				if (sem_wait(&((*s_etat_processus).semaphore_fork)) != 0)
+				while(sem_wait(&((*s_etat_processus).semaphore_fork)) != 0)
 				{
-					(*s_etat_processus).erreur_systeme = d_es_processus;
-					return;
+					if (errno != EINTR)
+					{
+						(*s_etat_processus).erreur_systeme = d_es_processus;
+						return;
+					}
 				}
 			} while((!WIFEXITED(status)) && (!WIFSIGNALED(status)));
 
@@ -4017,10 +4026,13 @@ instruction_syseval(struct_processus *s_
 				}
 			}
 
-			if (sem_wait(&((*s_etat_processus).semaphore_fork)) != 0)
+			while(sem_wait(&((*s_etat_processus).semaphore_fork)) != 0)
 			{
-				(*s_etat_processus).erreur_systeme = d_es_processus;
-				return;
+				if (errno != EINTR)
+				{
+					(*s_etat_processus).erreur_systeme = d_es_processus;
+					return;
+				}
 			}
 
 			if ((tampon = realloc(tampon, (strlen(tampon) + 1) *
@@ -4179,10 +4191,13 @@ instruction_syseval(struct_processus *s_
 				&((*s_etat_processus).l_base_pile), s_objet_resultat)
 				== d_erreur)
 		{
-			if (sem_wait(&((*s_etat_processus).semaphore_fork)) != 0)
+			while(sem_wait(&((*s_etat_processus).semaphore_fork)) != 0)
 			{
-				(*s_etat_processus).erreur_systeme = d_es_processus;
-				return;
+				if (errno != EINTR)
+				{
+					(*s_etat_processus).erreur_systeme = d_es_processus;
+					return;
+				}
 			}
 
 			if (close(pipes_erreur[0]) != 0)
@@ -4195,10 +4210,13 @@ instruction_syseval(struct_processus *s_
 			return;
 		}
 
-		if (sem_wait(&((*s_etat_processus).semaphore_fork)) != 0)
+		while(sem_wait(&((*s_etat_processus).semaphore_fork)) != 0)
 		{
-			(*s_etat_processus).erreur_systeme = d_es_processus;
-			return;
+			if (errno != EINTR)
+			{
+				(*s_etat_processus).erreur_systeme = d_es_processus;
+				return;
+			}
 		}
 
 		if (close(pipes_erreur[0]) != 0)