--- rpl/src/instructions_l3.c	2015/01/05 13:12:36	1.49
+++ rpl/src/instructions_l3.c	2015/09/18 13:41:15	1.54
@@ -1,6 +1,6 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.1.19
+  RPL/2 (R) version 4.1.23
   Copyright (C) 1989-2015 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
@@ -826,7 +826,8 @@ instruction_logscale(struct_processus *s
 
 	if ((*s_objet).type == NOM)
 	{
-		tampon = conversion_majuscule((*((struct_nom *) (*s_objet).objet)).nom);
+		tampon = conversion_majuscule(s_etat_processus,
+				(*((struct_nom *) (*s_objet).objet)).nom);
 
 		if (tampon == NULL)
 		{
@@ -907,8 +908,9 @@ instruction_logscale(struct_processus *s
 					return;
 				}
 
-				tampon = conversion_majuscule((*((struct_nom *)
-						(*(*l_element_courant).donnee).objet)).nom);
+				tampon = conversion_majuscule(s_etat_processus,
+						(*((struct_nom *) (*(*l_element_courant).donnee)
+						.objet)).nom);
 
 				if ((strcmp(tampon, "X") != 0) && (strcmp(tampon, "Y") != 0) &&
 						(strcmp(tampon, "Z") != 0))