fpcsrc/tests/webtbf/tw12329.pp


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

{ %fail }

unit tw12329;
{$mode objfpc}{$h+}

interface

implementation

procedure test;
const
  arr: array[0..1] of WideString = (0, 0);
begin

end;

end.