--- rpl/src/controle.c	2010/08/06 15:32:57	1.10
+++ rpl/src/controle.c	2010/08/13 21:00:36	1.12
@@ -62,8 +62,26 @@ controle(struct_processus *s_etat_proces
 	unsigned int		i;
 	unsigned int		longueur_somme;
 
+#	ifdef OS2
+	unsigned char		*tampon;
+
+	if ((tampon = malloc((strlen(fichier) + 5) * sizeof(unsigned char)))
+			== NULL)
+	{
+		(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
+		return(d_faux);
+	}
+
+	sprintf(tampon, "%s.exe", fichier);
+	fichier = tampon;
+#	endif
+
 	if (stat(fichier, &stat_buf) != 0)
 	{
+#		ifdef OS2
+		free(fichier);
+#		endif
+
 		(*s_etat_processus).erreur_systeme = d_es_erreur_fichier;
 		return(d_faux);
 	}
@@ -72,18 +90,30 @@ controle(struct_processus *s_etat_proces
 
 	if ((chaine = malloc(taille_fichier)) == NULL)
 	{
+#		ifdef OS2
+		free(fichier);
+#		endif
+
 		(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
 		return(d_faux);
 	}
 
 	if ((in_fd = open(fichier, 0, O_RDONLY)) < 0)
 	{
+#		ifdef OS2
+		free(fichier);
+#		endif
+
 		free(chaine);
 
 		(*s_etat_processus).erreur_systeme = d_es_erreur_fichier;
 		return(d_faux);
 	}
 
+#	ifdef OS2
+	free(fichier);
+#	endif
+
   	if ((octets_lus = read(in_fd, chaine, taille_fichier)) != taille_fichier)
 	{
 #		ifndef OS2