freepascal.compiler/tests/tbf/tb0071.pp

{ %FAIL }
{ Old file: tbf0345.pp }
{  }

var
  WORD : array[1..2] of word;

begin
end.