--- rpl/src/gestion_objets.c 2010/01/27 22:22:10 1.2 +++ rpl/src/gestion_objets.c 2010/02/26 19:22:05 1.5 @@ -1,6 +1,6 @@ /* ================================================================================ - RPL/2 (R) version 4.0.10 + RPL/2 (R) version 4.0.11 Copyright (C) 1989-2010 Dr. BERTRAND Joël This file is part of RPL/2. @@ -403,7 +403,10 @@ allocation(struct_processus *s_etat_proc } } + (*((struct_fonction *) (*s_objet).objet)).fonction = NULL; (*((struct_fonction *) (*s_objet).objet)).prediction_saut = NULL; + (*((struct_fonction *) (*s_objet).objet)).prediction_execution + = d_faux; break; } @@ -2730,6 +2733,7 @@ copie_etat_processus(struct_processus *s (*s_nouvel_etat_processus).expression_courante = NULL; (*s_nouvel_etat_processus).objet_courant = NULL; (*s_nouvel_etat_processus).processus_detache = d_faux; + (*s_nouvel_etat_processus).evaluation_forcee = 'N'; (*s_nouvel_etat_processus).nombre_objets_envoyes_non_lus = 0; (*s_nouvel_etat_processus).nombre_objets_injectes = 0;