--- rpl/src/instructions_s6.c	2017/06/21 10:20:14	1.61
+++ rpl/src/instructions_s6.c	2021/03/13 12:50:47	1.71
@@ -1,7 +1,7 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.1.26
-  Copyright (C) 1989-2017 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.
 
@@ -512,11 +512,14 @@ instruction_sync(struct_processus *s_eta
 
 		if (fsync(fileno((*descripteur).descripteur_c)) != 0)
 		{
-			liberation(s_etat_processus, s_objet_argument);
+			if ((errno != EROFS) && (errno != EINVAL))
+			{
+				liberation(s_etat_processus, s_objet_argument);
 
-			(*s_etat_processus).erreur_execution =
-					d_ex_erreur_acces_fichier;
-			return;
+				(*s_etat_processus).erreur_execution =
+						d_ex_erreur_acces_fichier;
+				return;
+			}
 		}
 	}
 	else