{ %fail }

type
  tr = record end;
  ts2 = string[80];

operator :=(const r: tr) res: ts2;
begin
end;

begin
end.