+ test for bug #3977 added

git-svn-id: trunk@30 -

.gitattributes

@@ -6099,6 +6099,8 @@ tests/webtbs/tw3898.pp svneol=native#text/plain
 tests/webtbs/tw3899.pp svneol=native#text/plain
 tests/webtbs/tw3900.pp svneol=native#text/plain
 tests/webtbs/tw3973.pp svneol=native#text/plain
+tests/webtbs/tw3977.pp svneol=native#text/plain
+tests/webtbs/tw3977.txt svneol=native#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

tests/webtbs/tw3977.pp

@@ -0,0 +1,11 @@
+{ Source provided for Free Pascal Bug Report 3977 }
+{ Submitted by "lqs" on  2005-05-17 }
+{ e-mail: [email protected] }
+var
+  n:integer;
+begin
+  assign(input,'tw3977.txt');
+  reset(input);
+  readln(n);
+  close(output);
+end.

tests/webtbs/tw3977.txt

@@ -0,0 +1 @@
+1234