path: root/tests/webtbf/tw20907a.pp

{ %opt=-vw -Sew }
{ %fail }

function f: ansistring;
begin
  if f <> '' then;
end;

begin
  f;
end.