Another update from ingydotnet^djgoku
This commit is contained in:
parent
91df62d461
commit
948b86eafa
7604 changed files with 108452 additions and 22726 deletions
26
Task/Events/Elixir/events.elixir
Normal file
26
Task/Events/Elixir/events.elixir
Normal file
|
|
@ -0,0 +1,26 @@
|
|||
defmodule Events do
|
||||
def log(msg) do
|
||||
{h,m,s} = :erlang.time
|
||||
:io.fwrite("~2.B:~2.B:~2.B => ~s~n",[h,m,s,msg])
|
||||
end
|
||||
|
||||
def task do
|
||||
log("Task start")
|
||||
receive do
|
||||
:go -> :ok
|
||||
end
|
||||
log("Task resumed")
|
||||
end
|
||||
|
||||
def main do
|
||||
log("Program start")
|
||||
pid = spawn(Events,:task,[])
|
||||
log("Program sleeping")
|
||||
:timer.sleep(1000)
|
||||
log("Program signalling event")
|
||||
send(pid, :go)
|
||||
:timer.sleep(100)
|
||||
end
|
||||
end
|
||||
|
||||
Events.main
|
||||
Loading…
Add table
Add a link
Reference in a new issue