equal
deleted
inserted
replaced
405 decr_watched()) |
405 decr_watched()) |
406 else (report i "System error in proof handler"; |
406 else (report i "System error in proof handler"; |
407 decr_watched()) |
407 decr_watched()) |
408 end |
408 end |
409 in Output.debug (fn () => ("subgoals forked to createWatcher: "^ prems_string_of th)); |
409 in Output.debug (fn () => ("subgoals forked to createWatcher: "^ prems_string_of th)); |
410 IsaSignal.signal (IsaSignal.usr2, IsaSignal.SIG_HANDLE proofHandler); |
410 IsaSignal.signal (IsaSignal.usr1, IsaSignal.SIG_HANDLE proofHandler); |
411 (childin, childout, childpid) |
411 (childin, childout, childpid) |
412 end |
412 end |
413 |
413 |
414 end (* structure Watcher *) |
414 end (* structure Watcher *) |