--- rpl/src/instructions_r4.c	2012/06/19 09:34:54	1.55
+++ rpl/src/instructions_r4.c	2012/06/19 09:59:34	1.56
@@ -2214,6 +2214,9 @@ printf("L=%d\n", longueur_enregistrement
 			longueur_effective = 0;
 			tampon_lecture = NULL;
 
+			attente.tv_sec = 0;
+			attente.tv_nsec = GRANULARITE_us * 1000;
+
 			do
 			{
 				presence_indicateur = d_faux;
@@ -2237,9 +2240,6 @@ printf("L=%d\n", longueur_enregistrement
 					return;
 				}
 
-				attente.tv_sec = 0;
-				attente.tv_nsec = GRANULARITE_us * 1000;
-
 				if ((*((struct_socket *) (*s_objet_argument_1).objet))
 						.domaine == PF_UNIX)
 				{
@@ -2318,6 +2318,11 @@ printf("L=%d\n", longueur_enregistrement
 					INCR_GRANULARITE(attente.tv_nsec);
 					scrutation_injection(s_etat_processus);
 				}
+				else
+				{
+					attente.tv_sec = 0;
+					attente.tv_nsec = GRANULARITE_us * 1000;
+				}
 
 				if ((*s_etat_processus).var_volatile_requete_arret == -1)
 				{