--- rpl/src/types.c	2012/03/30 14:13:17	1.47
+++ rpl/src/types.c	2012/04/03 07:34:14	1.48
@@ -1461,6 +1461,8 @@ recherche_type(struct_processus *s_etat_
 						}
 						else
 						{
+							liberation(s_etat_processus, s_objet_registre);
+
 							(*s_etat_processus).erreur_systeme = d_es_pile_vide;
 							(*s_etat_processus).traitement_interruptible =
 									registre_interruption;
@@ -2068,6 +2070,9 @@ recherche_type(struct_processus *s_etat_
 							}
 							else
 							{
+								liberation(s_etat_processus,
+										s_objet_registre);
+
 								(*s_etat_processus).erreur_systeme =
 										d_es_pile_vide;
 								(*s_etat_processus).traitement_interruptible =