src/HOL/Tools/ATP/AtpCommunication.ML
changeset 17746 af59c748371d
parent 17718 9dab1e491d10
child 17772 818cec5f82a4
equal deleted inserted replaced
17745:38b4d8bf2627 17746:af59c748371d
    87      transferInput "";  true
    87      transferInput "";  true
    88  end handle EOF => false
    88  end handle EOF => false
    89 
    89 
    90 fun signal_parent (toParent, ppid, msg, goalstring) =
    90 fun signal_parent (toParent, ppid, msg, goalstring) =
    91  (TextIO.output (toParent, msg);
    91  (TextIO.output (toParent, msg);
    92   TextIO.output (toParent, goalstring^"\n");
    92   TextIO.output (toParent, goalstring);
    93   TextIO.flushOut toParent;
    93   TextIO.flushOut toParent;
    94   trace ("\nSignalled parent: " ^ msg);
    94   trace ("\nSignalled parent: " ^ msg);
    95   Posix.Process.kill(Posix.Process.K_PROC ppid, Posix.Signal.usr2));
    95   Posix.Process.kill(Posix.Process.K_PROC ppid, Posix.Signal.usr2));
    96 
    96 
    97 (*Called from watcher. Returns true if the Vampire process has returned a verdict.*)
    97 (*Called from watcher. Returns true if the Vampire process has returned a verdict.*)