public ErlRpcServer(ErlLocalNode owner)
{
m_Active = true;
Node = owner;
Self = Node.CreateMbox(ConstAtoms.Rex);
m_Thread = new Thread(threadSpin);
m_Thread.Name = "{0} RPC".Args(owner.NodeName);
m_Thread.IsBackground = true;
m_Thread.Start();
}
public ErlRpcServer(ErlLocalNode owner)
{
m_Active = true;
Node = owner;
Self = Node.CreateMbox(ConstAtoms.Rex);
m_Thread = new Thread(start);
m_Thread.Name = "{0} RPC".Args(owner.NodeName);
m_Thread.IsBackground = true;
m_Thread.Start();
}
public ErlIoServer(ErlLocalNode owner)
{
m_Active = true;
Node = owner;
Self = Node.CreateMbox(ConstAtoms.User);
m_Thread = new Thread(startIO);
m_Thread.Name = "{0} I/O".Args(owner.NodeName);
m_Thread.IsBackground = true;
m_Thread.Start();
}
public ErlIoServer(ErlLocalNode owner)
{
m_Active = true;
Node = owner;
Self = Node.CreateMbox(ConstAtoms.User);
m_Thread = new Thread(threadSpin);
m_Thread.Name = "{0} I/O".Args(owner.NodeName);
m_Thread.IsBackground = true;
m_Thread.Start();
}
private void btnErlang_Click(object sender, EventArgs e)
{
//connect to erlang
var n = new ErlLocalNode("b", new ErlAtom("hahaha"));
n.AcceptConnections = false;
n.Start();
var m = n.CreateMbox("test");
var res = n.Send(m.Self, "[email protected]", "me", new ErlString("Hello! " + DateTime.Now));
if (!res)
{
Console.WriteLine("Can not send message");
}
else
{
Console.WriteLine("Message sent");
}
}
