From: Georg Bauhaus <bauhaus@futureapps.de>
Subject: Re: Hiding details and protected types
Date: Tue, 24 Apr 2007 23:31:12 +0200
Date: 2007-04-24T23:31:13+02:00 [thread overview]
Message-ID: <1177450272.9483.1.camel@localhost.localdomain> (raw)
In-Reply-To: <f0l1kb$568$1@cernne03.cern.ch>
On Tue, 2007-04-24 at 15:44 +0200, Maciej Sobczak wrote:
> How can I hide it?
> Some juggling with packages comes to mind - any recommendations?
For protected objects,
package PO is
procedure put(item: Integer);
function get return Integer;
private
type More_Complex_Integer is
record
odd: Boolean;
end record;
protected Orderly is
procedure put(item: Integer);
function get return Integer;
private
data: More_Complex_Integer;
end Orderly;
procedure put(item: Integer) renames Orderly.put;
function get return Integer renames Orderly.get;
end PO;
prev parent reply other threads:[~2007-04-24 21:31 UTC|newest]
Thread overview: 5+ messages / expand[flat|nested] mbox.gz Atom feed top
2007-04-24 13:44 Hiding details and protected types Maciej Sobczak
2007-04-24 15:04 ` Jean-Pierre Rosen
2007-04-24 18:18 ` Randy Brukardt
2007-04-24 19:16 ` Jeffrey R. Carter
2007-04-24 21:31 ` Georg Bauhaus [this message]
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox