[fpc-pascal] Faster fannkuch?

[S. Fisher]

--- Florian Klaempfl <florian at freepascal.org> wrote:

> S. Fisher schrieb:
> > It seems strange that this is slower on the shootout's computer
> > when it's faster both on my slow laptop and the 3GHz computer
> > at work.
> 
> The shootout uses a P4 which behaves sometimes strange regarding
> optimization.

Well, I made another version that's faster yet, and now the site
is showing it as the fastest Pascal program.

It's about 1.5 times as slow as C.

In order for it to be even faster, I think the compiler needs to
optimize this more:

  while pi<pj do
  begin
    swap(pi^, pj^);
    inc(pi);
    dec(pj);
  end;



__________________________________________________
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection around 
http://mail.yahoo.com