--- rpl/src/instructions_s6.c	2015/11/26 11:44:40	1.57
+++ rpl/src/instructions_s6.c	2022/09/07 13:40:39	1.72
@@ -1,7 +1,7 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.1.24
-  Copyright (C) 1989-2015 Dr. BERTRAND Joël
+  RPL/2 (R) version 4.1.34
+  Copyright (C) 1989-2021 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
 
@@ -509,6 +509,18 @@ instruction_sync(struct_processus *s_eta
 					d_ex_erreur_acces_fichier;
 			return;
 		}
+
+		if (fsync(fileno((*descripteur).descripteur_c)) != 0)
+		{
+			if ((errno != EROFS) && (errno != EINVAL))
+			{
+				liberation(s_etat_processus, s_objet_argument);
+
+				(*s_etat_processus).erreur_execution =
+						d_ex_erreur_acces_fichier;
+				return;
+			}
+		}
 	}
 	else
 	{