author | wenzelm |
Mon, 29 Aug 2005 16:18:04 +0200 | |
changeset 17184 | 3d80209e9a53 |
parent 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 |
||
15919
b30a35432f5a
Replaced reference to SPASS with general one - set SPASS_HOME in settings file.
quigley
parents:
15789
diff
changeset
|
39 |
val createWatcher : Thm.thm*(ResClause.clause * Thm.thm) Array.array * int -> 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 |