Re: How to exit an Ada program with (unix shell) error code?

[sjw <simon.j.wright@mac.com>]

On May 4, 10:54 am, Martin <martin.do...@btopenworld.com> wrote:
> On May 4, 10:47 am, reinkor <rein...@gmail.com> wrote:

> > OK, using "return" ?
>
> > reinert
>
> No need for a return. But remember to ensure any tasks have completed
> too.
>
> Cheers
> -- Martin

You could say (in the main procedure)

  if Need_To_Quit then
     Set_Exit_Status (1);
     return;
  end if;