From 71f7ca88339f1793f21fecbd36e84f6e18e915bd Mon Sep 17 00:00:00 2001 From: joe Date: Tue, 29 May 2018 18:26:25 -0400 Subject: WIP: Deliver friend-request to xmpp client. --- src/Network/Tox/NodeId.hs | 1 + 1 file changed, 1 insertion(+) (limited to 'src/Network/Tox') diff --git a/src/Network/Tox/NodeId.hs b/src/Network/Tox/NodeId.hs index 1f79d1a5..2728a13d 100644 --- a/src/Network/Tox/NodeId.hs +++ b/src/Network/Tox/NodeId.hs @@ -105,6 +105,7 @@ packPublicKey ws = BA.allocAndFreeze (8 * length ws) $ [] -> return () x:xs -> do poke ptr (toBE64 x) loop xs (plusPtr ptr 8) +{-# NOINLINE packPublicKey #-} -- We represent the node id redundantly in two formats. The [Word64] format is -- convenient for short-circuiting xor/distance comparisons. The PublicKey -- cgit v1.2.3