| author | paulson |
| Thu, 28 Apr 2005 17:56:58 +0200 | |
| changeset 15872 | 8336ff711d80 |
| parent 15789 | 4cb16144c81b |
| child 15919 | b30a35432f5a |
| permissions | -rw-r--r-- |
|
15789
4cb16144c81b
added hearder lines and deleted some redundant material
paulson
parents:
15782
diff
changeset
|
1 |
(* ID: $Id$ |
| 15642 | 2 |
Author: Claire Quigley |
3 |
Copyright 2004 University of Cambridge |
|
4 |
*) |
|
5 |
||
6 |
(***************************************************************************) |
|
7 |
(* The watcher process starts a Spass process when it receives a *) |
|
8 |
(* message from Isabelle *) |
|
9 |
(* Signals Isabelle, puts output of child into pipe to Isabelle, *) |
|
10 |
(* and removes dead processes. Also possible to kill all the vampire *) |
|
11 |
(* processes currently running. *) |
|
12 |
(***************************************************************************) |
|
13 |
||
14 |
||
15 |
signature WATCHER = |
|
|
15789
4cb16144c81b
added hearder lines and deleted some redundant material
paulson
parents:
15782
diff
changeset
|
16 |
sig |
| 15642 | 17 |
|
18 |
(*****************************************************************************************) |
|
19 |
(* Send request to Watcher for multiple spasses to be called for filenames in arg *) |
|
20 |
(* callResProvers (outstreamtoWatcher, prover name,prover-command, (settings,file) list *) |
|
21 |
(*****************************************************************************************) |
|
22 |
||
| 15782 | 23 |
val callResProvers : TextIO.outstream *(string* string*string *string*string*string*string*string*string) list -> unit |
| 15642 | 24 |
|
25 |
||
26 |
||
27 |
(************************************************************************) |
|
28 |
(* Send message to watcher to kill currently running resolution provers *) |
|
29 |
(************************************************************************) |
|
30 |
||
31 |
val callSlayer : TextIO.outstream -> unit |
|
32 |
||
33 |
||
34 |
||
35 |
(**********************************************************) |
|
36 |
(* Start a watcher and set up signal handlers *) |
|
37 |
(**********************************************************) |
|
38 |
||
| 15782 | 39 |
val createWatcher : Thm.thm -> TextIO.instream * TextIO.outstream * Posix.Process.pid |
| 15642 | 40 |
|
41 |
||
42 |
||
43 |
(**********************************************************) |
|
44 |
(* Kill watcher process *) |
|
45 |
(**********************************************************) |
|
46 |
||
47 |
val killWatcher : (Posix.Process.pid) -> unit |
|
48 |
||
49 |
||
50 |
end |