How can you convert.....

How can you convert.....

[Zebylon]

...an System.Adress type to an Unsigned_32?


/S

Re: How can you convert.....

[Petter Fryklund]

If it is convertiable, by

with Ada.Unchecked_Conversion;
with System;
with Interfaces;
...
...
   function "+" is new Ada.Unchecked_Conversion (Source => System.Adress,
Target =>   Interfaces.Unsigned_32);
    Adr : System.Address;
      U  : Interfaces.Unsigned_32;
begin

    ....
    .....
    U := + Adr;




Zebylon wrote in message <9pedqp$m5l$1@newstoo.ericsson.se>...
>...an System.Adress type to an Unsigned_32?
>
>
>/S
>
>

Re: How can you convert.....

[James Rogers]

Zebylon wrote:
> 
> ...an System.Adress type to an Unsigned_32?

The real question is "why do you want to do this?"

This sounds to me like trying to write C in Ada.

The package System defines comparison functions for type Address.
The package System.Storage_Elements defines arithmetic for
type Address. 

Perhaps you are trying to deal with passing pointers in C.
In that case, System.Address is more appropriate than Unsigned_32.
Unsigned_32 is a non-portable representation of an address.

Jim Rogers
Colorado Springs, Colorado USA

Re: How can you convert.....

[Stephen Leake]

"Petter Fryklund" <qsbpefr@esavionics.se> writes:

> If it is convertiable, by
> 
> with Ada.Unchecked_Conversion;
> with System;
> with Interfaces;
> ...
> ...
>    function "+" is new Ada.Unchecked_Conversion (Source => System.Adress,
> Target =>   Interfaces.Unsigned_32);
>     Adr : System.Address;
>       U  : Interfaces.Unsigned_32;
> begin
> 
>     ....
>     .....
>     U := + Adr;
> 

This will probably work, but there is a better way, which is
guarranteed by the compiler. See System.Storage_Elements.To_Integer.
This function converts an address into an appropriate integer type.

Note that on some systems, an address has less than 32 bits, and on
others, it has more.

-- 
-- Stephe

Re: How can you convert.....

[tmoran]

>See System.Storage_Elements.To_Integer.
>This function converts an address into an appropriate integer type.
>
>Note that on some systems, an address has less than 32 bits, and on
>others, it has more.
  What do compilers do on systems where addresses are multi-part,
eg a segmented address space?  Also, what rules prevent X'Address
where X is in a different partition?