--- rpl/src/instructions_o1.c	2012/05/20 17:28:26	1.53
+++ rpl/src/instructions_o1.c	2012/06/21 16:07:25	1.56
@@ -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.
@@ -1031,7 +1031,7 @@ instruction_open(struct_processus *s_eta
 				"			{ \"stty\" { \"stty parameters\" ... } } } OPEN\n");
 		printf("    { \"sockettype\" { \"name\" \"local name\" } } OPEN\n");
 		printf("    { \"sockettype\" \"socketdomain\" \"protection\" } OPEN\n");
-		printf("    \"/semaphore\" OPEN\n");
+		printf("    \"/semaphore\" OPEN\n\n");
 
 		printf("    File type       : NEW/OLD/REPLACE/UNKNOWN/SCRATCH\n");
 		printf("    File access     : SEQUENTIAL/DIRECT/KEYED\n");
@@ -2731,6 +2731,14 @@ instruction_open(struct_processus *s_eta
 			l_element_courant = (*l_element_courant).suivant;
 		}
 
+		// Si aucun paramètre n'est discriminant, l'instruction ouvre
+		// par défaut un fichier.
+
+		if (type_arguments == ' ')
+		{
+			type_arguments = 'F';
+		}
+
 		if (type_arguments == 'F')
 		{
 			/*