--- rpl/src/instructions_o1.c	2012/02/23 15:38:29	1.46
+++ rpl/src/instructions_o1.c	2012/02/23 15:53:27	1.47
@@ -3833,6 +3833,16 @@ instruction_open(struct_processus *s_eta
 				{
 					parametre_courant = (*parametre_courant).suivant;
 				}
+
+				if (tcsetattr(fileno(descripteur), TCSANOW, &tc) != 0)
+				{
+					liberation(s_etat_processus, s_objet_argument);
+					liberation(s_etat_processus, s_objet_resultat);
+
+					(*s_etat_processus).erreur_systeme =
+							d_ex_erreur_fichier;
+					return;
+				}
 			}
 
 			strcpy((*((struct_fichier *) (*s_objet_resultat).objet)).nom, nom);