comp.lang.ada
 help / color / mirror / Atom feed
From: Preben Randhol <randhol+valid_for_reply_from_news@pvv.org>
Subject: Re: function at specific address
Date: Thu, 4 Mar 2004 09:03:56 +0000 (UTC)
Date: 2004-03-04T09:03:56+00:00	[thread overview]
Message-ID: <slrnc4ds7s.ve.randhol+valid_for_reply_from_news@k-083152.nt.ntnu.no> (raw)
In-Reply-To: 4046b131_1@127.0.0.1

On 2004-03-04, pburnand0-news@yahoo.com <pburnand0-news@yahoo.com> wrote:
> There is perhaps a first simple solution :
> A so called at_clause:
>
>
> proc_address : constant Address := 16#789abcde#;
> procedure  foo( i: integer; j: integer; k: integer );
> for foo'Address use proc_address;
>
>
> procedure  foo( i: integer; j: integer; k: integer ) is
> begin
>   Text_IO.Put_Line( "Hello, world !" );
>   Text_IO.Put( "i = " );
>   Text_IO.Put( i );
>   Text_IO.Newline;
>   Text_IO.Put( "j = " );
>   Text_IO.Put( j );
>   Text_IO.Newline;
>   Text_IO.Put( "k = " );
>   Text_IO.Put( k );
>   Text_IO.Newline;
> end;
>

Are you sure this works? The code has numerous bugs.

-- 
Rox-Filer; *the* file manager => http://rox.sf.net/



      reply	other threads:[~2004-03-04  9:03 UTC|newest]

Thread overview: 5+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2004-02-25 21:59 function at specific address Szymon Guz
2004-02-26 13:59 ` Robert I. Eachus
2004-02-26 14:23 ` Frank J. Lhota
     [not found] ` <m23c8ydm5v.fsf@jvdsys.demon.nl>
2004-03-04  5:18   ` pburnand0-news
2004-03-04  9:03     ` Preben Randhol [this message]
replies disabled

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