freepascal.compiler/tests/tbf/tb0113.pp

{ %FAIL }

var
  i : integer;
begin
  { String constants can't exceed 255 chars }
  i:=length('12345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890');
end.