Question about name resolution

["Michael B." <michaelb@example.com>]

The following example does not compile because the call to "P" is ambiguous:

procedure Main is

    procedure P is
    begin
       null;
    end P;

    procedure P (I : Integer := 0) is
    begin
       null;
    end P;

begin
    P;
end Main;

What syntax is needed to call the first "P" without parameters?


Regards,

Michael