Re: comparing gnat/Ada95 and g77

[Preben Randhol <randhol+abuse@pvv.org>]

On Thu, 14 Mar 2002 10:58:06 -0000, Martin Dowie wrote:
>>          x := x*0.5 + 1.0 + sin(x)*cos(x) + sin(x) + cos(x) +
>>                             sin(x)*sin(x) + cos(x)*cos(x);
> 
> Try changing this line to:
> 
>          Sin_X := Sin(X);
>          Cos_X := Cos(X);
>          X := X*0.5 + 1.0 + Sin_X*Cos_X + Sin_X + Cos_X +
>             Sin_X*Sin_X + Cos_X*Cos_X;

After removing the IO things from the program the exection time when 
from approx 19s to approx 5s.

The fortran went from approx 15s to approx 4s.

(note the gcc backends are different)

-- 
Preben Randhol         �For me, Ada95 puts back the joy in programming.�