diff options
| author | Benjamin Franzke <benjaminfranzke@googlemail.com> | 2012-11-08 15:32:44 +0100 |
|---|---|---|
| committer | Benjamin Franzke <benjaminfranzke@googlemail.com> | 2012-11-08 15:32:44 +0100 |
| commit | 14d9287d7945c25eb06017d83dec4c45a55f2dba (patch) | |
| tree | 06be368ffdf391bad8959fb6a4139cb108b8e392 | |
| parent | a3cb6a31b86fb84f94e257e747a2a312b0d5d3f0 (diff) | |
| download | wbs-14d9287d7945c25eb06017d83dec4c45a55f2dba.tar.gz wbs-14d9287d7945c25eb06017d83dec4c45a55f2dba.tar.bz2 wbs-14d9287d7945c25eb06017d83dec4c45a55f2dba.zip | |
pd_client: Correctly exit when receiving an e
| -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 e0a83f3..4938dd4 100644 --- a/pd_client.pl +++ b/pd_client.pl @@ -13,7 +13,7 @@ launch(Module, StreamIn, StreamOut) :- atom_concat('rules/', Module, Path), consult(Path), do([], StreamIn, StreamOut, Module, [], []). -do(e, _, _, _, _) :- !. +do(e, _, _, _, _, _) :- !. do(Choice, StreamIn, StreamOut, Module, ModuleState, Hist) :- call(Module, Hist, ModuleDecision, ModuleState, NewModuleState), write(StreamOut, ModuleDecision), flush_output(StreamOut), |