--- rpl/src/types.c	2010/09/23 15:27:42	1.22
+++ rpl/src/types.c	2010/11/09 10:47:43	1.23
@@ -3377,6 +3377,24 @@ recherche_type(struct_processus *s_etat_
 			if ((drapeau_valeur_reelle == d_faux) &&
 					(drapeau_valeur_entiere == d_faux))
 			{
+				ptr = (*s_etat_processus).instruction_courante;
+
+				while((*ptr) != d_code_fin_chaine)
+				{
+					if (isalnum((*ptr)) == 0)
+					{
+						free(s_objet);
+
+						(*s_etat_processus).erreur_execution = d_ex_syntaxe;
+						(*s_etat_processus).traitement_interruptible =
+								registre_interruption;
+
+						return;
+					}
+
+					ptr++;
+				}
+
 				(*s_objet).type = NOM;
 
 				element = malloc(sizeof(struct_nom));