paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-23 11:05:03 +02:00
Code Issues Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source
This commit is contained in:
florian 2004-11-05 13:11:18 +00:00
parent 67c3e6c17a
commit 89ef29de7e
1 changed files with 10 additions and 0 deletions

10
tests/test/tmt1.pp
View File

@ -11,8 +11,18 @@ uses
;
const
{$ifdef cpuarm}
{$define slowcpu}
{$endif cpuarm}
{$ifdef slowcpu}
threadcount = 40;
stringlen = 2000;
{$else slowcpu}
threadcount = 100;
stringlen = 10000;
{$endif slowcpu}
var
finished : longint;
threadvar