From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00 autolearn=ham
	autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,a6ce7ddad9a820ed
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 1995-03-08 06:50:13 PST
Newsgroups: comp.lang.ada
Path: 
 bga.com!news.sprintlink.net!hookup!newshost.marcam.com!uunet!world!bobduff
From: bobduff@world.std.com (Robert A Duff)
Subject: Re: C++ to Ada95, help please
Message-ID: <D54K2z.77u@world.std.com>
Organization: The World Public Access UNIX, Brookline, MA
References: <3jjnru$e02@jerry.rb.icl.co.uk>
Date: Wed, 8 Mar 1995 13:56:58 GMT
Date: 1995-03-08T13:56:58+00:00
List-Id: <comp.lang.ada>

In article <3jjnru$e02@jerry.rb.icl.co.uk>,
Simon Johnston <skj@rb.icl.co.uk> wrote:
>First I would like to declare an Opaque type, or in C++ a 'smiley'.  There
>are two uses for such a feature. ...

I'm not sure exactly what you're asking for, but perhaps you want to do
something like this:

    package P is
        type T is private;
    private
        type Rec; -- Incomplete type, completed in body.
        type T is access Rec;
    end P;

    package body P is
        type Rec is
            record
                ...
            end record;
    end P;

- Bob