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,FREEMAIL_FROM
	autolearn=ham autolearn_force=no version=3.4.4
X-Google-Thread: 103376,f69eb259f3ed2afb
X-Google-Attributes: gid103376,public
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news1.google.com!postnews.google.com!z14g2000cwz.googlegroups.com!not-for-mail
From: "markp" <markwork66@yahoo.com>
Newsgroups: comp.lang.ada
Subject: Re: Using GNAT.Sockets
Date: 18 Apr 2005 07:32:14 -0700
Organization: http://groups.google.com
Message-ID: <1113834734.937407.145410@z14g2000cwz.googlegroups.com>
References: <1113404846.310840.322920@z14g2000cwz.googlegroups.com>
   <mailman.25.1113407029.24457.comp.lang.ada@ada-france.org>
   <1113555847.303640.190000@f14g2000cwb.googlegroups.com>
   <mailman.39.1113557154.24457.comp.lang.ada@ada-france.org>
   <1113814867.251847.285880@o13g2000cwo.googlegroups.com>
   <d40cdb$tsj$1@online.de>
NNTP-Posting-Host: 208.20.220.69
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"
X-Trace: posting.google.com 1113834740 23183 127.0.0.1 (18 Apr 2005 14:32:20
 GMT)
X-Complaints-To: groups-abuse@google.com
NNTP-Posting-Date: Mon, 18 Apr 2005 14:32:20 +0000 (UTC)
In-Reply-To: <d40cdb$tsj$1@online.de>
User-Agent: G2/0.2
Complaints-To: groups-abuse@google.com
Injection-Info: z14g2000cwz.googlegroups.com; posting-host=208.20.220.69;
   posting-account=_Inhcg0AAAAPC2BsuUqoGG-atarvM4_J
Xref: g2news1.google.com comp.lang.ada:10525
Date: 2005-04-18T07:32:14-07:00
List-Id: <comp.lang.ada>

Micheal,

Thanks for your input. I tried what you said but could not get it to
work. Here is what I did:

type Data_Type is array(1..800) of Byte;
Data               : Data_Type := (others => 0);
.
.
<Created socket using GNAT.Sockets>
.
.
After successful connection I did the following:

My_Stream_Access := GNAT.Sockets.Stream(Socket => Socket);

Then, I tried to read the socket as follows:

Data := Data_Type'Input(My_Stream_Access);

The data I got was incorrect. What di dI do wrong?

Thanks again for your help.

Mark