--- rpl/src/instructions_w1.c	2020/04/06 10:14:06	1.121
+++ rpl/src/instructions_w1.c	2021/12/09 22:44:59	1.123
@@ -1,7 +1,7 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.1.32
-  Copyright (C) 1989-2020 Dr. BERTRAND Joël
+  RPL/2 (R) version 4.1.33
+  Copyright (C) 1989-2021 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
 
@@ -3102,12 +3102,10 @@ instruction_wfdata(struct_processus *s_e
 static inline logical1
 options_sockets(struct_processus *s_etat_processus, struct_socket *s_socket)
 {
-	int							drapeau;
-
 	if (((*s_socket).options & (1 << d_BROADCAST)) != 0)
 	{
-		if (setsockopt((*s_socket).socket, SOL_SOCKET, SO_BROADCAST, &drapeau,
-				sizeof(drapeau)) != 0)
+		if (setsockopt((*s_socket).socket, SOL_SOCKET, SO_BROADCAST, NULL, 0)
+				!= 0)
 		{
 			return(d_erreur);
 		}
@@ -3115,8 +3113,8 @@ options_sockets(struct_processus *s_etat
 
 	if (((*s_socket).options & (1 << d_DONT_ROUTE)) != 0)
 	{
-		if (setsockopt((*s_socket).socket, SOL_SOCKET, SO_DONTROUTE, &drapeau,
-				sizeof(drapeau)) != 0)
+		if (setsockopt((*s_socket).socket, SOL_SOCKET, SO_DONTROUTE, NULL, 0)
+				!= 0)
 		{
 			return(d_erreur);
 		}
@@ -3124,8 +3122,8 @@ options_sockets(struct_processus *s_etat
 
 	if (((*s_socket).options & (1 << d_KEEP_ALIVE)) != 0)
 	{
-		if (setsockopt((*s_socket).socket, SOL_SOCKET, SO_KEEPALIVE, &drapeau,
-				sizeof(drapeau)) != 0)
+		if (setsockopt((*s_socket).socket, SOL_SOCKET, SO_KEEPALIVE, NULL, 0)
+				!= 0)
 		{
 			return(d_erreur);
 		}