Re: Imitation is the sincerest form of flattery

[Dmitry A. Kazakov <mailbox@dmitry-kazakov.de>]

On 20 Mar 2003 15:28:17 -0800, mheaney@on2.com (Matthew Heaney) wrote:

>Dmitry A. Kazakov <mailbox@dmitry-kazakov.de> wrote in message news:<p2vi7vs64p33mpnbsfsn43cvh72l44tm95@4ax.com>...
>> 
>> To inherit the type interface. For example, an array type implemented
>> by a record type:
>> 
>>    -- This is not Ada!
>>    type Unbounded_String is
>>       private array (Integer range <>) of Character;
>> 
>> private
>>    type Unbounded_String is record
>>       ...
>>    end record;
>>    -- Definition of implemented abstract array opeartions follows
>
>Can't you do this?
>
>package P is
>
>   type Unbounded_String (<>) is private;
>
>private
>
>   type Unbounded_String is
>     array (Positive range <>) of Character;
>
>end P;

This would be a private type implemented by an array, but not an array
implemented by some other type.

---
Regards,
Dmitry Kazakov
www.dmitry-kazakov.de