t_id
1073
t_adddate
2003/10/14
t_result
0
t_knownrunerror
0
| tr_id | run | tr_ok | tr_skip | tr_result |
|---|---|---|---|---|
| 479788783 | 940712 | False | True | Skipping test run because it is a unit |
Record count: 1
{ Source provided for Free Pascal Bug Report 2678 }
{ Submitted by "darek mazur" on 2003-09-13 }
{ e-mail: madarzoo@o2.pl }
{$H-,I-,C-,D+,E-,L+,M-,P-,Q-,R-,S-,T-,X+,Z1}
{$Y+}
unit tw2678;
{$mode delphi}
interface
var
uii : integer;
function aa(a: string):string;
implementation
function aa;
begin
end;
end.