--- rpl/src/controle.c	2010/03/09 10:18:43	1.3
+++ rpl/src/controle.c	2010/08/06 15:26:44	1.9
@@ -1,6 +1,6 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.0.13
+  RPL/2 (R) version 4.0.18
   Copyright (C) 1989-2010 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
@@ -20,7 +20,7 @@
 */
 
 
-#include "rpl.conv.h"
+#include "rpl-conv.h"
 
 
 /*
@@ -86,11 +86,13 @@ controle(struct_processus *s_etat_proces
 
   	if ((octets_lus = read(in_fd, chaine, taille_fichier)) != taille_fichier)
 	{
+#		ifndef OS2
 		close(in_fd);
 		free(chaine);
 
 		(*s_etat_processus).erreur_systeme = d_es_erreur_fichier;
 		return(d_faux);
+#		endif
 	}
 
 	close(in_fd);