{ Source provided for Free Pascal Bug Report 3429 }
{ Submitted by "Danny Milosavljevic" on  2004-12-05 }
{ e-mail: danny_milo@yahoo.com }
unit uw3429;
interface
var
  v: Variant;
implementation
begin
  v := 7;
end.