From b9145a8161071bee25c6c1c026fbc2381bdfa0bb Mon Sep 17 00:00:00 2001 From: Matthias Schiffer Date: Mon, 21 Jun 2010 23:12:44 +0200 Subject: Show roster --- src/core/ephraim_util.erl | 10 ++++++++++ 1 file changed, 10 insertions(+) create mode 100644 src/core/ephraim_util.erl (limited to 'src/core/ephraim_util.erl') diff --git a/src/core/ephraim_util.erl b/src/core/ephraim_util.erl new file mode 100644 index 0000000..73cb7fc --- /dev/null +++ b/src/core/ephraim_util.erl @@ -0,0 +1,10 @@ +-module(ephraim_util). +-compile([debug_info, export_all]). + +-spec send_all([term()], term()) -> term(). +send_all(Dest, Message) -> + lists:foldr(fun erlang:send/2, Message, Dest). + +-spec send_all_values(dict(), term()) -> term(). +send_all_values(Dest, Message) -> + dict:fold(fun(_,Value,Msg) -> Value ! Msg end, Message, Dest). -- cgit v1.2.3