fpc/tests/webtbf/tw12329.pp
2008-10-10 15:01:56 +00:00

18 lines
156 B
ObjectPascal

{ %fail }
unit tw12329;
{$mode objfpc}{$h+}
interface
implementation
procedure test;
const
arr: array[0..1] of WideString = (0, 0);
begin
end;
end.