--- rpl/src/instructions_a1.c 2010/02/10 10:14:20 1.3 +++ rpl/src/instructions_a1.c 2012/01/17 14:44:06 1.33 @@ -1,7 +1,7 @@ /* ================================================================================ - RPL/2 (R) version 4.0.11 - Copyright (C) 1989-2010 Dr. BERTRAND Joël + RPL/2 (R) version 4.1.6 + Copyright (C) 1989-2012 Dr. BERTRAND Joël This file is part of RPL/2. @@ -20,7 +20,7 @@ */ -#include "rpl.conv.h" +#include "rpl-conv.h" /* @@ -73,7 +73,8 @@ instruction_abort(struct_processus *s_et } } - kill((*s_etat_processus).pid_processus_pere, SIGABORT); + envoi_signal_processus((*s_etat_processus).pid_processus_pere, + rpl_sigabort); (*s_etat_processus).requete_arret = 'Y'; attente.tv_sec = 0; @@ -81,6 +82,7 @@ instruction_abort(struct_processus *s_et while((*s_etat_processus).var_volatile_requete_arret == 0) { + scrutation_interruptions(s_etat_processus); nanosleep(&attente, NULL); INCR_GRANULARITE(attente.tv_nsec); }