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=-0.3 required=5.0 tests=BAYES_00,
	REPLYTO_WITHOUT_TO_CC autolearn=no autolearn_force=no version=3.4.4
X-Google-Thread: 103376,9642027a78f96963
X-Google-NewGroupId: yes
X-Google-Attributes: gida07f3367d7,domainid0,public,usenet
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news2.google.com!news1.google.com!goblin1!goblin2!goblin.stu.neva.ru!newsfeed.kpn.net!pfeed09.wxs.nl!border2.nntp.ams2.giganews.com!border4.nntp.ams.giganews.com!border2.nntp.ams.giganews.com!border3.nntp.ams.giganews.com!border1.nntp.ams.giganews.com!nntp.giganews.com!local2.nntp.ams.giganews.com!nntp.bt.com!news.bt.com.POSTED!not-for-mail
NNTP-Posting-Date: Mon, 27 Dec 2010 17:25:00 -0600
From: Brian Drummond <brian_drummond@btconnect.com>
Newsgroups: comp.lang.ada
Subject: Re: Newbie-ish question about generics and Ada.Streams
Date: Mon, 27 Dec 2010 23:26:31 +0000
Reply-To: brian@shapes.demon.co.uk
Message-ID: <ie7ih6tnuec2vm6kutpvr938rhl19o9e4m@4ax.com>
References: <ohhhh6tr9nit36daakg9m0i6bgq4ug3knp@4ax.com>
 <wcc4o9zca9c.fsf@shell01.TheWorld.com>
X-Newsreader: Forte Agent 1.7/32.534
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
X-Usenet-Provider: http://www.giganews.com
X-AuthenticatedUsername: NoAuthUser
X-Trace: 
 sv3-wcCA73bq/W6DhqDkXcRPUPXCk7EbojaaDIxQamkeBDq2yix3ZNSBzcA0qRc8YH3BTUhor3VC3gTieqw!OHx1wNFdcNXdx167u6nPfcKntmGEXfIkOJbFFwdFUcI3nLU++L3tJWeNuMYJggPGTcib+vYUoomB!xQ==
X-Complaints-To: abuse@btinternet.com
X-DMCA-Complaints-To: abuse@btinternet.com
X-Abuse-and-DMCA-Info: Please be sure to forward a copy of ALL headers
X-Abuse-and-DMCA-Info: Otherwise we will be unable to process your complaint
 properly
X-Postfilter: 1.3.40
X-Original-Bytes: 2285
Xref: g2news2.google.com comp.lang.ada:17146
Date: 2010-12-27T23:26:31+00:00
List-Id: <comp.lang.ada>

On Mon, 27 Dec 2010 13:59:27 -0500, Robert A Duff <bobduff@shell01.TheWorld.com>
wrote:

>Brian Drummond <brian_drummond@btconnect.com> writes:
>
>> Comments welcome, but the specific points I am unhappy with are:
>> ...[3 things]
>
>It's reasonable to be unhappy about these things.
>There are no better workarounds than the ones
>you have already discovered.

Thanks.

>But why don't you use Shape'Image, possibly with
>a call to To_Lower?

Because that would restrict the output to file, which I wanted to control. 
(It could be an actual toy block, if the target was Lego Mindstorms!)

It would certainly work for this example though - ditto the string pointers.
This was only intended as a simple example to illustrate the issue.

The real case involves binary data, not text; and under some 
circumstances I must perform manipulations such as endian swaps. (Otherwise I
could simply use the appropriate representation for the enumeration, and allow
the default Integer'Write to take care of it.)

Thanks,

- Brian