mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-12 04:06:08 +02:00
* Delete temp files after test.
git-svn-id: trunk@39918 -
This commit is contained in:
parent
5fc2ea362f
commit
9ef7a17390
@ -12,6 +12,7 @@ begin
|
||||
if b<>123 then
|
||||
halt(1);
|
||||
close(f);
|
||||
erase(f);
|
||||
writeln('ok');
|
||||
end.
|
||||
|
||||
|
@ -11,6 +11,7 @@ begin
|
||||
if s<>'FPC' then
|
||||
halt(1);
|
||||
close(f);
|
||||
erase(f);
|
||||
writeln('ok');
|
||||
end.
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user