Re: Terminate program in Ada95

[Robert A Duff <bobduff@world.std.com>]

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: Type: text/plain, Size: 755 bytes --]

"Atle R�stad" <aer@edh.ericsson.se> writes:

> How can I do an unconditionaly terminate of my program in Ada95?

You might want to use terminate alternatives in your tasks.
Or, you can call the operating system "exit" routine -- use pragma Import.
Or, you can abort them.
Or, you can abort the environment task, which will cause all subtasks to
also be aborted, thus killing the whole program.

To get your hands on the environment task, call Current_Task from the
env task -- that is, put something like this in a library package:

    Environment_Task: constant Task_ID := Current_Task;

You can then use Abort_Task on that.

Abortion will cause finalization actions to happen.
Calling "exit" probably will not; that's outside the language.

- Bob