{ %version=1.1 }
{ Source provided for Free Pascal Bug Report 2280 }
{ Submitted by "Yakov Sudeikin" on  2002-12-23 }
{ e-mail: yashka@exebook.com }
var
 a: array of string;

begin
 a := nil;
 if a = nil then;
end.
