--- rpl/src/interface_cas.cpp	2013/10/05 17:48:02	1.37
+++ rpl/src/interface_cas.cpp	2017/08/03 17:17:49	1.55
@@ -1,7 +1,7 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.1.16
-  Copyright (C) 1989-2013 Dr. BERTRAND Joël
+  RPL/2 (R) version 4.1.28
+  Copyright (C) 1989-2017 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
 
@@ -28,9 +28,17 @@
 #	ifdef IPCS_SYSV
 //		NetBSD : _SEMAPHORE_H_
 #		define _SEMAPHORE_H_
+//		Linux : _SEMAPHORE_H
+#		define _SEMAPHORE_H
 #	endif
 
+#	pragma GCC diagnostic push
+#	pragma GCC diagnostic ignored "-Wstrict-aliasing"
+#	pragma GCC diagnostic ignored "-Wunused-parameter"
+#	pragma GCC diagnostic ignored "-Wempty-body"
+#	pragma GCC diagnostic ignored "-Wunknown-pragmas"
 #	include "giac.h"
+#	pragma GCC diagnostic pop
 
 #	undef PACKAGE
 #	undef PACKAGE_NAME
@@ -412,11 +420,13 @@ conversion_cas_vers_rpl(struct_processus
 ================================================================================
 */
 
+#pragma GCC diagnostic push
+#pragma GCC diagnostic ignored "-Wunused-parameter"
 void
 interface_cas(struct_processus *s_etat_processus,
 		enum t_rplcas_commandes commande)
 {
-#	ifdef RPLCAS
+#ifdef RPLCAS
 	struct_objet			*s_objet_argument_1;
 	struct_objet			*s_objet_argument_2;
 	struct_objet			*s_objet_temporaire;
@@ -696,7 +706,6 @@ interface_cas(struct_processus *s_etat_p
 	}
 
 	return;
-
 #else
 
 	if (s_etat_processus->langue == 'F')
@@ -714,5 +723,6 @@ interface_cas(struct_processus *s_etat_p
 
 #endif
 }
+#pragma GCC diagnostic pop
 
 // vim: ts=4