@@ -0,0 +1,10 @@
+{ Source provided for Free Pascal Bug Report 2280 }
+{ Submitted by "Yakov Sudeikin" on 2002-12-23 }
+{ e-mail: [email protected] }
+var
+ a: array of string;
+
+begin
+ a := nil;
+ if a = nil then;
+end.
@@ -0,0 +1,16 @@
+{ Source provided for Free Pascal Bug Report 2289 }
+{ Submitted by "Mattias Gaertner" on 2002-12-27 }
+program TestSkip;
+{$IFDEF NotDefined}
+//
+{$IFDEF Bogus}
+{$ENDIF}