From: tmoran@bix.com
Subject: Re: Overlay allowability
Date: 2000/05/12
Date: 2000-05-12T00:00:00+00:00 [thread overview]
Message-ID: <PmYS4.3$_Z2.557@news.pacbell.net> (raw)
In-Reply-To: tinS4.180$av4.206806@news.pacbell.net
> My goal has been to serialize an arbitrary object (the type of which is
> provided as a generic formal parameter) into a Stream_Element_Array for
> use with the AdaSockets package.
In Claw, we have:
type Socket_Stream_Type(Socket : access Socket_Type'class)
is new Ada.Streams.Root_Stream_Type with record ...
procedure Write(Stream : in out Socket_Stream_Type;
Item : in Ada.Streams.Stream_Element_Array);
So you can declare an aliased object X of type Socket_Stream_Type.
To open, close, etc, you make calls to Open(X.Socket), etc. Once the
socket is open, "Data_Type'Write(X'access, Data);" will generate calls
to Write(X.Socket, Data Components) as needed for the components of Data.
next prev parent reply other threads:[~2000-05-12 0:00 UTC|newest]
Thread overview: 21+ messages / expand[flat|nested] mbox.gz Atom feed top
2000-05-01 0:00 Overlay allowability Marc A. Criley
2000-05-01 0:00 ` Ted Dennison
2000-05-03 0:00 ` Samuel T. Harris
2000-05-03 0:00 ` Ted Dennison
2000-05-03 0:00 ` Robert A Duff
2000-05-04 0:00 ` Robert Dewar
2000-05-08 0:00 ` Samuel T. Harris
2000-05-08 0:00 ` Robert Dewar
2000-05-09 0:00 ` Samuel T. Harris
2000-05-09 0:00 ` Ted Dennison
2000-05-10 0:00 ` Marc A. Criley
2000-05-11 0:00 ` tmoran
2000-05-12 0:00 ` tmoran [this message]
2000-05-01 0:00 ` Tucker Taft
2000-05-01 0:00 ` Keith Thompson
2000-05-08 0:00 ` Tucker Taft
2000-05-01 0:00 ` mark_biggar
2000-05-03 0:00 ` Robert I. Eachus
2000-05-01 0:00 ` tmoran
2000-05-02 0:00 ` Robert I. Eachus
2000-05-03 0:00 ` Marc A. Criley
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox