tests/webtbs/tw2280.pp


1
2
3
4
5
6
7
8
9
10
11

{ %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.