--- rpl/src/instructions_s1.c	2019/10/31 09:54:31	1.113
+++ rpl/src/instructions_s1.c	2022/06/09 12:40:57	1.119
@@ -1,7 +1,7 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.1.31
-  Copyright (C) 1989-2019 Dr. BERTRAND Joël
+  RPL/2 (R) version 4.1.33
+  Copyright (C) 1989-2021 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
 
@@ -19,7 +19,7 @@
 ================================================================================
 */
 
-#define DEBUG_ERREURS
+
 #include "rpl-conv.h"
 
 
@@ -3666,13 +3666,14 @@ instruction_syseval(struct_processus *s_
 						.instruction_courante;
 
 				/*
-				 * S'il y a des guillemets en début de chaîne, il y en
-				 * a aussi à la fin de la chaîne et on les ôte. Les
-				 * guillements intermédiaires sont protégés par une
+				 * S'il y a des guillemets ou une apostrophe en début de
+				 * chaîne, il y en * a aussi à la fin de la chaîne et on les
+				 * ôte. Les guillements intermédiaires sont protégés par une
 				 * séquence d'échappement qui est enlevée.
 				 */
 
-				if ((*s_etat_processus).instruction_courante[0] == '"')
+				if (((*s_etat_processus).instruction_courante[0] == '"') ||
+						((*s_etat_processus).instruction_courante[0] == '\''))
 				{
 					if (strlen((*s_etat_processus).instruction_courante) >= 2)
 					{