mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-22 11:49:23 +02:00
* test fixed
git-svn-id: trunk@13435 -
This commit is contained in:
parent
11f25885a4
commit
5127c74132
@ -18,5 +18,7 @@ begin
|
||||
fpAlarm(10);
|
||||
Writeln ('Pausing');
|
||||
fpPause;
|
||||
if fpGetErrno<>0 then
|
||||
halt(1);
|
||||
Writeln ('Pause returned');
|
||||
end.
|
||||
|
Loading…
Reference in New Issue
Block a user