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 autolearn=ham
	autolearn_force=no version=3.4.4
X-Google-Thread: 103376,90212413571e3e8b
X-Google-Attributes: gid103376,public,usenet
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news1.google.com!news1.google.com!eweka.nl!lightspeed.eweka.nl!194.134.4.77.MISMATCH!news2.euro.net!newsfeed.freenet.de!news.tu-darmstadt.de!newsfeed.velia.net!newsfeed01.sul.t-online.de!newsfeedt0.toon.t-online.de!newsmm00.sul.t-online.de!t-online.de!news.t-online.com!not-for-mail
From: Erik Baigar <erik@baigar.de>
Newsgroups: comp.lang.ada
Subject: Re: Endian-problem/bug with system.bit_ops (gnat3.15)...
Date: Sat, 15 Mar 2008 19:53:00 +0100
Organization: T-Online
Message-ID: <47DC1B0B.A4976DBB@baigar.de>
References: <47DB8194.62FE76B0@baigar.de>
 <47dbbacc$0$23854$4f793bc4@news.tdc.fi>
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
X-Trace: news.t-online.com 1205607564 00 8465 4EtEOa56Iy00Fco 080315 18:59:24
X-Complaints-To: usenet-abuse@t-online.de
X-ID: TboYi2Zaoe-28I7q9DSk6k4psO0xK3Ft+UVrgsK97n729KztPK2Gwk
X-Mailer: Mozilla 4.76C-SGI [en] (X11; I; IRIX 6.5 IP22)
X-Accept-Language: en
Xref: g2news1.google.com comp.lang.ada:20423
Date: 2008-03-15T19:53:00+01:00
List-Id: <comp.lang.ada>

Niklas Holsti wrote:
> Did you have a question to ask, or did you just want to report this
> problem and your solution?
Since the problem is solved by including all 32bits the posting is 
not really a question - maybe the posting will give someone else, 
encountering the same problem, a hint what to look out for...

> I think that your program could be made more portable by avoiding
> 'Address (and, of course, System.Bit_Ops) and using instead modular
> types (not available in Ada83) and their predefined bitwise "and"
> and "or" operations.
Do you have an estimation on performance? The current code 
is quite fast in emulating the vintage processor (more than 
3.5MIPS in the simulation) using the non portable System.Bit_Ops...

   Thanks and best regards,

       Erik.