@@ -0,0 +1,9 @@
+{ Source provided for Free Pascal Bug Report 3048 }
+{ Submitted by "GBD" on 2004-04-15 }
+{ e-mail: }
+{$mode delphi}
+var a ,b : array of word;
+
+begin
+ if a<>b then writeln('ok');
+end.
florian