diff options
-rw-r--r-- | pd_client.pl | 2 |
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), |