--- rpl/src/compilation.c	2012/01/17 14:44:05	1.38
+++ rpl/src/compilation.c	2012/01/25 16:38:30	1.39
@@ -811,6 +811,56 @@ analyse_syntaxique(struct_processus *s_e
 
 /*
 ================================================================================
+  Procédure de d'analyse syntaxique du source pour readline
+================================================================================
+  Entrées :
+--------------------------------------------------------------------------------
+  Sorties :
+	- rl_done à 0 ou à 1.
+--------------------------------------------------------------------------------
+  Effets de bord :
+================================================================================
+*/
+
+int
+readline_analyse_syntaxique(int count, int key)
+{
+	struct_processus			s_etat_processus;
+
+	s_etat_processus.definitions_chainees = rl_line_buffer;
+	s_etat_processus.debug = d_faux;
+
+	if ((*rl_line_buffer) == d_code_fin_chaine)
+	{
+		rl_done = 1;
+	}
+	else
+	{
+		if (analyse_syntaxique(&s_etat_processus) == d_absence_erreur)
+		{
+			rl_done = 1;
+		}
+		else
+		{
+			rl_done = 0;
+			rl_mark = rl_end;
+			rl_crlf();
+			rl_expand_prompt("     > ");
+			rl_on_new_line();
+		}
+	}
+
+	if (rl_done != 0)
+	{
+		uprintf("\n");
+	}
+
+	return(0);
+}
+
+
+/*
+================================================================================
   Routine d'échange de deux variables
 ================================================================================
   Entrées :