--- rpl/src/instructions_d5.c	2010/04/27 15:53:36	1.12
+++ rpl/src/instructions_d5.c	2010/04/28 11:05:45	1.16
@@ -1522,8 +1522,8 @@ instruction_detach(struct_processus *s_e
 		(*s_etat_processus).nombre_interruptions_non_affectees = 0;
 		(*s_etat_processus).processus_detache = d_vrai;
 
-		liberation(s_etat_processus, (*s_etat_processus).on_exit);
-		(*s_etat_processus).on_exit = NULL;
+		liberation(s_etat_processus, (*s_etat_processus).at_exit);
+		(*s_etat_processus).at_exit = NULL;
 
 		for(i = 0; i < d_NOMBRE_INTERRUPTIONS; i++)
 		{
@@ -1862,6 +1862,22 @@ instruction_detach(struct_processus *s_e
 								d_ex_erreur_evaluation;
 					}
 				}
+				else
+				{
+					if (((*s_etat_processus).var_volatile_alarme == 0)
+							&& ((*s_etat_processus).arret_depuis_abort == 0)
+							&& ((*s_etat_processus).at_exit != NULL))
+					{
+						(*s_etat_processus).var_volatile_requete_arret = 0;
+
+						if (evaluation(s_etat_processus,
+								(*s_etat_processus).at_exit, 'E') == d_erreur)
+						{
+							(*s_etat_processus).erreur_execution =
+									d_ex_erreur_evaluation;
+						}
+					}
+				}
 			}
 			else
 			{
@@ -1876,19 +1892,25 @@ instruction_detach(struct_processus *s_e
 				}
 				else
 				{
-					if (evaluation(s_etat_processus,
-							(*s_etat_processus).on_exit, 'E') == d_erreur)
+					if ((*s_etat_processus).at_exit != NULL)
 					{
-						(*s_etat_processus).erreur_execution =
-								d_ex_erreur_evaluation;
+						(*s_etat_processus).var_volatile_requete_arret = 0;
+
+						if (evaluation(s_etat_processus,
+								(*s_etat_processus).at_exit, 'E') == d_erreur)
+						{
+							(*s_etat_processus).erreur_execution =
+									d_ex_erreur_evaluation;
+						}
 					}
 				}
 
 				liberation(s_etat_processus, s_copie);
-				liberation(s_etat_processus, (*s_etat_processus).on_exit);
 			}
 		}
 
+		liberation(s_etat_processus, (*s_etat_processus).at_exit);
+
 		l_element_courant = (*s_etat_processus).liste_mutexes;
 		while(l_element_courant != NULL)
 		{
@@ -2115,9 +2137,18 @@ instruction_detach(struct_processus *s_e
 				}
 				else
 				{
-					kill((*(*((struct_processus_fils *)
-							(*(*l_element_courant).donnee).objet)).thread).pid,
-							SIGFSTOP);
+					if ((*s_etat_processus).arret_depuis_abort == -1)
+					{
+						kill((*(*((struct_processus_fils *)
+								(*(*l_element_courant).donnee).objet)).thread)
+								.pid, SIGFABORT);
+					}
+					else
+					{
+						kill((*(*((struct_processus_fils *)
+								(*(*l_element_courant).donnee).objet)).thread)
+								.pid, SIGFSTOP);
+					}
 				}
 			}
 			else
@@ -2164,9 +2195,18 @@ instruction_detach(struct_processus *s_e
 					}
 					else
 					{
-						pthread_kill((*(*((struct_processus_fils *)
-								(*(*l_element_courant).donnee).objet)).thread)
-								.tid, SIGFSTOP);
+						if ((*s_etat_processus).arret_depuis_abort == -1)
+						{
+							pthread_kill((*(*((struct_processus_fils *)
+									(*(*l_element_courant).donnee).objet))
+									.thread).tid, SIGFABORT);
+						}
+						else
+						{
+							pthread_kill((*(*((struct_processus_fils *)
+									(*(*l_element_courant).donnee).objet))
+									.thread).tid, SIGFSTOP);
+						}
 					}
 				}