From ff3d7862d6ae93341c08514f02da0a0019bb8e09 Mon Sep 17 00:00:00 2001
From: yury <jura@cp-lab.com>
Date: Sat, 6 Oct 2018 15:10:24 +0000
Subject: [PATCH] * Erase the temp file.

git-svn-id: trunk@39868 -
---
 tests/webtbs/tw32938.pp | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/tests/webtbs/tw32938.pp b/tests/webtbs/tw32938.pp
index 495b343dc3..079fb04ac9 100644
--- a/tests/webtbs/tw32938.pp
+++ b/tests/webtbs/tw32938.pp
@@ -30,6 +30,8 @@ begin
    if b<>10 then
      halt(1);
    write;
+   close(f);
+   erase(f);
    writeln('ok');
 end.