* generate input file in the test

git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@4019 3ad0048d-3df7-0310-abae-a5850022a9f2

2 files changed, 8 insertions, 3 deletions

diff --git a/tests/webtbs/tw5086.in b/tests/webtbs/tw5086.in
deleted file mode 100644
index ddf12120cb..0000000000
--- a/tests/webtbs/tw5086.in
+++ /dev/null
@@ -1,2 +0,0 @@
-180 6
-37 78 59 100 64 128
diff --git a/tests/webtbs/tw5086.pp b/tests/webtbs/tw5086.pp
index 109f55430c..6e766508ec 100644
--- a/tests/webtbs/tw5086.pp
+++ b/tests/webtbs/tw5086.pp
@@ -20,7 +20,7 @@ var
 
 procedure readInput;
 begin
-        assign(input,'tw5086.in');
+        assign(input,'tw5086.tmp');
         reset(input);
 	readln(v, k);
 	readln(a1, a2, b1, b2, c1, c2);
@@ -203,7 +203,14 @@ begin
           halt(1);
 end;
 
+var
+  t : text;
 begin
+assign(t,'tw5086.tmp');
+rewrite(t);
+writeln(t,'180 6');
+writeln(t,'37 78 59 100 64 128');
+close(t);
 	readInput;
 	Solve;
 end.