Re: Style: always declare subrountines?

[sk <noname@myob.com>]

Hi, 

> ... an internal subrountine with the same specification 
> as a not yet implemented public procedure ...

The "internal subroutine" IS the implementation of the 
"public procedure". 

You will not be permitted, by the compiler to do the 
following ...

--
package XXX is

   procedure AAA;

end XXX;

package body XXX is

   procedure AAA is 
   begin
      Do_Public_Operation;
   end AAA;

   procedure AAA is 
   begin
      Do_Internal_Operation;
   end AAA;

end XXX;
--

However, the following is legal ...

--
package body XXX is 

    procedure AAA_Internal is
    begin
        null;
    end AAA_Internal;

    procedure AAA_External is
    begin
        null;
    end AAA_External;

    procedure AAA renames AAA_Internal;

end XXX;

-- 
-------------------------------------
-- Merge vertically for real address
-------------------------------------
s n p @ t . o
 k i e k c c m
-------------------------------------