Hugh JF Chen hughjfchen
hughjfchen
/ Main.hs
Created
December 28, 2024 02:14
— forked from gelisam/Main.hs
A variant of SimpleLocalnet which uses a hardcoded list of nodes
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #!/usr/bin/env stack | |
| -- stack --resolver lts-8.16 script | |
| -- for https://www.reddit.com/r/haskell/comments/6emo9g/trying_to_get_the_basic_example_in_cloudhaskell/ | |
| {-# LANGUAGE LambdaCase, RecordWildCards #-} | |
| import System.Environment (getArgs) | |
| import Control.Distributed.Process | |
| import Control.Distributed.Process.Node (initRemoteTable) | |
| import Control.Distributed.Process.Backend.SimpleLocalnet |
hughjfchen
/ gist:ff36cc656fe7c75ae2f3509def022a0e
Created
December 12, 2017 07:13
— forked from malcolmsparks/gist:6044878
MQTT example for Clojure core.async
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (ns mqtt-insertion.core | |
| (:require [clojure.core.async :refer :all]) | |
| (:import (org.eclipse.paho.client.mqttv3 | |
| MqttCallback | |
| MqttAsyncClient | |
| MqttConnectOptions | |
| MqttDeliveryToken | |
| MqttException | |
| MqttMessage | |
| MqttTopic |