--- rpl/src/transliteration.c	2011/09/26 15:57:18	1.45
+++ rpl/src/transliteration.c	2012/05/18 14:09:41	1.52
@@ -1,7 +1,7 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.1.4
-  Copyright (C) 1989-2011 Dr. BERTRAND Joël
+  RPL/2 (R) version 4.1.8
+  Copyright (C) 1989-2012 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
 
@@ -675,7 +675,7 @@ transliterated_fprintf(struct_processus
 	}
 
 #	ifdef OS2
-	if ((flux == stdin) || (flux == stdout))
+	if ((flux == stderr) || (flux == stdout))
 	{
 		i = 0;
 		ptr_l = tampon2;
@@ -694,7 +694,7 @@ transliterated_fprintf(struct_processus
 				sizeof(unsigned char))) == NULL)
 		{
 			(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
-			return(NULL);
+			return(-1);
 		}
 
 		ptr_e = tampon3;