Re: Q: setting an address with pure?

[Brian Drummond <brian@shapes.demon.co.uk>]

On Wed, 15 Jul 2015 08:50:06 -0700, rrr.eee.27 wrote:

> On Tuesday, July 14, 2015 at 2:25:34 PM UTC+2, Brian Drummond wrote:
>> On Sat, 11 Jul 2015 14:30:14 +0100, Simon Wright wrote:
>> 
>> > Brian Drummond writes:
>> > 
>> >> Does the following work for you?
>> >>    For adc10dtc0'Address use   16#48#;
>> 
>> 
>> >    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)
>> 
>> Thank you - and Rasika Srinivasan - forthis conversation. When I get
>> back to the MSP430 version I'll retrofit this.
>> 
>> -- Brian
> 
> Brian, as far as I remember you started MSP430-Ada as a copy of AVR-Ada.

Indeed, yes! AVR-Ada was both the inspiration, and specifically, your RTS 
was the best candidate for a starting point for the MSP430 RTS. 

Though I treat it as a component, to potentially allow the substitution 
of another RTS. (I'm not sure if that's possible in AVR-Ada).

> I made the type System.Address globaly visible as a 32-bit unsigned.
> That's why the above statements work in AVR-Ada and probably in MSP-Ada
> 
> Rolf

Ah! Well if that is permitted by the LRM (and obviously, only for targets 
where it is valid) it certainly makes life easier! 

I think it's a reasonable decision, since these packages are explicitly 
not portable to any other target (where System.Address could be something 
else) anyway.

That little gem makes me glad I posted!

-- Brian