ggpasqualino · November 25, 2015 19:17
diff --git a/agent_example.exs b/agent_example.exs
 {:ok, agent} = Agent.start_link(fn -> [] end)

 Agent.get(agent, fn list -> list end) # => []

 Agent.update(agent, fn list -> ["eggs"|list] end) # => :ok

 Agent.get(agent, fn list -> list end) # => ["eggs"]

 Agent.stop(agent) # => :ok
diff --git a/elixir_processes.md b/elixir_processes.md
diff --git a/gen_server_stack_example.exs b/gen_server_stack_example.exs
 defmodule GenServerStack do
  use GenServer

  def handle_call(:pop, _from, [h|t]) do
    {:reply, h, t}
  end

  def handle_cast({:push, item}, state) do
    {:noreply, [item|state]}
  end
 end

 {:ok, pid} = GenServer.start_link(GenServerStack, [:hello])

 GenServer.call(pid, :pop) # => :hello

 GenServer.cast(pid, {:push, :world}) # => :ok

 GenServer.call(pid, :pop) # => :world
diff --git a/leak_state.rb b/leak_state.rb
 class Leak
  attr_reader :state
  
  def initialize
    @state = {}
  end
 end

 leak = Leak.new
 leak.state[:inject] = :state
 leak.state # => { :inject => :state }
diff --git a/stack_example.exs b/stack_example.exs
 defmodule Stack do
  def init(state) do
    new_state = state
    receive do
      { client, :pop } ->
        [h | new_state] = state
        send client, { self(), :result, h }
      { client, :push, value } ->
        new_state = [value | state]
        send client, { self(), :ok }
    end
    init(new_state)
  end
 end

 pid = spawn(Stack, :init, [[:hello]])

 send(pid, {self(), :pop})

 send(pid, {self(), :push, :world})

 send(pid, {self(), :pop})

 flush
diff --git a/task_example.exs b/task_example.exs
 fun = fn -> 
        IO.puts "Started long function"
        :timer.sleep(2000)
        IO.puts "Finished long function"  
      end

 fun.()

 Task.async(fun)
	{:ok, agent} = Agent.start_link(fn -> [] end)

	Agent.get(agent, fn list -> list end) # => []

	Agent.update(agent, fn list -> ["eggs"\|list] end) # => :ok

	Agent.get(agent, fn list -> list end) # => ["eggs"]

	Agent.stop(agent) # => :ok
	defmodule GenServerStack do
	use GenServer

	def handle_call(:pop, _from, [h\|t]) do
	{:reply, h, t}
	end

	def handle_cast({:push, item}, state) do
	{:noreply, [item\|state]}
	end
	end

	{:ok, pid} = GenServer.start_link(GenServerStack, [:hello])

	GenServer.call(pid, :pop) # => :hello

	GenServer.cast(pid, {:push, :world}) # => :ok

	GenServer.call(pid, :pop) # => :world
	class Leak
	attr_reader :state

	def initialize
	@state = {}
	end
	end

	leak = Leak.new
	leak.state[:inject] = :state
	leak.state # => { :inject => :state }
	defmodule Stack do
	def init(state) do
	new_state = state
	receive do
	{ client, :pop } ->
	[h \| new_state] = state
	send client, { self(), :result, h }
	{ client, :push, value } ->
	new_state = [value \| state]
	send client, { self(), :ok }
	end
	init(new_state)
	end
	end

	pid = spawn(Stack, :init, [[:hello]])

	send(pid, {self(), :pop})

	send(pid, {self(), :push, :world})

	send(pid, {self(), :pop})

	flush
	fun = fn ->
	IO.puts "Started long function"
	:timer.sleep(2000)
	IO.puts "Finished long function"
	end

	fun.()

	Task.async(fun)