Browse Source

* initial revision

git-svn-id: trunk@1877 -
florian 19 years ago
parent
commit
3a81473a05
2 changed files with 16 additions and 0 deletions
  1. 1 0
      .gitattributes
  2. 15 0
      tests/webtbs/tw4566.pp

+ 1 - 0
.gitattributes

@@ -6389,6 +6389,7 @@ tests/webtbs/tw4520.pp -text svneol=unset#text/plain
 tests/webtbs/tw4529.pp -text svneol=unset#text/plain
 tests/webtbs/tw4537.pp svneol=native#text/plain
 tests/webtbs/tw4540.pp -text svneol=unset#text/plain
+tests/webtbs/tw4566.pp -text svneol=unset#text/plain
 tests/webtbs/ub1873.pp svneol=native#text/plain
 tests/webtbs/ub1883.pp svneol=native#text/plain
 tests/webtbs/uw0555.pp svneol=native#text/plain

+ 15 - 0
tests/webtbs/tw4566.pp

@@ -0,0 +1,15 @@
+{ Source provided for Free Pascal Bug Report 4566 }
+{ Submitted by "Vincent Snijders" on  2005-12-04 }
+{ e-mail: [email protected] }
+program bug4566;
+
+{$mode objfpc}{$H+}
+
+var
+  s: string;
+  
+begin
+  //accidently use #1310 instead of #13#10
+  s := 'Message Text' + #1310 + #1310 + 'More Text';
+end.
+