--- rpl/src/instructions_s6.c	2015/02/19 11:01:27	1.54
+++ rpl/src/instructions_s6.c	2018/05/30 09:27:37	1.65
@@ -1,7 +1,7 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.1.21
-  Copyright (C) 1989-2015 Dr. BERTRAND Joël
+  RPL/2 (R) version 4.1.29
+  Copyright (C) 1989-2018 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
 	{