git.iko.soy/distributed-process
on master help sign in
Have nsend send unencoded messages to local processes.
a2f1f5fFacundo Domínguez
src/Control/Distributed/Process/Internal/Primitives.hs+1−1
compare with master
unifiedsplit
@@ -1166,7 +1166,7 @@ whereisRemoteAsync nid label = do
1166-- | Named send to a process in the local registry (asynchronous)
1166-- | Named send to a process in the local registry (asynchronous)
1167nsend :: Serializable a => String -> a -> Process ()
1167nsend :: Serializable a => String -> a -> Process ()
1168nsend label msg =
1168nsend label msg =
1169− sendCtrlMsg Nothing (NamedSend label (createMessage msg))
1169+ sendCtrlMsg Nothing (NamedSend label (createUnencodedMessage msg))
1170
1170
1171-- | Named send to a process in the local registry (asynchronous).
1171-- | Named send to a process in the local registry (asynchronous).
1172-- This function makes /no/ attempt to serialize and (in the case when the
1172-- This function makes /no/ attempt to serialize and (in the case when the