--- rpl/src/analyse_notation_algebrique.c	2010/01/26 15:22:45	1.1.1.1
+++ rpl/src/analyse_notation_algebrique.c	2010/03/09 10:18:42	1.6
@@ -1,6 +1,6 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.0.9
+  RPL/2 (R) version 4.0.13
   Copyright (C) 1989-2010 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
@@ -621,7 +621,7 @@ analyse_algebrique(struct_processus *s_e
 						(*l_element_courant).suivant = (*l_base_liste);
 						(*l_base_liste) = l_element_courant;
 
-						if ((s_fonction = allocation(s_etat_processus, FCT))
+						if ((s_fonction = malloc(sizeof(struct_fonction)))
 								== NULL)
 						{
 							(*s_etat_processus).erreur_systeme =