Re: [lazarus] FPC performance profile

[Al Boldi]

Graeme Geldenhuys wrote:
> > Commenting  'x: double = 0;' reduces performance 333%.
> > Any ideas what's going on?
> > And can somebody confirm this on other platforms?
>
> I tried it under Win2000 with FPC 2.0.2 and don't get any change.
> Both attempts resulted in the same answer.  Elapsed: 78

Thanks for trying that!

What switches did you use?

Can you try with this switch: "ppc386 -gl fpcBench"

And can you also try this one with no switches:

program fpcBench;

{$mode objfpc}{$H+}

{ $APPTYPE CONSOLE}

uses
  SysUtils;

procedure fn;
var
  x: double = 0;
  i: double = 9999999;
  startTime: TDateTime;

begin

  startTime := Now;

  while (i > 0) do i := i - 1;

  Writeln('Elapsed: ' + IntToStr(DateTimeToTimeStamp(Now - startTime).Time));

end;

begin
  fn;
  write;
end.

Thanks a lot!

--
Al

_________________________________________________________________
     To unsubscribe: mail [EMAIL PROTECTED] with
                "unsubscribe" as the Subject
   archives at http://www.lazarus.freepascal.org/mailarchives