--- rpl/src/optimisation.c 2010/06/24 10:10:46 1.11 +++ rpl/src/optimisation.c 2011/06/20 17:54:21 1.23 @@ -1,7 +1,7 @@ /* ================================================================================ - RPL/2 (R) version 4.0.17 - Copyright (C) 1989-2010 Dr. BERTRAND Joël + RPL/2 (R) version 4.1.0.prerelease.1 + Copyright (C) 1989-2011 Dr. BERTRAND Joël This file is part of RPL/2. @@ -20,7 +20,7 @@ */ -#include "rpl.conv.h" +#include "rpl-conv.h" /* @@ -53,7 +53,7 @@ sequenceur_optimise(struct_processus *s_ { if ((*s_etat_processus).langue == 'F') { - printf("[%d] Optimisation\n", (int) getpid()); + printf("+++Optimisation [%d]\n", (int) getpid()); } else { @@ -72,6 +72,8 @@ sequenceur_optimise(struct_processus *s_ (*s_etat_processus).autorisation_empilement_programme = 'Y'; (*s_etat_processus).mode_execution_programme = 'N'; + BUG(1); +#if 0 for(i = 0; i < (long) (*s_etat_processus).nombre_variables; i++) { if ((*s_etat_processus).s_liste_variables[i].niveau == 0) @@ -257,6 +259,7 @@ sequenceur_optimise(struct_processus *s_ } return(erreur); +#endif } // vim: ts=4