{ %version=1.1 } {$ifdef fpc}{$mode objfpc}{$endif} var v : variant; begin Initialize(v); Finalize(v); end.