Re: terminate applications

[Marin David Condic <nobody@noplace.com>]

Terminating the environment task is supposed to be a legitimate method 
of killing everything, but I've had problems getting it to work with 
GNAT on a PC platform. What compiler do you use on which this works 
reliably?

MDC

Jeffrey Creem wrote:

> 
> package body Arnold is
> 
> Environment_Task_Id : Ada.Task_Identification.Task_Id :=
> Ada.Task_Identification.Current_Task;
> 
> procedure Terminator is
> 
> begin
> 
> Ada.Task_Identification.Abort_Task(Environment_Task_Id);
> 
> end Terminator;
> 
> end Arnold;
> 
> 
> 
> 


-- 
======================================================================
Marin David Condic
I work for: http://www.belcan.com/
My project is: http://www.jast.mil/

Send Replies To: m c o n d i c @ a c m . o r g

     "In general the art of government consists in taking as
     much money as possible from one class of citizens to give
     to the other."

         --  Voltaire
======================================================================