Re: Q: setting an address with pure?

[Simon Wright <simon@pushface.org>]

Brian Drummond <brian@shapes.demon.co.uk> writes:

> Does the following work for you? It seems to work in the MSP430 Ada 
> compiler (based on gcc4.7.2) ... has anything changed in gcc5.1 to make 
> this illegal?
>
> -- Brian
>
> with Interfaces;               use Interfaces;    
> --   make unsigned_n visible 
>
> package MSP.adc10 is
>  
>    pragma Preelaborate;
>  
>  
>    adc10dtc0              : unsigned_8;     --  ADC10 Data Transfer 
> Control 0 
>    Pragma Volatile(adc10dtc0);
>    For adc10dtc0'Address use   16#48#;
> ...
> end MSP.adc10;

   128.    PIOG : PIO with Volatile, Convention => Ada;
   129.    for PIOG'Address use 16#400E1C00#;
                                |
        >>> expected private type "System.Address"
        >>> found type universal integer

(same with GNAT GPL 2015)