--- rpl/src/algebre_lineaire3.c	2017/08/04 09:14:59	1.62
+++ rpl/src/algebre_lineaire3.c	2019/02/03 14:40:27	1.67
@@ -1,7 +1,7 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.1.28
-  Copyright (C) 1989-2017 Dr. BERTRAND Joël
+  RPL/2 (R) version 4.1.31
+  Copyright (C) 1989-2019 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
 
@@ -105,7 +105,7 @@ factorisation_schur(struct_processus *s_
 			}
 
 			(*s_matrice).type = 'R';
-#			if __GNUC__ > 7
+#			if __GNUC__ >= 7
 			__attribute__ ((fallthrough));
 #			endif
 		}
@@ -463,7 +463,7 @@ factorisation_lq(struct_processus *s_eta
 			}
 
 			(*s_matrice).type = 'R';
-#			if __GNUC__ > 7
+#			if __GNUC__ >= 7
 			__attribute__ ((fallthrough));
 #			endif
 		}
@@ -672,7 +672,7 @@ factorisation_qr(struct_processus *s_eta
 			}
 
 			(*s_matrice).type = 'R';
-#			if __GNUC__ > 7
+#			if __GNUC__ >= 7
 			__attribute__ ((fallthrough));
 #			endif
 		}