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.3 required=5.0 tests=BAYES_00,INVALID_MSGID
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,f46b81d0598320d,start
X-Google-Attributes: gid103376,public
From: grave <grave@ipnsun5.in2p3.fr>
Subject: need code improvment
Date: 1998/05/18
Message-ID: <35607DFE.59B@ipnsun5.in2p3.fr>#1/1
X-Deja-AN: 354372186
Content-Transfer-Encoding: 7bit
Content-Type: text/plain; charset=us-ascii
Organization: I.P.N Orsay
Mime-Version: 1.0
Newsgroups: comp.lang.ada
Date: 1998-05-18T00:00:00+00:00
List-Id: <comp.lang.ada>


Hi all,

I'm working on a powerpc vme board and one of the solution I've found to
work with a vme address is the following :

with Ada.Unchecked_Conversion;
with System;
package try_vme is
type Vecteur1 is array(1..10) of Integer;

function Adresse_Tableau is new Ada.Unchecked_Conversion
(Integer,System.Address);

Tableau1 : Vecteur1;
for Tableau1'Address use Adresse_Tableau(16#12_2a8_000#);

-- some procedures

end try_vme;

Did someone can advice me for a better code ?
(i.e avoiding unchecked conversion)

Thanks in advance,

Xavier Grave