close socket explicitly (idempotent);
authorwenzelm
Tue, 31 Mar 2020 14:40:56 +0200
changeset 71638 ec14ef6dd09b
parent 71637 45c2b8cf1b26
child 71639 ec84f542e411
close socket explicitly (idempotent);
src/Pure/System/isabelle_process.ML
--- a/src/Pure/System/isabelle_process.ML	Tue Mar 31 14:09:36 2020 +0200
+++ b/src/Pure/System/isabelle_process.ML	Tue Mar 31 14:40:56 2020 +0200
@@ -204,6 +204,8 @@
     val _ = Future.shutdown ();
     val _ = Execution.reset ();
     val _ = Message_Channel.shutdown msg_channel;
+    val _ = BinIO.closeIn in_stream;
+    val _ = BinIO.closeOut out_stream;
 
   in Exn.release result end);