--- rpl/src/instructions_c6.c 2011/05/09 13:52:14 1.16.2.3 +++ rpl/src/instructions_c6.c 2011/06/09 14:48:36 1.19 @@ -1,6 +1,6 @@ /* ================================================================================ - RPL/2 (R) version 4.0.24 + RPL/2 (R) version 4.1.0.prerelease.0 Copyright (C) 1989-2011 Dr. BERTRAND Joël This file is part of RPL/2. @@ -38,8 +38,6 @@ void instruction_clusr(struct_processus *s_etat_processus) { - unsigned long i; - (*s_etat_processus).erreur_execution = d_ex; if ((*s_etat_processus).affichage_arguments == 'Y') @@ -72,7 +70,8 @@ instruction_clusr(struct_processus *s_et return; } } - +/* + * Utiliser la pile des variables par niveau for(i = 0; i < (*s_etat_processus).nombre_variables; i++) { if (((*s_etat_processus).s_liste_variables[i]).niveau == 1) @@ -85,6 +84,7 @@ instruction_clusr(struct_processus *s_et } } } + */ return; }