--- rpl/src/types.c	2012/08/22 10:47:19	1.51
+++ rpl/src/types.c	2013/02/27 17:11:46	1.57
@@ -1,7 +1,7 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.1.10
-  Copyright (C) 1989-2012 Dr. BERTRAND Joël
+  RPL/2 (R) version 4.1.13
+  Copyright (C) 1989-2013 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
 
@@ -2222,13 +2222,32 @@ recherche_type(struct_processus *s_etat_
 				if ((*s_etat_processus).definitions_chainees
 						[(*s_etat_processus).position_courante] == '"')
 				{
-					if (drapeau_chaine == d_faux)
+					if ((*s_etat_processus).position_courante > 0)
 					{
-						drapeau_chaine = d_vrai;
+						if ((*s_etat_processus).definitions_chainees
+								[(*s_etat_processus).position_courante - 1]
+								!= '\\')
+						{
+							if (drapeau_chaine == d_faux)
+							{
+								drapeau_chaine = d_vrai;
+							}
+							else
+							{
+								drapeau_chaine = d_faux;
+							}
+						}
 					}
-					else
+					else 
 					{
-						drapeau_chaine = d_faux;
+						if (drapeau_chaine == d_faux)
+						{
+							drapeau_chaine = d_vrai;
+						}
+						else
+						{
+							drapeau_chaine = d_faux;
+						}
 					}
 				}
 				else if (drapeau_chaine == d_faux)