--- rpl/src/rpl.c	2010/07/14 14:19:40	1.33
+++ rpl/src/rpl.c	2010/07/31 10:34:18	1.34
@@ -1871,6 +1871,8 @@ rplinit(int argc, char *argv[], unsigned
 			}
 
 			(*s_etat_processus).at_exit = NULL;
+			(*s_etat_processus).at_poke = NULL;
+			(*s_etat_processus).traitement_at_poke = 'N';
 
 			(*s_etat_processus).pointeurs_caracteres = NULL;
 			(*s_etat_processus).arbre_instructions = NULL;
@@ -2663,11 +2665,11 @@ rplinit(int argc, char *argv[], unsigned
 										(*s_etat_processus).at_exit, 'E');
 							}
 						}
-
-						liberation(s_etat_processus,
-								(*s_etat_processus).at_exit);
 					}
 
+					liberation(s_etat_processus, (*s_etat_processus).at_exit);
+					liberation(s_etat_processus, (*s_etat_processus).at_poke);
+
 					if ((*s_etat_processus).generateur_aleatoire != NULL)
 					{
 						liberation_generateur_aleatoire(s_etat_processus);