From 1c66ff18e7a6fd8746157e72f80123799f4932e0 Mon Sep 17 00:00:00 2001 From: olsky Date: Tue, 31 May 2016 11:30:47 +0200 Subject: [PATCH] Add files via upload --- prolog/mqtt.pl | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) diff --git a/prolog/mqtt.pl b/prolog/mqtt.pl index 6ccb252..f38a49b 100644 --- a/prolog/mqtt.pl +++ b/prolog/mqtt.pl @@ -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, [ @@ -101,6 +100,8 @@ true. + + % subscribe with: % - topic pattern % - qos @@ -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]).