freepascal.compiler/bugs/bug0001.pp

program smalltest;
  const
      teststr : string = ' '#9#255#0;
begin
      writeln(teststr);
      teststr := 'gaga';
      writeln(teststr);
end.