--- a/src/HOL/Tools/ATP/recon_transfer_proof.ML Fri Apr 22 17:32:29 2005 +0200
+++ b/src/HOL/Tools/ATP/recon_transfer_proof.ML Fri Apr 22 17:32:46 2005 +0200
@@ -371,7 +371,7 @@
Posix.Process.kill(Posix.Process.K_PROC ppid, Posix.Signal.usr2);
(* Attempt to prevent several signals from turning up simultaneously *)
- OS.Process.sleep(Time.fromSeconds 1) ; dummy_tac
+ Posix.Process.sleep(Time.fromSeconds 1) ; dummy_tac
end
handle _ => (let val outfile = TextIO.openOut(File.sysify_path(File.tmp_path (Path.basic "foo_handler")));
@@ -382,7 +382,7 @@
TextIO.flushOut toParent;
Posix.Process.kill(Posix.Process.K_PROC ppid, Posix.Signal.usr2);
(* Attempt to prevent several signals from turning up simultaneously *)
- OS.Process.sleep(Time.fromSeconds 1) ;dummy_tac
+ Posix.Process.sleep(Time.fromSeconds 1) ;dummy_tac
end)