How to wait for task completion

["wiljan" <W.Derks@nl.cis.philips.com>]

Is there a simply way to wait until a task has completed in Ada?
I have a pointer to a task type:
      task type tsk;
      type ptsk is access tsk;
      p:ptsk;
At a certain point I want to clean up the resources that the task is
using but this can only be done when the task is completed.
One can do something like:
    while not p.all'terminated loop
        delay 0.01;
    end loop
Another option whould be to define an entry for the task and call that
entry. When the task terminated then the entry will raise a tasking error.

I have the idea that there must be a simpler way to accomplish this.

Wiljan