freepascal.compiler/tests/webtbs/tw13345y.pp

unit tw13345y;

{$mode delphi}

interface

type
  ta = interface
  end;

var
  c: ta;

implementation

end.