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* _______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal