[fpc-pascal] FPC now 3rd in shootout

[Florian Klaempfl]

Peter Vreman schrieb:
>>>>> I submitted this regex-dna program on 2007-10-31.  It's still in limbo:
>>>>> neither accepted nor rejected.
>>>> Thanks, I've added it to the fpc repository so the source will not be
>>> lost
>>>
>>> For me the code didn't finish in a reasonable time. It spend too much time
>>> in moving ansistrings
>>> around. I have update the program to use a pchar instead of an ansistring
>>> so it finishes within
>>> reasonable time. The updated source can be found in:
>>>
>>>
>> http://svn.freepascal.org/svn/fpc/trunk/tests/bench/shootout/src/regexdna.pp
>>> But the code is a lot slower than gcc so there is still a lot of
>>> performance tuning to do:
>>>
>>>                100000  300000  500000
>>> fpascal          1.169   4.581  11.754
>>> gcc-2            1.033   3.078   5.111
>> Much, much faster than the original.  There was an off-by-one error
>> that made the last line of the output incorrect.
> 
> Thanks, fix applied.

Ok, now somebody has to fix the regexpr unit and accelerate it *g*