From eaaf761dfb6af3673d9f064a791afadbbdc60e29 Mon Sep 17 00:00:00 2001 From: joe Date: Sun, 19 Nov 2017 22:59:49 -0500 Subject: Conduit stubs to convert between Tox and XMPP messages. --- ToxToXMPP.hs | 11 +++++++++++ 1 file changed, 11 insertions(+) create mode 100644 ToxToXMPP.hs (limited to 'ToxToXMPP.hs') diff --git a/ToxToXMPP.hs b/ToxToXMPP.hs new file mode 100644 index 00000000..b018e47b --- /dev/null +++ b/ToxToXMPP.hs @@ -0,0 +1,11 @@ +module ToxToXMPP where + +import Data.Conduit as C +import Data.XML.Types as XML +import Network.Tox.Crypto.Transport as Tox + +xmppToTox :: Conduit XML.Event IO Tox.CryptoMessage +xmppToTox = _todo + +toxToXmpp :: Conduit Tox.CryptoMessage IO XML.Event +toxToXmpp = _todo -- cgit v1.2.3