--- rpl/src/optimisation.c	2011/08/09 11:31:36	1.33
+++ rpl/src/optimisation.c	2011/09/20 14:36:29	1.34
@@ -72,6 +72,7 @@ sequenceur_optimise(struct_processus *s_
 
 	point_entree = -1;
 	adresse_point_entree = 0;
+	programme_principal = NULL;
 
 	empilement_pile_systeme(s_etat_processus);
 	(*(*s_etat_processus).l_base_pile_systeme).retour_definition = 'Y';