mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2026-01-08 05:01:01 +01:00
15 lines
333 B
ObjectPascal
15 lines
333 B
ObjectPascal
{ Source provided for Free Pascal Bug Report 4566 }
|
|
{ Submitted by "Vincent Snijders" on 2005-12-04 }
|
|
{ e-mail: vsnijders@quicknet.nl }
|
|
program bug4566;
|
|
|
|
{$mode objfpc}{$H+}
|
|
|
|
var
|
|
s: string;
|
|
|
|
begin
|
|
//accidently use #1310 instead of #13#10
|
|
s := 'Message Text' + #1310 + #1310 + 'More Text';
|
|
end.
|
|
|