* bugfix 2187 (already executes correctly, but crashed in 1.0.6)

tests/webtbs/tw2187.pp

@@ -0,0 +1,13 @@
+{ Source provided for Free Pascal Bug Report 2187 }
+{ Submitted by "Artur Kornilowicz" on  2002-10-18 }
+{ e-mail: [email protected] }
+{$mode delphi}
+type x = record
+            s : string;
+            a : ^byte;
+         end; 
+
+var a: array [1..2] of x;
+
+begin
+end.