From: Samuel Tardieu <sam@ada.eu.org>
To: Paul Chardon <paul.chardon@avions.aerospatiale.fr>
Subject: Re: Define Stream Input and Output for limited types ?
Date: 1996/11/28
Date: 1996-11-28T00:00:00+00:00 [thread overview]
Message-ID: <qw6zq02gmwv.fsf@esmeralda.enst.fr> (raw)
In-Reply-To: 329DC065.1CFBAE39@avions.aerospatiale.fr
>>>>> "Paul" == Paul Chardon <paul.chardon@avions.aerospatiale.fr> writes:
Paul> Because I wonder how I can define an attribute. Unfortunately,
Paul> there is no example.
Let's make an example:
type My_Type is limited null record;
procedure My_Write (Where : access Ada.Streams.Root_Stream_Type'Class;
What : in My_Type);
for My_Type'Write use My_Write;
and so on for the Read attribute. Of course, in this case (limited
null record), My_Write would be very simple :-)
Sam
--
Samuel Tardieu -- sam@ada.eu.org
next prev parent reply other threads:[~1996-11-28 0:00 UTC|newest]
Thread overview: 3+ messages / expand[flat|nested] mbox.gz Atom feed top
1996-11-28 0:00 Define Stream Input and Output for limited types ? Paul Chardon
1996-11-28 0:00 ` Samuel Tardieu [this message]
1996-11-30 0:00 ` Robert Dewar
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox