Procedure Overloading

["Justin Schaub" <none>]

Is there a way to specify which overloaded procedure is called in the
following example?

package A

type Access_Integer is access Integer;

procedure compute( Num : access Integer);
procedure compute(Num : Access_Integer);

end A;

procedure Test is
   B : Access_Integer;
begin
   compute(B);
end Test;

The GNAT compiler allows compilation of the package A, but when compiling
the procedure B it says that there is an ambiguous reference to the
overloaded compute function.

I have heard that you could simply do

compute (Access_Integer'(B));

but that didn't work either.  Any ideas?  I know it's a silly example but we
are importing the ADA GLU bindings that have a similar issue.

Justin