comp.lang.ada
 help / color / mirror / Atom feed
From: Philip Anderson <phil.anderson@gecm.com>
Subject: Re: question about functions (bis)
Date: 2000/01/21
Date: 2000-01-21T00:00:00+00:00	[thread overview]
Message-ID: <38883285.AB6ED64C@gecm.com> (raw)
In-Reply-To: 8690s0$8tq$1@news.mgn.net

Pascal LEJEUNE wrote:
> 
> function ADD (A, B : in T) return T is
>    tmp : system.address;
> begin
>    << find the address of the result (that's my problem !!) >> and
>    put it in a local variable (tmp)
> 
>    call a procedure which use directly the hardware :
>    proc (a'address, b'address, tmp);
> end ADD;
> 
> So, the problem is quite simple : the type T is a "numerical" type
> on which it is normal to have operators ... but the hardware need
> to have the address of the arguments and the address of the result !!!


Can't you simply write:
 
function ADD (A, B : in T) return T is
   tmp : T;
begin
   -- call a procedure which directly uses the hardware :
   --
   proc (a'address, b'address, tmp'address);
   return tmp;
end ADD;


-- 
hwyl/cheers,
Philip Anderson
Alenia Marconi Systems
Cwmbr�n, Cymru/Wales




  parent reply	other threads:[~2000-01-21  0:00 UTC|newest]

Thread overview: 5+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2000-01-21  0:00 question about functions (bis) Pascal LEJEUNE
2000-01-21  0:00 ` David C. Hoos, Sr.
2000-01-21  0:00 ` Philip Anderson [this message]
2000-01-21  0:00   ` Jeff Creem
2000-01-24  0:00 ` Nick Roberts
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox