summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--pd_client.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/pd_client.pl b/pd_client.pl
index 4938dd4..72742e6 100644
--- a/pd_client.pl
+++ b/pd_client.pl
@@ -7,7 +7,7 @@ start(Module, Host, Port):-
socket_connect(Socket, 'AF_INET'(HostAddress, Port),
StreamIn, StreamOut),
launch(Module, StreamIn, StreamOut),
- socket_close(Socket).
+ close(StreamIn), close(StreamOut), socket_close(Socket).
launch(Module, StreamIn, StreamOut) :-
atom_concat('rules/', Module, Path), consult(Path),