--- rpl/src/instructions_w1.c	2012/04/13 14:13:01	1.60
+++ rpl/src/instructions_w1.c	2012/06/21 16:07:25	1.63
@@ -1,6 +1,6 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.1.8
+  RPL/2 (R) version 4.1.9
   Copyright (C) 1989-2012 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
@@ -428,6 +428,7 @@ instruction_write(struct_processus *s_et
 	unsigned char						*chaine_utf8;
 	unsigned char						*clef_utf8;
 	unsigned char						*commande;
+	unsigned char						retour;
 
 	unsigned long						i;
 
@@ -1378,6 +1379,19 @@ instruction_write(struct_processus *s_et
 				}
 
 				free(chaine);
+
+				// Le fichier de type FLOW est à accès séquentiel. Il
+				// convient d'ajouter un retour à la ligne pour l'opération
+				// de lecture.
+
+				retour = d_code_retour_chariot;
+
+				if (fwrite(&retour, sizeof(unsigned char), 1,
+						(*descripteur).descripteur_c) != 1)
+				{
+					(*s_etat_processus).erreur_systeme = d_es_erreur_fichier;
+					return;
+				}
 			}
 			else
 			{