Re: Trig Function Linking Problems

["Jeffrey R. Carter" <jrcarter@acm.org>]

AJAskey wrote:
> 
> with ada.text_io;
>   use ada.text_io;
> with ada.numerics.elementary_functions;
> procedure TRIG is
>   a,b,c,d : float;
> begin
>   a := 3.1415/4.0;
>   b := ada.numerics.elementary_functions.sin(x=>a);
>   c := ada.numerics.elementary_functions.cos(x=>a);
>   d := ada.numerics.elementary_functions.tan(x=>a);
>   put_line("sin(a)" & float'image(b));
>   put_line("cos(a)" & float'image(c));
>   put_line("tan(a)" & float'image(d));
>   put_line("a     " & float'image(a));
> end TRIG;

>>From new system with : GNATMAKE 3.2.3-13  (20030502) Copyright
> 1995-2000 Free Software Foundation, Inc.
> gcc 3.2.3
> Linux Red Hat 3.2.3-53
> 
>>> gnatmake trig
> gcc -c trig.adb
> gnatbind -x trig.ali
> gnatlink trig.ali
> 
>>> trig
> 
> raised CONSTRAINT_ERROR : s-imgrea.adb:236

s-imgrea.adb is package System.Img_Real, used to implement Float'Image. 
Maybe it's a compiler error, or maybe there's something wrong with the 
values you're getting. What happens if you use Ada.Text_IO.Float_IO? You 
should also be able to find a newer version of the compiler and try it.

-- 
Jeff Carter
"My legs are gray, my ears are gnarled, my eyes are old and bent."
Monty Python's Life of Brian
81