--- rpl/src/instructions_r4.c	2010/03/07 17:03:29	1.6
+++ rpl/src/instructions_r4.c	2010/03/08 08:34:15	1.7
@@ -1116,8 +1116,19 @@ instruction_read(struct_processus *s_eta
 					{
 						if (tampon_lecture[pointeur] == '"')
 						{
-							presence_chaine = (presence_chaine == d_vrai)
-									? d_faux : d_vrai;
+							if (pointeur > 0)
+							{
+								if (tampon_lecture[pointeur - 1] != '\\')
+								{
+									presence_chaine = (presence_chaine ==
+											d_vrai) ? d_faux : d_vrai;
+								}
+							}
+							else
+							{
+								presence_chaine = (presence_chaine == d_vrai)
+										? d_faux : d_vrai;
+							}
 						}
 						else
 						{