t_id
63
t_version
1.1
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
| tr_id | run | tr_ok | tr_skip | tr_result |
|---|---|---|---|---|
| 448006679 | 935671 | False | False | Failed to run |
Record count: 1
thread 5 started thread 5 finished thread 6 started thread 6 finished thread 11 started thread 11 finished thread 10 started thread 10 finished thread 2 started thread 2 finished thread 9 started thread 9 finished thread 4 started thread 4 finished thread 7 started thread 7 finished thread 1 started thread 1 finished thread 8 started thread 8 finished thread 3 started thread 3 finished thread 23 started thread 23 finished thread 13 started thread 13 finished thread 14 started thread 14 finished thread 16 started thread 16 finished thread 18 started thread 18 finished thread 12 started thread 12 finished thread 20 started thread 20 finished thread 24 started thread 24 finished thread 25 started thread 25 finished thread 17 started thread 17 finished thread 15 started thread 15 finished thread 22 started thread 22 finished thread 21 started thread 21 finished thread 19 started thread 19 finished thread 26 started thread 26 finished thread 32 started thread 32 finished thread 30 started thread 30 finished thread 27 started thread 27 finished thread 29 started thread 29 finished thread 31 started thread 31 finished thread 28 started thread 28 finished thread 33 started thread 33 finished thread 35 started thread 35 finished thread 34 started thread 34 finished thread 36 started thread 36 finished thread 37 started thread 37 finished thread 38 started thread 38 finished thread 39 started thread 39 finished thread 40 started thread 40 finished 40
{ %version=1.1 }
{$mode objfpc}
{$threading on}
uses sysutils;
const
threadcount = 100;
stringlen = 10000;
var
finished : longint;
threadvar
thri : longint;
function f(p : pointer) : longint;
var
s : ansistring;
begin
writeln('thread ',longint(p),' started');
thri:=0;
while (thriLink to SVN view of test/tmt1.pp source.