5 lines
142 B
Ada
5 lines
142 B
Ada
|
package body P is
|
||
|
|
-- The implementation of P, invisible to anybody
|
||
|
|
procedure W (X : in out T); -- Operation used only internally
|
||
|
|
end P;
|