comp.lang.ada
 help / color / mirror / Atom feed
From: pascal.malaise@gmail.com
Subject: Re: Object.Operation and child package
Date: Wed, 25 Jun 2008 22:56:33 -0700 (PDT)
Date: 2008-06-25T22:56:33-07:00	[thread overview]
Message-ID: <3742c389-5fbf-4cd9-86d8-4b1b9098d56d@e53g2000hsa.googlegroups.com> (raw)
In-Reply-To: a1f91f7f-ec2e-4e25-89c7-f069845779e0@s21g2000prm.googlegroups.com

Thank you all for the explanation.
For the record, the most appropriate solution seems to be:

package Pack.Sub is
  type Sub_Typ is new Typ with private;
  procedure Proc2 (Var : in Sub_Typ);
private
  type Sub_Typ is new Typ with null record;
end Pack.Sub;

with Pack.Sub;
procedure Proc is
  O : Pack.Sub.Sub_Typ;
begin
  O.Proc1;
  O.Proc2;
end Proc;





  reply	other threads:[~2008-06-26  5:56 UTC|newest]

Thread overview: 5+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2008-06-25 17:41 Object.Operation and child package pascal.malaise
2008-06-25 18:40 ` Ludovic Brenta
2008-06-25 19:03   ` Adam Beneschan
2008-06-26  5:56     ` pascal.malaise [this message]
2008-06-25 18:51 ` Jeffrey R. Carter
replies disabled

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