Ada: fix layout of packed arrays

[James A. Morrison]

Eric Botcazou <ebotcazou@act-europe.fr> writes:

> Note that the testcase is only meant to be run on big-endian targets, it 
> produces garbage on little-endian targets because packed arrays are 
> right-justified there.
> 
> -- 
> Eric Botcazou

 Is there an easy way to do that in ADA?  Both Shift_Right(A_To_Byte(my_a), 4)
and  Shift_Right(B_To_Byte(my_b), 4) should be 3, right? 


-- 
Thanks,
Jim

http://www.student.cs.uwaterloo.ca/~ja2morri/
http://phython.blogspot.com
http://open.nit.ca/wiki/?page=jim