comp.lang.ada
 help / color / mirror / Atom feed
From: Simon Wright <simon@pushface.org>
Subject: Re: decomposing large packages
Date: Wed, 08 Jan 2020 16:45:02 +0000
Date: 2020-01-08T16:45:02+00:00	[thread overview]
Message-ID: <ly5zhl28z5.fsf@pushface.org> (raw)
In-Reply-To: dad5cd25-5eca-499c-bb24-7441eb3b3c33@googlegroups.com

mario.blunk.gplus@gmail.com writes:

> Now procedure n must be visible from inside package P. How can I
> accomplish that ? I played with child units but did not get what I
> wanted. The parent P unit must see the procedures and functions of the
> child units P.S1, P.S2, ... but the compiler complains that procedure
> n is not defined for type thing in P.

P's body can see P.S1:

   package P.S1 is
      procedure N (Value : Thing) is null; -- save typing :-)
   end P.S1;

   with P.S1;
   package body P is
      procedure M (Value : Thing) is
      begin
         S1.N (Value);
      end M;
   end P;


  parent reply	other threads:[~2020-01-08 16:45 UTC|newest]

Thread overview: 11+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2020-01-08 15:56 decomposing large packages mario.blunk.gplus
2020-01-08 16:36 ` Dmitry A. Kazakov
2020-01-09  8:25   ` mario.blunk.gplus
2020-01-09  8:58     ` Dmitry A. Kazakov
2020-01-09 18:24       ` G. B.
2020-01-10 20:03         ` mario.blunk.gplus
2020-01-08 16:45 ` Simon Wright [this message]
2020-01-09  8:28   ` mario.blunk.gplus
2020-01-09 17:43     ` Simon Wright
2020-01-10 20:00       ` mario.blunk.gplus
2020-01-08 21:41 ` Shark8
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox