Skip to content

Commit

Permalink
Add files via upload
Browse files Browse the repository at this point in the history
  • Loading branch information
olsky committed May 31, 2016
1 parent 684ae00 commit 1c66ff1
Showing 1 changed file with 8 additions and 1 deletion.
9 changes: 8 additions & 1 deletion prolog/mqtt.pl
Original file line number Diff line number Diff line change
@@ -1,7 +1,6 @@
% MQTT pack for SWI-Prolog
% 2016-05-24 - olsky - initial draft
% 2016-05-30 - olsky - working connect and publish
% 2016-05-31 - olsky - addding async interface
%

:- module(mqtt, [
Expand Down Expand Up @@ -101,6 +100,8 @@
true.




% subscribe with:
% - topic pattern
% - qos
Expand All @@ -110,6 +111,12 @@
mqtt_sub(Connection, Topic) :-
mqtt_sub(Connection, Topic, []).







% hooks:

mqtt_hook_on_connect(Connection, Data) :- format('% hook > on_connect > connection: ~w data: ~w~n', [Connection, Data]).
Expand Down

0 comments on commit 1c66ff1

Please sign in to comment.