fpc/tests/webtbs/tw2809.pp

{ %version=1.1 }

{$ifdef fpc}{$mode objfpc}{$endif}

var
  v : variant;
begin
  Initialize(v);
  Finalize(v);
end.