Pascal samples. Namespaces.


program Demo;
namespace A
  procedure G;
  begin
    P;
  end;
  procedure P;
  begin
    writeln(123);
  end;
end;

namespace A
  procedure V;
  begin
    writeln('V');
  end;
end;

begin
  A.G;
  A.V;
end.


Copyright © 2006-2017 Alexander Baranovsky. All rights reserved.