--- rpl/src/instructions_r2.c	2011/04/21 16:00:58	1.20
+++ rpl/src/instructions_r2.c	2011/06/10 11:35:13	1.21
@@ -534,9 +534,8 @@ instruction_return(struct_processus *s_e
 								return;
 							}
 
-							if (((*s_etat_processus).s_liste_variables
-									[(*s_etat_processus)
-									.position_variable_courante]).objet == NULL)
+							if ((*(*s_etat_processus)
+									.pointeur_variable_courante).objet == NULL)
 							{
 								(*s_etat_processus).erreur_systeme = d_es;
 								(*s_etat_processus).erreur_execution =
@@ -545,9 +544,8 @@ instruction_return(struct_processus *s_e
 							}
 
 							(*(*s_etat_processus).l_base_pile_systeme)
-									.indice_boucle = ((*s_etat_processus)
-									.s_liste_variables[(*s_etat_processus)
-									.position_variable_courante]).objet;
+									.indice_boucle = (*(*s_etat_processus)
+									.pointeur_variable_courante).objet;
 
 							if (presence_compteur == d_vrai)
 							{
@@ -768,8 +766,7 @@ instruction_return(struct_processus *s_e
 							return;
 						}
 
-						if ((*s_etat_processus).s_liste_variables
-								[(*s_etat_processus).position_variable_courante]
+						if ((*(*s_etat_processus).pointeur_variable_courante)
 								.objet == NULL)
 						{
 							(*s_etat_processus).erreur_systeme = d_es;
@@ -779,9 +776,8 @@ instruction_return(struct_processus *s_e
 						}
 
 						(*(*s_etat_processus).l_base_pile_systeme)
-								.indice_boucle = ((*s_etat_processus)
-								.s_liste_variables[(*s_etat_processus)
-								.position_variable_courante]).objet;
+								.indice_boucle = (*(*s_etat_processus)
+								.pointeur_variable_courante).objet;
 
 						if (presence_compteur == d_vrai)
 						{
@@ -940,8 +936,8 @@ instruction_rdm(struct_processus *s_etat
 
 		liberation(s_etat_processus, s_objet_initial);
 
-		if ((*s_etat_processus).s_liste_variables[(*s_etat_processus)
-				.position_variable_courante].variable_verrouillee == d_vrai)
+		if ((*(*s_etat_processus).pointeur_variable_courante)
+				.variable_verrouillee == d_vrai)
 		{
 			(*s_etat_processus).erreur_execution = d_ex_variable_verrouillee;
 
@@ -949,8 +945,8 @@ instruction_rdm(struct_processus *s_etat
 			return;
 		}
 
-		s_objet_initial = (*s_etat_processus).s_liste_variables
-				[(*s_etat_processus).position_variable_courante].objet;
+		s_objet_initial = (*(*s_etat_processus).pointeur_variable_courante)
+				.objet;
 
 		if (s_objet_initial == NULL)
 		{
@@ -962,12 +958,10 @@ instruction_rdm(struct_processus *s_etat
 			}
 
 			if (recherche_variable_partagee(s_etat_processus,
-					(*s_etat_processus).s_liste_variables
-					[(*s_etat_processus).position_variable_courante].nom,
-					(*s_etat_processus).s_liste_variables
-					[(*s_etat_processus).position_variable_courante]
-					.variable_partagee, (*s_etat_processus).s_liste_variables
-					[(*s_etat_processus).position_variable_courante].origine)
+					(*(*s_etat_processus).pointeur_variable_courante).nom,
+					(*(*s_etat_processus).pointeur_variable_courante)
+					.variable_partagee, (*(*s_etat_processus)
+					.pointeur_variable_courante).origine)
 					== d_faux)
 			{
 				if (pthread_mutex_unlock(&((*(*s_etat_processus)
@@ -2212,8 +2206,7 @@ instruction_rdm(struct_processus *s_etat
 		}
 		else
 		{
-			(*s_etat_processus).s_liste_variables
-					[(*s_etat_processus).position_variable_courante].objet =
+			(*(*s_etat_processus).pointeur_variable_courante).objet =
 					s_objet_redimensionne;
 		}
 	}