* new bugs

This commit is contained in:
peter 2002-12-27 19:22:31 +00:00
parent 6fff1b96bd
commit 556435a4e1
2 changed files with 26 additions and 0 deletions
tests/webtbs

10
tests/webtbs/tw2280.pp Normal file
View File

@ -0,0 +1,10 @@
{ 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.

16
tests/webtbs/tw2289.pp Normal file
View File

@ -0,0 +1,16 @@
{ Source provided for Free Pascal Bug Report 2289 }
{ Submitted by "Mattias Gaertner" on 2002-12-27 }
{ e-mail: nc-gaertnma@netcologne.de }
program TestSkip;
{$IFDEF NotDefined}
//
{$IFDEF Bogus}
{$ENDIF}
{$ENDIF}
begin
end.