Re: Ada OOP question

[Stephen Leake <stephen.a.leake.1@gsfc.nasa.gov>]

hdhil@aol.com (HDhil) writes:

> Simple question re Ada OOP: Does Ada 95 allow
> the specification of public components? 

One solution is:

package My_Package is

    type My_Object_Private is private;

    type My_Object is record
        public_1 : foo;
        public_2 : bar;
        private_1 : My_Object_Private;
    end type;

private
    type My_Object_Private is record
        private_stuff : foo_bar;
    end record;
end My_Package;

Clients of this package can copy private_1, but can't examine inside
it. If copying is bad, use a limited private type.

-- 
-- Stephe