t_id
271
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
950856959 | 1015807 | True | False | Successfully run |
Record count: 1
{ Old file: tbs0014.pp } { } type prec = ^trec; trec = record p : prec; l : longint; end; function test(p1,p2 : prec) : boolean; begin if p1^.l=12 then case p1^.l of 123 : test:=(test(p1^.p,p2^.p) and test(p1^.p,p2^.p)) or (test(p1^.p,p2^.p) and test(p1^.p,p2^.p)); 1234 : test:=(test(p1^.p,p2^.p) and test(p1^.p,p2^.p)) or (test(p1^.p,p2^.p) and test(p1^.p,p2^.p)); end; end; begin end.