This package is not currently in any snapshots. If you're interested in using it, we recommend adding it to Stackage Nightly. Doing so will make builds more reliable, and allow stackage.org to host generated Haddocks.
{-# LANGUAGE OverloadedStrings #-}
import Web.SocketIO
-- listens to port 4000
main = server 4000 $ do
-- ping pong
on "ping" $ emit "pong" []
-- msg :: CallbackM [Text]
on "echo" $ msg >>= emit "pong"
-- do some IO
on "Kim Jong-Un" $ liftIO launchMissile