Re: Private area and child packages

[Martin Krischik <martin@krischik.com>]

danmcleran@hotmail.com wrote:

> Is there any way to do this? In C++, there is something called the
> PIMPL idiom, where you hide implementation detail by holding a pointer
> to an incomplete class, like this:

> //SecretClass.h
> 
> class Implementation;//Class not yet fully defined
> 
> class SecretClass
> {
> public:
> //publicly visible stuff
> private:
> Implementation* pImplementation;

using:

Implementation& pImplementation;

will prevent the generation of a faulty operator = () ;-). You then use:

pImplementation = *new Implementation;
delete &pImplementation ;

Looky wacky but is perfectly legal.

> };

You do it the same way in Ada as in C. Use:

type Implementation_Type;
type Implementation is access Implementation_Type;

With Regards

Martin
-- 
mailto://krischik@users.sourceforge.net
http://www.ada.krischik.com