Re: how to safely convert from 32 to 16 bits?

["Robert Klungle" <bklungle@adelphia.net>]

Unless I misread the requestor, I think the following would more direct:

A : Integer_32;
B : Real_16;

B := Real_16(A);

cheers...bob

"Pascal Obry" <pascal@obry.net> wrote in message
news:uk6la101m.fsf@obry.net...
>
> di98mase@hotmail.com (Sebastian) writes:
>
> > I have a variable of Integer_32 size, I also know that the value is
> > always between -180 and 180. I would like to assign that value to a 16
> > bits Real type.
> >
> > How can that be done without loosing any data?
>
> I don't see the problem.
>
>    A : Integer_32;
>    B : Integer_16:
>
>    B := Integer_16 (A);
>
> Since A is always between -180 and 180 there will be no exception raised.
>
> Pascal.
>
> -- 
>
> --|------------------------------------------------------
> --| Pascal Obry                           Team-Ada Member
> --| 45, rue Gabriel Peri - 78114 Magny Les Hameaux FRANCE
> --|------------------------------------------------------
> --|              http://www.obry.net
> --| "The best way to travel is by means of imagination"
> --|
> --| gpg --keyserver wwwkeys.pgp.net --recv-key C1082595