2020. 07. 25. 18:42 keltezéssel, Florian Klämpfl írta:
Am 25.07.20 um 16:49 schrieb Gabor Boros:
Hi All,
I cannot show the real application but attached a simple example.
If compile with 3.2.0 "ppc386.exe -O3 test.pas" the execution time of
the resulting example binary is 0.4s, and 2.2s if com
On 25/07/2020 5:42 pm, Florian Klämpfl wrote:
> Missed optimization. I fixed it in trunk.
Damn that was quick! Nicely done. :-)
Regards,
Graeme
--
fpGUI Toolkit - a cross-platform GUI toolkit using Free Pascal
http://fpgui.sourceforge.net/
My public PGP key: http://tinyurl.com/graeme-pgp
Am 25.07.20 um 16:49 schrieb Gabor Boros:
Hi All,
I cannot show the real application but attached a simple example.
If compile with 3.2.0 "ppc386.exe -O3 test.pas" the execution time of
the resulting example binary is 0.4s, and 2.2s if compile with
"ppcx64.exe -O3 test.pas". Any idea why?
Mi
Hi All,
I cannot show the real application but attached a simple example.
If compile with 3.2.0 "ppc386.exe -O3 test.pas" the execution time of
the resulting example binary is 0.4s, and 2.2s if compile with
"ppcx64.exe -O3 test.pas". Any idea why?
Gabor
{$Mode objfpc}
uses SysUtils;
functio
On Sat, 25 Jul 2020 00:08:01 +0200, Bo Berglund via fpc-pascal
wrote:
>But I would like to enumerate the subdirectories themselves (without
>the content).
Turns out that there is a procedure FindAllDirectories() in
fileutil...
It does exactly what I need. :)
I wonder why Google failed to bring
On Sat, 25 Jul 2020 10:51:37 +0200, Bart via fpc-pascal
wrote:
>On Sat, Jul 25, 2020 at 12:24 AM Bo Berglund via fpc-pascal
> wrote:
>
>> But I would like to enumerate the subdirectories themselves (without
>> the content).
>
>Take a look at how FindAllFiles is implemented.
>It should be relative
On Sat, Jul 25, 2020 at 12:24 AM Bo Berglund via fpc-pascal
wrote:
> But I would like to enumerate the subdirectories themselves (without
> the content).
Take a look at how FindAllFiles is implemented.
It should be relatively easy to modify it so that it discards files
and only adds folders to t
