--- rpl/src/instructions_w1.c	2010/08/13 21:00:37	1.23
+++ rpl/src/instructions_w1.c	2011/03/06 16:44:14	1.32
@@ -1,7 +1,7 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.0.18
-  Copyright (C) 1989-2010 Dr. BERTRAND Joël
+  RPL/2 (R) version 4.0.21
+  Copyright (C) 1989-2011 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
 
@@ -226,8 +226,7 @@ instruction_wait(struct_processus *s_eta
 		return;
 	}
 	
-	if (((*s_objet).type == INT) ||
-			((*s_objet).type == REL))
+	if (((*s_objet).type == INT) || ((*s_objet).type == REL))
 	{
 		if ((*s_objet).type == INT)
 		{
@@ -1418,7 +1417,7 @@ instruction_write(struct_processus *s_et
 						}
 					}
 
-					if (ios == EPIPE)
+					if ((ios == EPIPE) || (ios == ECONNRESET))
 					{
 						(*s_etat_processus).erreur_execution =
 								d_ex_erreur_acces_fichier;
@@ -1482,8 +1481,9 @@ instruction_write(struct_processus *s_et
 					adresse_unix.sun_family = AF_UNIX;
 					strncpy(adresse_unix.sun_path, (*((struct_socket *)
 							(*s_objet_argument_1).objet)).adresse_distante,
-							108);
-					adresse_unix.sun_path[108 - 1] = d_code_fin_chaine;
+							UNIX_PATH_MAX);
+					adresse_unix.sun_path[UNIX_PATH_MAX - 1] =
+							d_code_fin_chaine;
 
 #					ifndef SEMAPHORES_NOMMES
 					if (sem_post(&((*s_etat_processus).semaphore_fork)) != 0)
@@ -1709,7 +1709,7 @@ instruction_write(struct_processus *s_et
 						}
 						else
 						{
-							printf("+++Attention : IPv6 support "
+							printf("+++Warning : IPv6 support "
 									"unavailable\n");
 						}
 #						endif
@@ -2918,7 +2918,7 @@ instruction_wfsock(struct_processus *s_e
 			}
 			else
 			{
-				printf("+++Attention : IPv6 support "
+				printf("+++Warning : IPv6 support "
 						"unavailable\n");
 			}
 #			endif