remove debugging output from thread close
This commit is contained in:
parent
ab5c24cb87
commit
4260c37245
@ -364,7 +364,6 @@ thread_exit(Term) :-
|
||||
fail.
|
||||
'$run_at_thread_exit'(Id0) :-
|
||||
recorded('$thread_exit_hook',[Id0|Hook],R), erase(R),
|
||||
open('/home/vsc/coutput.txt', append, W), writeln(hook:Hook), close(W),
|
||||
catch(once(Hook),_,fail),
|
||||
fail.
|
||||
'$run_at_thread_exit'(_).
|
||||
|
Reference in New Issue
Block a user