Unrecognized attribute 'ref in GNAT

Unrecognized attribute 'ref in GNAT

[Oliver Hilgendorf]

GNAT has problems with the statement

Base_Addr : constant System.Address := System.Address'Ref
(16#A000_0000#);


It says that Ref is an unrecognized attribute. With a different
compiler it works just fine.

Oliver

Re: Unrecognized attribute 'ref in GNAT

[David C. Hoos, Sr.]

Oliver Hilgendorf wrote in message <369bb407.18423120@news.nacamar.de>...
>GNAT has problems with the statement
>
>Base_Addr : constant System.Address := System.Address'Ref
>(16#A000_0000#);
>
>
>It says that Ref is an unrecognized attribute. With a different
>compiler it works just fine.
>
The attribute 'Ref is not defined by Ada.
This looks like a VADS extension -- I've forgotten just what 'Ref means.
You'll need to consult
Appendix F for the "different" compiler, to understand what 'Ref means, and
apply the equivalent capability of Ada95.  If it's legal Ada95, GNAT will do
it.

David C. Hoos, Sr.

Re: Unrecognized attribute 'ref in GNAT

[Tucker Taft]

Oliver Hilgendorf (news@hilgendorf.de) wrote:

: GNAT has problems with the statement

: Base_Addr : constant System.Address := System.Address'Ref
: (16#A000_0000#);


: It says that Ref is an unrecognized attribute. With a different
: compiler it works just fine.

"Ref" is an implementation-defined attribute.  Ada 95 defines
a function for converting from integer to address in
the package System.Storage_Elements.  The following should
work on any Ada 95 compiler:

  Base_Addr : constant System.Address := System.Storage_Elements.To_Address
     (16#A000_0000#);

: Oliver

--
-Tucker Taft   stt@averstar.com   http://www.averstar.com/~stt/
Technical Director, Distributed IT Solutions  (www.averstar.com/tools)
AverStar (formerly Intermetrics, Inc.)   Burlington, MA  USA