Skip to content

Instantly share code, notes, and snippets.

View SKoschnicke's full-sized avatar

Sven Koschnicke SKoschnicke

View GitHub Profile
import Reactive.Banana
import Control.Concurrent
main = do
-- Create handles for pushing values into events
(addHandler1, push1) <- newAddHandler
(addHandler2, push2) <- newAddHandler
-- Create event network
network <- compile $ do
-- Actual events from AddHandlers