--- rpl/src/instructions_s1.c	2020/11/01 08:51:41	1.116
+++ rpl/src/instructions_s1.c	2020/11/04 14:16:50	1.117
@@ -3667,13 +3667,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)
 					{
@@ -3805,7 +3806,6 @@ instruction_syseval(struct_processus *s_
 			(*s_etat_processus).erreur_systeme = d_es_signal;
 			return;
 		}
-instruction_clmf(s_etat_processus);
 
 		verrouillage_threads_concurrents(s_etat_processus);